SD53P495 ;ALB/RBS - ENV/POST-INSTALL FOR PATCH SD*5.3*495 ; 5/2/07 12:24pm
Source file <SD53P495.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 3 | (,$$S)^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT (BMES,MES)^XPDUTL |
VA Fileman | 2 | UPDATE^DIE GETS^DIQ |
MailMan | 1 | ^XMD |
Registration | 1 | (DEM,KVA)^VADPT |
Scheduling | 1 | $$GETOE^SDOE |
Toolkit | 1 | EN^XPAR |
Name | Comments | DBIA/ICR reference |
---|---|---|
UPXTMP(SDENCPTR,NODE,SDENT) | ;add to ^XTMP
; Input: ; SDENCPTR - Encounter IEN ; NODE - Unique subscript ; Output: none |
|
FILE(SDENCPTR,SDAIEN,SDARAY) | ;file new entry
; create #409.48 file ; Input: ; SDENCPTR - [required] O/P Encounter file pointer (#409.68) ; SDAIEN - [required] IEN of (#626140) record to convert ; SDARAY - [required] Array of Internal values of all fields ; Output: ; Function Value - returns 1 on success, 0 on failure and error msg |
|
TASK | ;run TaskMan
|
|
PROGCHK(XPDABORT) | ;checks programmer variables
|
|
POST1 | ;Set parameter value
|
|
NOFILE | ;no File
|
|
SENDMSG(SDSTOP) | ;send MailMan msg to patch installer
|
|
START | ;Background job entry point
|
|
ENV | ;Environment check
|
|
ISRUNING(XPDABORT) | ;check if running
|
|
POST | ;Post-Install
|
|
XTMP | ;setup ^XTMP to control output for 90 days
|
|
ADD(SDLN,SDTXT) | ;add line
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | TASK+6 |
$$S^%ZTLOAD | START+17 |
UPDATE^DIE | FILE+28 |
GETS^DIQ | START+28 |
$$GETOE^SDOE | START+24 |
DEM^VADPT | START+25 |
KVA^VADPT | START+45 |
$$FMADD^XLFDT | XTMP+5 |
$$FMTE^XLFDT | START+26, SENDMSG+29, SENDMSG+31, SENDMSG+33, SENDMSG+35, TASK+18 |
$$NOW^XLFDT | START+38, START+41, XTMP+5, XTMP+8 |
^XMD | SENDMSG+54 |
EN^XPAR | POST1+3 |
BMES^XPDUTL | POST1+4, PROGCHK+2, ISRUNING+2, NOFILE+1, TASK+7, TASK+11, TASK+19 |
MES^XPDUTL | POST1+6, POST1+8, POST1+9, PROGCHK+3, PROGCHK+4, PROGCHK+5, ISRUNING+3, ISRUNING+4, ISRUNING+5, NOFILE+2 , NOFILE+3, NOFILE+4, NOFILE+5, NOFILE+6, TASK+9, TASK+10, TASK+12, TASK+15, TASK+16, TASK+18 , TASK+20, TASK+21 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ANUSB(626140 | POST+3, START+14, START+18, START+20 |
^SDSC(409.48 - [#409.48] | START+23 |
^TMP("SD53P495" | SENDMSG+2!, SENDMSG+55!, ADD+3* |
^XTMP("SD53P495" | START+5, START+6, START+7, START+8, START+9, START+10, START+38*, START+41*, START+42*, START+43* , START+44*, START+45!, SENDMSG+29, SENDMSG+31, SENDMSG+33, SENDMSG+34, SENDMSG+35, SENDMSG+37, SENDMSG+38, SENDMSG+39 , SENDMSG+40, SENDMSG+41, SENDMSG+42, SENDMSG+46, SENDMSG+49, SENDMSG+50, ISRUNING+1, TASK+2, XTMP+1, XTMP+2* , XTMP+7*, XTMP+8*, XTMP+9*, UPXTMP+7* |
Name | Line Occurrences |
---|---|
$$FILE | START+32 |
ADD | SENDMSG+6, SENDMSG+7, SENDMSG+8, SENDMSG+9, SENDMSG+10, SENDMSG+11, SENDMSG+12, SENDMSG+13, SENDMSG+14, SENDMSG+15 , SENDMSG+16, SENDMSG+17, SENDMSG+18, SENDMSG+19, SENDMSG+20, SENDMSG+21, SENDMSG+22, SENDMSG+23, SENDMSG+25, SENDMSG+26 , SENDMSG+27, SENDMSG+28, SENDMSG+29, SENDMSG+31, SENDMSG+33, SENDMSG+35, SENDMSG+36, SENDMSG+37, SENDMSG+39, SENDMSG+40 , SENDMSG+41, SENDMSG+43, SENDMSG+47, SENDMSG+48, SENDMSG+51, SENDMSG+52, SENDMSG+53 |
ISRUNING | ENV+5 |
NOFILE | POST+4 |
POST1 | POST+1 |
PROGCHK | ENV+3 |
SENDMSG | START+46 |
TASK | POST+5 |
UPXTMP | START+27, START+31, START+34 |
XTMP | START+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | FILE+10~ |
DD | FILE+10~ |
DFN | START+2~, START+25*, START+26 |
DG | FILE+10~ |
DIC | FILE+10~ |
DICR | FILE+10~ |
DIE | FILE+10~ |
DIERR | FILE+10~ |
DIFROM | SENDMSG+1~ |
DO | FILE+10~ |
DR | FILE+10~ |
DT | PROGCHK+1 |
DUZ | SENDMSG+4, PROGCHK+1 |
DUZ(0 | PROGCHK+1 |
NODE | UPXTMP~, UPXTMP+6*, UPXTMP+7 |
SDAIEN | START+1~, START+12*, START+18*, START+19, START+20, START+28, START+32, FILE~, FILE+8, FILE+14* , FILE+18 |
SDANUSB | START+1~, START+16!, START+20*, START+21, START+25, START+26 |
SDARAY | START+1~, START+16!, START+32, FILE~, FILE+8 |
SDARAY( | FILE+21, FILE+23, FILE+27 |
SDARAY(626140 | FILE+18 |
SDCKCNT | START+2~, START+13*, START+17 |
SDDAYS | POST1+1~, POST1+2*, POST1+3, POST1+6 |
SDENCPTR | START+2~, START+10*, START+12*, START+14*, START+15, START+18, START+23, START+24, START+27, START+31 , START+32, START+34, FILE~, FILE+8, FILE+12, UPXTMP~, UPXTMP+5, UPXTMP+7 |
SDENT | START+2~, START+16!, START+26*, START+27, START+30*, START+31, SENDMSG+44~, SENDMSG+50*, SENDMSG+51, UPXTMP~ , UPXTMP+7 |
SDERAY | START+1~, START+16!, START+29 |
SDERAY("DIERR" | START+30 |
SDERR | POST1+1~, POST1+3, POST1+5, FILE+9~, FILE+29 |
SDERR("DIERR" | FILE+29 |
SDFDA | FILE+9~ |
SDFDA( | FILE+18*, FILE+19*, FILE+27* |
SDFDAIEN | START+1~, FILE+9~ |
SDFDAIEN(1 | FILE+12* |
SDFIL | START+2~, START+32*, START+33, START+34 |
SDFLD | FILE+9~, FILE+17*, FILE+18, FILE+25*, FILE+27 |
SDI | FILE+9~, FILE+16*, FILE+17, FILE+25* |
SDIEN | SENDMSG+44~, SENDMSG+45*, SENDMSG+49*, SENDMSG+50, SENDMSG+51 |
SDIENS | FILE+9~, FILE+14*, FILE+18, FILE+19, FILE+22*, FILE+26*, FILE+27 |
SDLN | SENDMSG+1~, SENDMSG+5*, SENDMSG+6, SENDMSG+7, SENDMSG+8, SENDMSG+9, SENDMSG+10, SENDMSG+11, SENDMSG+12, SENDMSG+13 , SENDMSG+14, SENDMSG+15, SENDMSG+16, SENDMSG+17, SENDMSG+18, SENDMSG+19, SENDMSG+20, SENDMSG+21, SENDMSG+22, SENDMSG+23 , SENDMSG+25, SENDMSG+26, SENDMSG+27, SENDMSG+28, SENDMSG+29, SENDMSG+31, SENDMSG+33, SENDMSG+35, SENDMSG+36, SENDMSG+37 , SENDMSG+39, SENDMSG+40, SENDMSG+41, SENDMSG+43, SENDMSG+47, SENDMSG+48, SENDMSG+51, SENDMSG+52, SENDMSG+53, ADD~ , ADD+2*, ADD+3 |
SDMSG | SENDMSG+1~ |
SDNUM | FILE+9~, FILE+22*, FILE+24*, FILE+26 |
SDPARM | POST1+1~, POST1+2*, POST1+3, POST1+6, POST1+8 |
SDSAVE | START+1~, START+10*, START+12*, START+15*, START+42 |
SDSTOP | START+2~, START+13*, START+14, START+17*, START+37, START+46, SENDMSG~, SENDMSG+23, SENDMSG+24, SENDMSG+30 , TASK+1~, TASK+2*, TASK+15, TASK+17, TASK+18 |
SDSTR | FILE+9~, FILE+15*, FILE+17 |
SDSTR1 | FILE+9~, FILE+22*, FILE+25 |
SDSUB | FILE+9~, FILE+22*, FILE+23*, FILE+27, SENDMSG+44~, SENDMSG+45*, SENDMSG+46*, SENDMSG+47, SENDMSG+49, SENDMSG+50 |
SDTOT | START+2~, START+6*, START+12*, START+17, START+22*, START+43 |
SDTOT1 | START+2~, START+7*, START+12*, START+36*, START+43 |
SDTOT2 | START+2~, START+8*, START+12*, START+27*, START+31*, START+34*, START+44 |
SDTOT3 | START+2~, START+9*, START+12*, START+23*, START+44 |
SDTXT | SENDMSG+1~, ADD~, ADD+1, ADD+3 |
SDX | START+1~, XTMP+4~, XTMP+5*, XTMP+6*, XTMP+7 |
U | START+25, START+26, FILE+17, FILE+25, PROGCHK+1, XTMP+5 |
>> VADM(1 | START+25 |
XMDUN | SENDMSG+1~ |
XMDUZ | SENDMSG+1~, SENDMSG+4* |
XMSUB | SENDMSG+1~, SENDMSG+3* |
XMTEXT | SENDMSG+1~, SENDMSG+4* |
XMY | SENDMSG+1~ |
XMY( | SENDMSG+4* |
XMZ | SENDMSG+1~ |
XPDABORT | ENV+1*, ENV+3, ENV+5, ENV+6!, PROGCHK~, PROGCHK+6*, ISRUNING~, ISRUNING+6* |
ZTDESC | TASK+1~, TASK+4* |
ZTDTH | TASK+1~, TASK+5* |
ZTIO | TASK+1~, TASK+5* |
ZTREQ | TASK+1~, TASK+5* |
ZTRTN | TASK+1~, TASK+3* |
ZTSAVE | TASK+1~ |
ZTSAVE("ZTREQ" | TASK+5* |
ZTSK | TASK+1~, TASK+8, TASK+15 |
ZTSTOP | START+39*, TASK+1~ |