Routine: SD53138B

Information

SD53138B ;ALB/SEK - BULLETIN FOR PATCH 138;12-JAN-1998

Source file <SD53138B.m>

Package	Total	Call Graph
VA Fileman	4	FILE^DIE $$EXTERNAL^DILFD GETS^DIQ ^DIR
Kernel	1	$$FMTE^XLFDT
MailMan	1	^XMB

Name	Comments	DBIA/ICR reference
SETLAMG(MGPTR,DELOK)	;Update value contained in the LATE ACTIVITY MAIL GROUP ; field (#217) of the MAS PARAMETERS file (#43)
OK()	;Determine if user wishes to continue
LATEBULL()	;Determine if user wishes to prevent generation of Late ACRP ; Related Activity bulletin
BULL1	;Generate/send completion bulletin for clean-up (see EN^SD53138A)
GETLAMG()	;Return pointer to and name of mail group contained in LATE ; ACTIVITY MAIL GROUP field (#217) of the MAS PARAMETERS file (#43)

FileNo	Call Tags
^DG(43 - [#43]	EXTERNAL^DILFD, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	BULL1+13!, BULL1+16, BULL1+17, BULL1+18, BULL1+21, BULL1+22, BULL1+23, BULL1+26, BULL1+27, BULL1+28 , BULL1+29, BULL1+30, BULL1+31*, BULL1+41!

Name	Field # of Occurrence
DELOK	SETLAMG~, SETLAMG+11*, SETLAMG+12
DIR	LATEBULL+9~, OK+8~
DIR("?"	LATEBULL+11, LATEBULL+12, LATEBULL+13, LATEBULL+14
DIR("A"	LATEBULL+16, OK+11
DIR("B"	LATEBULL+17, OK+12
DIR(0	LATEBULL+15, OK+10
DIROUT	LATEBULL+9~, OK+8~
DIRUT	LATEBULL+9~, LATEBULL+21, OK+8~
DTOUT	LATEBULL+9~, OK+8~
DUOUT	LATEBULL+9~, OK+8~
DUZ	BULL1+37
LINE	BULL1+11~, BULL1+14, BULL1+17, BULL1+18, BULL1+19, BULL1+22, BULL1+23, BULL1+24, BULL1+27, BULL1+28 , BULL1+29, BULL1+30, BULL1+31, BULL1+32
MGNAME	GETLAMG+8~, GETLAMG+14*, GETLAMG+16, GETLAMG+18
MGPTR	GETLAMG+8~, GETLAMG+13, GETLAMG+16, GETLAMG+18, SETLAMG~, SETLAMG+10, SETLAMG+12, SETLAMG+16, SETLAMG+18*, SETLAMG+20
NODE	BULL1+11~, BULL1+21, BULL1+22, BULL1+26, BULL1+27, BULL1+28
SD53138F	SETLAMG+14~
SD53138F(43	SETLAMG+20*
SD53138M	GETLAMG+8~, GETLAMG+11, SETLAMG+14~
SD53138T	GETLAMG+8~
SD53138T(43	GETLAMG+13, GETLAMG+14
X	LATEBULL+9~, OK+8~
XMB	BULL1+11~, BULL1+34*
XMB(1	BULL1+35*
XMDUZ	BULL1+11~, BULL1+38*
XMTEXT	BULL1+11~, BULL1+36*
XMY	BULL1+11~
XMY(	BULL1+37*
XMZ	BULL1+11~
Y	LATEBULL+9~, LATEBULL+23, OK+8~, OK+16