ONC2PR20 ;HINES OIFO/RTK - Pre-Install Routine for Patch ONC*2.2*20 ;05/01/24
Source file <ONC2PR20.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;start pre-init changes
|
|
| GEOCODE | ;fix NEW ENGLAND AND NEW JERSEY entry in File #165.2
|
|
| REMOPT1 | ;Remove ONCO UTIL-DELETE PATIENT option from it's menu
|
|
| REMOPT2 | ;Remove ONCO RQRS EXTRACT option from it's menu
|
|
| REMOPT3 | ;Remove ONCO FOLL-PAT FOLLOWUP REPORT option from it's menu
|
|
| ABSTATUS | ;Check ABSTRACT STATUS (#91) field for all 2023 cases and later.
|
|
| INITIALS | ;Check if Oncology Registrar has initials in FILE 200
|
|
| CASEFIND | ;Changes to CASEFINDING SOURCE (#166) file
|
|
| USERV | ;Update url to Production or Development server
|
| Name | Field # of Occurrence |
|---|---|
| ^DIE | USERV+6, USERV+10 |
| FILE^DIE | GEOCODE+14, GEOCODE+21, ABSTATUS+15, CASEFIND+6, CASEFIND+10, CASEFIND+14, CASEFIND+18 |
| $$GET1^DIQ | INITIALS+10, INITIALS+12 |
| $$DELETE^XPDMENU | REMOPT1+3, REMOPT2+3, REMOPT3+3 |
| $$PATCH^XPDUTL | GEOCODE+2, REMOPT1+1, REMOPT2+1, REMOPT3+1, CASEFIND+2 |
| BMES^XPDUTL | GEOCODE+5, GEOCODE+9, GEOCODE+10, GEOCODE+22, REMOPT1+5, REMOPT1+6, REMOPT2+5, REMOPT2+6, REMOPT3+5, REMOPT3+6 , ABSTATUS+4, ABSTATUS+16, INITIALS+3, INITIALS+14 |
| $$PROD^XUPROD | USERV+2 |
| FileNo | Call Tags |
|---|---|
| ^XOB(18.12 - [#18.12] | Classic Fileman Calls |
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ONCO(160.16 - [#160.16] | START+1! |
| ^ONCO(164.33 - [#164.33] | START+2! |
| ^ONCO(164.44 - [#164.44] | START+3! |
| ^ONCO(165.2 - [#165.2] | GEOCODE+6, GEOCODE+7, GEOCODE+16, GEOCODE+17 |
| ^ONCO(165.5 - [#165.5] | ABSTATUS+7, ABSTATUS+9, ABSTATUS+10, INITIALS+6, INITIALS+7 |
| ^ONCO(165.8 - [#165.8] | START+4! |
| ^ONCO(165.9 - [#165.9] | START+5! |
| ^ONCO(166 - [#166] | CASEFIND+4, CASEFIND+8, CASEFIND+12, CASEFIND+16 |
| ^XOB(18.12 - [#18.12] | USERV+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
