Routine: LR334POA

Package	Total	Call Graph
Kernel	2	($$FMTE,$$HTE,$$NOW)^XLFDT SETUP^XQALERT
Lab Service	2	BMES^LR334 SCR^LR334PO
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

Package

Total

Call Graph

($$FMTE,$$HTE,$$NOW)^XLFDT SETUP^XQALERT

BMES^LR334 SCR^LR334PO

^XMD

$$SITE^VASITE

Package	Total	Caller Graph
Lab Service	1	LR334PO

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
NEWLST	;Build list of added WKLD CODES
CHK642	;Looking for locally added suffix
ALERT	;
MESLMI	; Notify LIM patch is installed.
MES642	;
MAIL	;Send message to G.LMI local mail group of added 64 codes

Name	Line Occurrences (* Changed, ! Killed)
^LAB(64.2 - [#64.2]	CHK642+8
^LAM - [#64]	ALERT+6
^XTMP("LRNLT"	NEWLST+3
^XTMP("LRNLT642"	CHK642+4, CHK642+5!, CHK642+9!, CHK642+11!, MES642+1
^XTMP("LRNLT642SAVE"	CHK642+4*

Name	Field # of Occurrence
DIFROM	MAIL+1~, CHK642+1!
DT	MES642+3
LRCNT	CHK642+2~, CHK642+3, CHK642+5
>> LRDBUG	CHK642+10
LRI	CHK642+2~, CHK642+11*
LRIEN	MAIL+1~
LRLAST64	NEWLST+2!
LRN	MAIL+1~
LRNX	CHK642+2~, CHK642+6, CHK642+7, CHK642+8, CHK642+9, CHK642+10
>> LRPRT	NEWLST+4
LRSC	CHK642+2~, CHK642+3*
U	MES642+3
XMDUZ	MAIL+1~, NEWLST+8~, NEWLST+10, CHK642+1!, MES642+2~, MES642+6
XMSUB	MAIL+1~, NEWLST+8~, NEWLST+9, CHK642+1!, MES642+2~, MES642+3
XMTEST	NEWLST+8~
XMTEXT	MAIL+1~, NEWLST+10, CHK642+1!, MES642+2~, MES642+6
XMY	MAIL+1~, NEWLST+8~, CHK642+1!, MES642+2~
XMY("G.LMI"	NEWLST+10, MES642+5
XMY("STALLING.FRANK@FS.ISC-ALBANY.MED.VA.GOV"	MES642+4*
>> XPDNM	ALERT+3, MESLMI+3
XQA	ALERT+2~, MESLMI+2~
XQA("G.LMI"	ALERT+4, MESLMI+4
XQAMSG	ALERT+2~, ALERT+3, MESLMI+2~, MESLMI+3

Information