Routine: LR274POA

Information

LR274POA ;DALOI/FHS - LR*5.2*274 PATCH POST INSTALL ROUTINE CONTINUED

Source file <LR274POA.m>

Package	Total	Call Graph
Kernel	4	($$FMTE,$$HTE,$$NOW)^XLFDT $$CJ^XLFSTR BMES^XPDUTL SETUP^XQALERT
Lab Service	1	SCR^LR274PO
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

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

Name	Field # of Occurrence
SCR^LR274PO	NEWLST+11, NEWLST+16
$$SITE^VASITE	MES642+2
$$FMTE^XLFDT	NEWLST+18
$$HTE^XLFDT	ALERT+3, MESLMI+3
$$NOW^XLFDT	NEWLST+18
$$CJ^XLFSTR	ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17, MESLMI+1
^XMD	NEWLST+20, MES642+5
BMES^XPDUTL	ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17, MESLMI+1
SETUP^XQALERT	ALERT+5, MESLMI+5, MESLMI+9

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

Name	Field # of Occurrence
^(0	NEWLST+8

Name	Field # of Occurrence
DIFROM	MAIL+1~, CHK642+1!
DT	MES642+2
LRCNT	NEWLST+3~, NEWLST+4, NEWLST+9, NEWLST+10, CHK642+2~, CHK642+3, CHK642+4
>> LRDBUG	CHK642+9
LRI	CHK642+2~, CHK642+10*
LRIEN	MAIL+1~, NEWLST+3~, NEWLST+7*, NEWLST+8, NEWLST+10
LRLAST64	NEWLST+5*, NEWLST+8, NEWLST+13!
LRN	MAIL+1~, NEWLST+3~, NEWLST+5, NEWLST+6, NEWLST+7
LRNX	CHK642+2~, CHK642+5, CHK642+6, CHK642+7, CHK642+8, CHK642+9
>> LRPRT	NEWLST+15
LRSC	CHK642+2~, CHK642+3*
LRSTR	NEWLST+3~, NEWLST+8, NEWLST+10, NEWLST+11
U	NEWLST+8, MES642+2
XMDUZ	MAIL+1~, NEWLST+19, CHK642+1!, MES642+4
XMSUB	MAIL+1~, NEWLST+18, CHK642+1!, MES642+2
XMTEXT	MAIL+1~, NEWLST+19, CHK642+1!, MES642+4
XMY	MAIL+1~, CHK642+1!
XMY("G.LMI"	NEWLST+19*
XMY("G.LMI@ISC-DALLAS"	MES642+3*
>> XPDNM	ALERT+3, MESLMI+3, MESLMI+7
XQA	ALERT+2~
XQA("G.LMI"	ALERT+4, MESLMI+4, MESLMI+8*
XQAMSG	ALERT+2~, ALERT+3, MESLMI+3, MESLMI+7*