Routine: PSJ431P

Information

PSJ431P ;HPS/DSK - PSJ*5.0*431 PATCH POST INSTALL ROUTINE ;Apr 20, 2022@17:40

Source file <PSJ431P.m>

Package	Total	Call Graph
Kernel	2	^%ZTLOAD $$FMADD^XLFDT
MailMan	1	SENDMSG^XMXAPI

Name	Comments	DBIA/ICR reference
EN	;
START	;
XTMP	;Generate MailMan message and keep in ^XTMP for 60 days
MAIL	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PSJ5.0431 Post-Install Routine has been tasked." Line Location: EN+8
Function Call: WRITE	Prompt: !,"TASK NUMBER: ",$G(ZTSK) Line Location: EN+9
Function Call: WRITE	Prompt: !!,"The installer will receive a MailMan message" Line Location: EN+10
Function Call: WRITE	Prompt: !,"when the search completes.",! Line Location: EN+11

Name	Line Occurrences (* Changed, ! Killed)
^PS(55 - [#55]	START+9, START+14, START+15, START+18, START+19
^XTMP(	XTMP+4!, XTMP+5, XTMP+6, XTMP+7, XTMP+8, XTMP+9, XTMP+10, XTMP+11, XTMP+12, XTMP+13* , XTMP+14, XTMP+15, XTMP+17, XTMP+18, XTMP+19*
^XTMP("PSJ431 POST"	START+3!, START+4, START+5, START+6, START+7, START+17, START+21, START+23, START+24, XTMP+13 , XTMP+14

Name	Line Occurrences
MAIL	START+25
XTMP	START+25

Name	Field # of Occurrence
^(0	START+14, START+18

Name	Field # of Occurrence
DT	START+4, XTMP+5
DUZ	EN+5
PSJCOUNT	START+1~, START+8, START+10, START+13
PSJDUZ	EN+1~, EN+5*, MAIL+2, MAIL+6
PSJIVCT	START+1~, START+8, START+20, START+24, XTMP+16
PSJMIN	MAIL+1~, MAIL+6
PSJMIN("FROM"	MAIL+3*
PSJMSUB	MAIL+1~, MAIL+4*, MAIL+6
PSJMY	MAIL+1~, MAIL+6
PSJMY(	MAIL+2*
PSJPT	START+1~, START+8, START+9, START+14, START+15, START+17, START+18, START+19, START+21
PSJSUB	XTMP+1~, XTMP+2*, XTMP+4, XTMP+5, XTMP+6, XTMP+7, XTMP+8, XTMP+9, XTMP+10, XTMP+11 , XTMP+12, XTMP+13, XTMP+14, XTMP+15, XTMP+17, XTMP+18, XTMP+19
PSJTEXT	MAIL+1~, MAIL+5*, MAIL+6
PSJUDCT	START+1~, START+8, START+16, START+23, XTMP+16
>> ZTDESC	EN+3*
>> ZTDTH	EN+4*
>> ZTIO	EN+4*
>> ZTQUEUED	START+26
>> ZTREQ	START+26*
>> ZTRTN	EN+2*
>> ZTSAVE("PSJDUZ"	EN+6*
>> ZTSK	EN+9