Routine: SD53P495

Information

SD53P495 ;ALB/RBS - ENV/POST-INSTALL FOR PATCH SD*5.3*495 ; 5/2/07 12:24pm

Call Graph

Call Graph Total: 9

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

Entry Points

Name	Comments	DBIA/ICR reference
ENV	;Environment check
POST	;Post-Install
POST1	;Set parameter value
START	;Background job entry point
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
SENDMSG(SDSTOP)	;send MailMan msg to patch installer
ADD(SDLN,SDTXT)	;add line
PROGCHK(XPDABORT)	;checks programmer variables
ISRUNING(XPDABORT)	;check if running
NOFILE	;no File
TASK	;run TaskMan
XTMP	;setup ^XTMP to control output for 90 days
UPXTMP(SDENCPTR,NODE,SDENT)	;add to ^XTMP ; Input: ; SDENCPTR - Encounter IEN ; NODE - Unique subscript ; Output: none

External References

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

Global Variables Directly Accessed

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

Label References

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

Local Variables

Legend:

>>	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~

Customize PDF page

Package: Scheduling

Routine: SD53P495

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: