RORP035 ;ALB/MAF - CCR PRE/POST-INSTALL PATCH 35 ;18 Nov 2019 1:38 PM
Source file <RORP035.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Case Registries | 7 | DBS^RORERR $$MSG^RORERR20 FINDPEND^RORP035A ^RORSET02 XTMPHDR^RORUTL01 $$REGIEN^RORUTL02 (EN,TASK)^RORUTL22 |
| VA FileMan | 7 | BLD^DIALOG ^DIC UPDATE^DIE ^DIK CLEAN^DILF $$GET1^DIQ ^DIR |
| Kernel | 4 | (OPTION,STAT)^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT (BMES,MES)^XPDUTL OWNSKEY^XUSRB |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENV | ; --- Environment check
|
|
| PRE | ; --- Pre-Install routine for Patch 35
; CHECK FOR ROR VA IRM KEY, ABORT IF USER DOES NOT POSSESS |
|
| POST | ; --- Post-Install routine for Patch 35
|
|
| GENDRG | ; --- Delete entry in ROR GENERIC DRUG with unresolved pointers
; clean up 799.51 if pointers are bad ; New HIV registry Drugs : DORAVIRINE - DORAVIRINE/LAMIVUDINE/TENOFORVIR - DOLUTEGRAVIR/LAMIVUDINE ; |
|
| UPDPANEL | ;
; For parameter panel field, add 29, after ,24, right below the Additional Identifiers panel for ; Diagnosis ( REPORT CODE 13) ; Procedure ( REPORT CODE 15) |
|
| POSQ3(DIR) | ||
| POSQ4(DIR) | ||
| POSQ5(DIR) | ; --- Updates the DIR array from the post-install question #5 (schedule time for ROR INITIALIZE task)
|
|
| NEWREG | ; --- Update ROR LIST ITEM file (#799.1) for new registriesList of new registries to initialize
|
|
| UPDPROC | ; --- Update ROR LIST ITEM file (#799.1) for new registriesAdds ICD dx/procedure codes and CPT codes to the new registries in ROR ICD file
; Delete if already there |
|
| TEST | ||
| ADD7985(RORFDA,RORIEN,RORREG) | ; Adds procedures to the entries in the files
|
|
| ICDPROC | ; Registry name^PTF ICD Procedure codes, separated by commas^PTF CPT codes, separated by commas^ ICD DIAGNOSIS codes
|
|
| UPDLIST | ||
| LISTITEM | ; --- Entries to add to ROR LIST ITEM file (#799.1) text^group^code
|
| Name | Field # of Occurrence |
|---|---|
| OPTION^%ZTLOAD | PRE+16, PRE+33 |
| STAT^%ZTLOAD | PRE+18, PRE+36 |
| BLD^DIALOG | POSQ3+3, POSQ4+6 |
| ^DIC | GENDRG+9, UPDPROC+3 |
| UPDATE^DIE | POST+43, UPDPANEL+14, ADD7985+2, UPDLIST+12 |
| ^DIK | GENDRG+11, UPDPROC+4 |
| CLEAN^DILF | POST+61, TEST+1 |
| $$GET1^DIQ | PRE+57 |
| ^DIR | PRE+61 |
| DBS^RORERR | POST+47, UPDPANEL+17, ADD7985+6 |
| $$MSG^RORERR20 | PRE+23, PRE+42 |
| FINDPEND^RORP035A | POST+23 |
| ^RORSET02 | POST+56 |
| XTMPHDR^RORUTL01 | PRE+52 |
| $$REGIEN^RORUTL02 | PRE+54, POST+30, UPDLIST+3 |
| EN^RORUTL22 | POST+59 |
| TASK^RORUTL22 | POST+60 |
| $$FMADD^XLFDT | POSQ5+4 |
| $$FMTE^XLFDT | POSQ5+9 |
| $$NOW^XLFDT | POSQ5+4 |
| BMES^XPDUTL | PRE+3, PRE+7, PRE+8, PRE+9, PRE+10, PRE+14, PRE+23, PRE+24, PRE+31, PRE+42 , PRE+43, PRE+62, POST+4, POST+14, POST+16, POST+18, POST+20, POST+22, POST+24, POST+26 , POST+58, POST+59, POST+60, POST+62, GENDRG+12, UPDPANEL+10 |
| MES^XPDUTL | PRE+29, PRE+48, POST+36, POST+55, UPDPANEL+25, ADD7985+14, UPDLIST+22 |
| OWNSKEY^XUSRB | PRE+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ROR(798.1 - [#798.1] | GET1^DIQ |
| ^ROR(798.5 - [#798.5] | Classic Fileman Calls |
| ^ROR(799.51 - [#799.51] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ROR(798.1 - [#798.1] | UPDPROC+9 |
| ^ROR(799.1 - [#799.1] | UPDLIST+6 |
| ^ROR(799.34 - [#799.34] | UPDPANEL+6, UPDPANEL+7, UPDPANEL+20 |
| ^XTMP("ROR_NO_INIT" | PRE+51!, PRE+62!, PRE+63*, POST+32, POST+56, POST+57! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CT | POST+1~, POST+27~, POST+53*, POST+54*, UPDPANEL+5~, UPDPANEL+23*, UPDPANEL+24*, UPDPROC+2~, UPDPROC+11*, UPDPROC+17* , UPDPROC+20*, UPDPROC+23*, ADD7985+4~, ADD7985+12*, ADD7985+13*, UPDLIST+1~, UPDLIST+20*, UPDLIST+21* |
| DA | GENDRG+6~, GENDRG+11*, UPDPROC+2~, UPDPROC+4* |
| DIC | GENDRG+6~, GENDRG+7*, UPDPROC+3* |
| DIC(0 | GENDRG+7*, UPDPROC+3* |
| DIERR | POST+27~, POST+44, UPDPANEL+5~, UPDPANEL+15, ADD7985+1~, ADD7985+3, UPDLIST+1~, UPDLIST+7!, UPDLIST+13 |
| DIK | GENDRG+6~, GENDRG+11*, UPDPROC+2~, UPDPROC+4* |
| DIR | PRE+50~, PRE+61!, POSQ3~, POSQ3+1!, POSQ3+2, POSQ4~, POSQ4+1!, POSQ4+2, POSQ5~, POSQ5+1 |
| DIR("A" | PRE+59*, PRE+60*, POSQ4+3* |
| DIR("B" | PRE+60*, POSQ5+9* |
| DIR(0 | PRE+59*, POSQ4+5*, POSQ5+8* |
| DUZ | PRE+4 |
| I1 | UPDPROC+2~, UPDPROC+17*, UPDPROC+20*, UPDPROC+23* |
| RC | PRE+12~, PRE+15*, PRE+17*, PRE+21, PRE+23, PRE+32*, PRE+35*, PRE+40, PRE+42 |
| REGIEN | PRE+50~, PRE+54*, PRE+55, PRE+57, PRE+59, PRE+63, POST+1~, POST+30*, POST+31, POST+32 , POST+33, POST+40, POST+41, POST+42, POST+47, POST+50, UPDLIST+1~, UPDLIST+3*, UPDLIST+4, UPDLIST+6 , UPDLIST+10, UPDLIST+15 |
| RORBUF | PRE+12~, PRE+16, PRE+17, PRE+19, PRE+32!, PRE+33, PRE+35, PRE+38 |
| RORDATA | UPDPROC+2~, UPDPROC+5*, UPDPROC+6, UPDPROC+15, UPDPROC+16, UPDPROC+18, UPDPROC+19, UPDPROC+21, UPDPROC+22, UPDLIST+1~ , UPDLIST+5*, UPDLIST+6, UPDLIST+8, UPDLIST+9, UPDLIST+11, UPDLIST+17 |
| ROREDT | POSQ5+2~, POSQ5+4*, POSQ5+6*, POSQ5+8, POSQ5+9 |
| RORERR | POST+27~, POST+36, POST+37!, POST+39!, POST+45!, POST+46*, POST+48, POST+49!, POST+55, UPDPANEL+5~ , UPDPANEL+16!, UPDPANEL+18, UPDPANEL+19!, UPDPANEL+25, ADD7985+4~, ADD7985+5*, ADD7985+7, ADD7985+8!, ADD7985+14, UPDLIST+1~ , UPDLIST+7!, UPDLIST+14!, UPDLIST+22 |
| RORERR( | POST+53*, POST+54*, UPDPANEL+23*, UPDPANEL+24*, ADD7985+12*, ADD7985+13*, UPDLIST+20*, UPDLIST+21* |
| RORERR(1 | POST+33*, POST+50*, UPDPANEL+20*, ADD7985+9*, UPDLIST+15* |
| RORERR(2 | POST+34*, POST+51*, UPDPANEL+21*, ADD7985+10*, UPDLIST+16* |
| RORERR(3 | POST+35*, POST+52*, UPDPANEL+22*, ADD7985+11*, UPDLIST+17* |
| RORERR(4 | UPDLIST+18* |
| RORERR(5 | UPDLIST+19* |
| RORFDA | POST+39!, UPDPANEL+5~, UPDPANEL+8!, UPDPANEL+13, UPDPROC+2~, UPDPROC+9, TEST, ADD7985~, UPDLIST+1~, UPDLIST+7! |
| RORFDA( | POST+40*, POST+41*, POST+42*, UPDPANEL+12*, UPDPROC+17*, UPDPROC+20*, UPDPROC+23*, UPDLIST+8*, UPDLIST+9*, UPDLIST+10* , UPDLIST+11* |
| RORFDA1 | UPDPROC+2~, UPDPROC+10!, UPDPROC+12, UPDPROC+14! |
| RORFDA1( | UPDPROC+11* |
| RORI | PRE+50~, PRE+53*, POST+1~, POST+29*, UPDPROC+2~, UPDPROC+3*, UPDPROC+5*, UPDLIST+1~, UPDLIST+2* |
| RORI1 | UPDLIST+1~, UPDLIST+5* |
| RORIEN | UPDPROC+2~, UPDPROC+9, UPDPROC+11*, UPDPROC+12, UPDPROC+14!*, UPDPROC+17, UPDPROC+20, UPDPROC+23, TEST, ADD7985~ |
| RORIEN( | UPDPROC+13 |
| RORIEN(0 | UPDPROC+13 |
| RORKEYOK | PRE+2~, PRE+4 |
| RORKEYOK(0 | PRE+5 |
| RORKIDS | POST+27~, POST+28* |
| RORMES | PRE+12~, PRE+22!, PRE+29, PRE+41!, PRE+48 |
| RORMES(1 | PRE+25*, PRE+44* |
| RORMES(2 | PRE+26*, PRE+45* |
| RORMES(3 | PRE+27*, PRE+46* |
| RORMES(4 | PRE+28*, PRE+47* |
| RORMSG | POST+39!, POST+46, POST+48*, UPDPANEL+5~, UPDPANEL+8!, UPDPANEL+18*, ADD7985+1~, ADD7985+5, ADD7985+7*, UPDLIST+1~ , UPDLIST+7! |
| RORMSG("DIERR" | POST+53, UPDPANEL+23, ADD7985+12, UPDLIST+20 |
| RORNAME | GENDRG+6~, GENDRG+8*, GENDRG+9 |
| RORPAN | UPDPANEL+5~, UPDPANEL+6* |
| RORPARM | POST+2~ |
| RORPARM("DEVELOPER" | PRE+49*, POST+3* |
| RORPROC | UPDPROC+2~, UPDPROC+16*, UPDPROC+17, UPDPROC+19*, UPDPROC+20, UPDPROC+22*, UPDPROC+23 |
| RORREG | PRE+50~, PRE+53*, PRE+54, PRE+59, POST+1~, POST+29*, POST+30, POST+33, POST+50, UPDPROC+2~ , UPDPROC+6*, UPDPROC+7, UPDPROC+11, UPDPROC+12, TEST, ADD7985~, ADD7985+6, ADD7985+9, UPDLIST+1~, UPDLIST+2* , UPDLIST+3, UPDLIST+15 |
| RORRPT | UPDPANEL+5~, UPDPANEL+6*, UPDPANEL+7, UPDPANEL+12, UPDPANEL+17, UPDPANEL+20 |
| U | PRE+53, POST+29, GENDRG+10, UPDPANEL+6, UPDPANEL+20, POSQ5+8, UPDPROC+6, UPDPROC+9, UPDPROC+15, UPDPROC+16 , UPDPROC+18, UPDPROC+19, UPDPROC+21, UPDPROC+22, UPDLIST+2, UPDLIST+6, UPDLIST+8, UPDLIST+9, UPDLIST+11 |
| X | PRE+50~, GENDRG+6~, GENDRG+9*, UPDPROC+2~, UPDPROC+3*, UPDPROC+17*, UPDPROC+20*, UPDPROC+23* |
| >> XPDABORT | PRE+6*, PRE+21*, PRE+40*, PRE+53, PRE+62* |
| >> XPDNM | PRE+23 |
| >> XPDNOQUE | ENV+1* |
| >> XPDQUES("POSQ2" | POSQ3+1, POSQ4+1 |
| Y | PRE+50~, PRE+62, PRE+63, GENDRG+6~, GENDRG+9, GENDRG+11, UPDPROC+2~, UPDPROC+3, UPDPROC+4 |
| Y(0 | GENDRG+10 |
| Z | PRE+50~, PRE+57*, PRE+58, POST+1~, POST+53*, UPDPANEL+5~, UPDPANEL+23*, UPDPROC+2~, UPDPROC+13*, UPDPROC+14 , ADD7985+4~, ADD7985+12*, UPDLIST+1~, UPDLIST+20* |
| Z1 | UPDPANEL+5~, UPDPANEL+7*, UPDPANEL+9, UPDPANEL+11, UPDPANEL+12 |
| ZTSK | PRE+12~, PRE+17*, PRE+19*, PRE+25, PRE+34*, PRE+35*, PRE+38*, PRE+44 |
| ZTSK(1 | PRE+17, PRE+35 |
