BLR36PST ; IHS/MSC/MKK - IHS Lab Patch LR*5.2*1036 Post Routine ; 28-Jul-2015 06:30 ; MKK
Source file <BLR36PST.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 6 | ENDR^%ZISS (FRAME,IOXY,PREP)^XGF ($$DT,$$HTE,$$NOW)^XLFDT ($$CJ,$$UP)^XLFSTR ($$ADD,$$LKOPT)^XPDMENU (BMES,MES)^XPDUTL | 
| IHS Changes To Lab | 3 | (EEP,PRESSKEY)^BLRGMENU (ENVICHEK,PRE)^BLRPRE35 MAILALMI^BLRUTIL3 | 
| VA Fileman | 3 | $$FIND1^DIC $$GET1^DIQ ^DIR | 
| IHS VA Utilities | 1 | ^XBFMK | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ENDINSTL(CURPATCH) | ; EP - End Installation | |
| NEWOPT(MENU,NEWOPTN,NEWSYNM,NEWORD) | ; EP - Add Option to a Menu | |
| WOTCNT(BLRVERN) | ; EP - Counter for ^XTMP | |
| POSTDBG | ; EP - POST INSTALL for DEBUG | |
| POSTIT(CP,MSG,BL) | ; EP - Write the MSG string and store into the INSTALL file | |
| PEP | ; EP | |
| EEP | ; EP - Ersatz EP | |
| ADDNOPTS | ||
| WARMFZZY(ORDCNT) | ; EP - "Warm Fuzzy" for user | |
| INITSCR | ; EP - Initialize screen. Cloned from INIT^XPDID | |
| MESCNTR(STR) | ; EP - Center a line and use XPDUTL to display it | |
| BLANK | ; EP - Blank Line | |
| DEBUG | ; EP - Debugging Line Label for environment checker | |
| POST | ; EP - POST INSTALL | |
| POSTMAIL(BLRVERN,CPSTR) | ; EP - Post Install MailMan Message | |
| SETEVARS | ; EP - SET standard "Enviroment" VARiables. | 
| Name | Field # of Occurrence | 
|---|---|
| ENDR^%ZISS | INITSCR+6 | 
| EEP^BLRGMENU | EEP+1 | 
| PRESSKEY^BLRGMENU | DEBUG+27 | 
| ENVICHEK^BLRPRE35 | DEBUG+26 | 
| PRE^BLRPRE35 | DEBUG+31 | 
| MAILALMI^BLRUTIL3 | POSTMAIL+12 | 
| $$FIND1^DIC | NEWOPT+6 | 
| $$GET1^DIQ | ENDINSTL+5 | 
| ^DIR | DEBUG+38 | 
| ^XBFMK | DEBUG+34 | 
| FRAME^XGF | INITSCR+9 | 
| IOXY^XGF | INITSCR+11 | 
| PREP^XGF | INITSCR+3, INITSCR+4 | 
| $$DT^XLFDT | POSTDBG+4, WOTCNT+3 | 
| $$HTE^XLFDT | ENDINSTL+6 | 
| $$NOW^XLFDT | POSTDBG+19 | 
| $$CJ^XLFSTR | MESCNTR+1 | 
| $$UP^XLFSTR | NEWOPT+15 | 
| $$ADD^XPDMENU | NEWOPT+10 | 
| $$LKOPT^XPDMENU | NEWOPT+5 | 
| BMES^XPDUTL | POSTDBG+7, POSTDBG+13, NEWOPT+8, POSTIT+4 | 
| MES^XPDUTL | NEWOPT+12, NEWOPT+14, NEWOPT+15, BLANK+1, MESCNTR+1, POSTIT+5 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| 19.01 | FIND1^DIC | 
| ^VA(200 - [#200] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^BLRINSTL("LAB PATCH" | ENDINSTL+3, ENDINSTL+5*, ENDINSTL+6* | 
| ^XPD(9.7 - [#9.7] | POSTIT+8, POSTIT+10, POSTIT+11*, POSTIT+12* | 
| ^XTMP( | POSTDBG+19*, WOTCNT+5, WOTCNT+6* | 
| Name | Line Occurrences | 
|---|---|
| $$WOTCNT | POSTDBG+5 | 
| ADDNOPTS | POSTDBG+9 | 
| BLANK | POSTDBG+7, POSTDBG+11, NEWOPT+12, NEWOPT+15 | 
| ENDINSTL | POSTDBG+11 | 
| NEWOPT | ADDNOPTS+5 | 
| POSTDBG | DEBUG+41 | 
| POSTMAIL | POSTDBG+17 | 
| SETEVARS | POSTDBG+2, DEBUG+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BL | POSTIT~, POSTIT+1, POSTIT+3*, POSTIT+4, POSTIT+5, POSTIT+11 | 
| BLRIEN | NEWOPT+1~, NEWOPT+5*, NEWOPT+6 | 
| BLRVERN | POSTDBG+5, POSTDBG+17, POSTDBG+19, POSTMAIL~, POSTMAIL+4, POSTMAIL+12, SETEVARS+3*, WOTCNT~, WOTCNT+5, WOTCNT+6 , DEBUG+8, DEBUG+43 | 
| CNT | WOTCNT+1~, WOTCNT+5*, WOTCNT+6, WOTCNT+7 | 
| CP | POSTDBG+11, SETEVARS+1*, SETEVARS+2, POSTIT~, POSTIT+1, POSTIT+8 | 
| CPSTR | POSTDBG+7, POSTDBG+13, POSTDBG+17, POSTMAIL~, POSTMAIL+6, POSTMAIL+12, SETEVARS+2*, DEBUG+23 | 
| CURPATCH | ENDINSTL~, ENDINSTL+3, ENDINSTL+5, ENDINSTL+6 | 
| >> DEBUG | POSTDBG+15, ADDNOPTS+1, POSTMAIL+9, DEBUG+20* | 
| >> DILOCKTM | POST+1, DEBUG+1, POSTIT+1 | 
| >> DIR("A" | DEBUG+37* | 
| >> DIR("B" | DEBUG+36* | 
| >> DIR(0 | DEBUG+35* | 
| >> DISYS | POST+1, DEBUG+1, POSTIT+1 | 
| DT | POST+1, DEBUG+1, POSTIT+1 | 
| DTIME | POST+1, DEBUG+1, POSTIT+1 | 
| DUZ | POST+1, DEBUG+1, ENDINSTL+5, POSTIT+1 | 
| >> IEN | POSTIT+8*, POSTIT+10, POSTIT+11, POSTIT+12 | 
| INSTCNT | ENDINSTL+1~, ENDINSTL+3*, ENDINSTL+5, ENDINSTL+6 | 
| IO | POST+1, INITSCR+2, DEBUG+1, POSTIT+1 | 
| IO(0 | INITSCR+2 | 
| >> IOBM | INITSCR+7* | 
| >> IOBS | POST+1, DEBUG+1, POSTIT+1 | 
| IOF | POST+1, DEBUG+1, POSTIT+1 | 
| IOM | POST+1, MESCNTR+1, INITSCR+9, DEBUG+1, POSTIT+1 | 
| ION | POST+1, DEBUG+1, POSTIT+1 | 
| >> IOS | POST+1, DEBUG+1, POSTIT+1 | 
| IOSL | POST+1, INITSCR+7, DEBUG+1, POSTIT+1 | 
| IOST | POST+1, INITSCR+2, DEBUG+1, POSTIT+1 | 
| >> IOSTBM | INITSCR+8 | 
| >> IOT | POST+1, DEBUG+1, POSTIT+1 | 
| >> IOTM | INITSCR+7*, INITSCR+9, INITSCR+11 | 
| >> IOXY | POST+1, DEBUG+1, POSTIT+1 | 
| >> LINE | POSTIT+10*, POSTIT+11*, POSTIT+12 | 
| MENU | NEWOPT~, NEWOPT+5, NEWOPT+8, NEWOPT+10, NEWOPT+12, NEWOPT+14 | 
| MSG | POSTIT~, POSTIT+1, POSTIT+4, POSTIT+5, POSTIT+12 | 
| NEWOPTN | NEWOPT~, NEWOPT+8, NEWOPT+10, NEWOPT+12, NEWOPT+14 | 
| NEWORD | NEWOPT~, NEWOPT+10 | 
| NEWSYNM | NEWOPT~, NEWOPT+6, NEWOPT+10 | 
| ORDCNT | WARMFZZY~, WARMFZZY+1*, WARMFZZY+2 | 
| >> PATCHNUM | SETEVARS+1* | 
| >> QUIET | POST+3*, DEBUG+40* | 
| STR | POSTMAIL+1~, POSTMAIL+12, MESCNTR~, MESCNTR+1 | 
| STR(1 | POSTMAIL+3* | 
| STR(2 | POSTMAIL+4* | 
| STR(3 | POSTMAIL+5* | 
| STR(4 | POSTMAIL+6* | 
| STR(5 | POSTMAIL+7* | 
| TAB | ADDNOPTS+3*, NEWOPT+1~, NEWOPT+3*, NEWOPT+12, NEWOPT+14, NEWOPT+15 | 
| TODAY | POSTDBG+4*, POSTDBG+19, WOTCNT+1~, WOTCNT+3*, WOTCNT+5, WOTCNT+6 | 
| U | POST+1, DEBUG+1, POSTIT+1 | 
| >> WOTCNT | POSTDBG+5*, POSTDBG+19 | 
| X | NEWOPT+10*, NEWOPT+12, NEWOPT+15, INITSCR+1~, INITSCR+5* | 
| >> XPARSYS | POST+1, DEBUG+1, POSTIT+1 | 
| >> XPDABORT | DEBUG+29 | 
| >> XPDENV | DEBUG+24* | 
| >> XPDIDVT | INITSCR+2*, INITSCR+3*, INITSCR+5* | 
| >> XPDNM | DEBUG+23* | 
| XPDSTR | INITSCR+1~, INITSCR+5* | 
| >> XQXFLG | POST+1, DEBUG+1, POSTIT+1 | 
| >> Y | DEBUG+41 | 
| Name | Field # of Occurrence | 
|---|---|
| $T( | SETEVARS+1, SETEVARS+3 | 
| $T(PREP^XGF | INITSCR+3 |