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 |