Routine: PSO427PS

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Entry Point for post-install
PROT(MENU)	; ; Remove cached hidden menu
INSJOB	; ; Job the process to update the Reject file
INS	; ; Entry Point to populate the insurance company pointer in the REJECT INFO subfile
MAIL(SUCCNT)	;

FileNo	Call Tags
9002313.57902	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BPSTL("AF"	INS+16
^DIC(36 - [#36]	INS+18, INS+23, INS+24
^ORD(101 - [#101]	PROT+3, PROT+6
^PSRX - [#52]	INS+10, INS+12, INS+22
^PSRX("REJDAT"	INS+6, INS+7, INS+8
^XUTL("XQORM"	PROT+5, PROT+7!

Name	Field # of Occurrence
CNT	INS+2~, INS+4, INS+31, INS+34, MAIL+1~, MAIL+5, MAIL+6, MAIL+7, MAIL+8, MAIL+9* , MAIL+10*
DA	INS+3~, INS+28*, INS+30!
DA(1	INS+28*
DAT	INS+2~, INS+6*, INS+7, INS+8
DIE	INS+3~, INS+28*, INS+30!
DIFROM	MAIL+1~
DIROUT	INS+3~
DIRUT	INS+3~
DR	INS+3~, INS+28*, INS+30!
DTOUT	INS+3~
DUOUT	INS+3~
DUZ	MAIL+2
IEN57	INS+2~, INS+14, INS+16, INS+17
INS	INS+2~, INS+14, INS+17, INS+18, INS+21, INS+23, INS+24*, INS+26, INS+28
INSNM	INS+2~, INS+22*, INS+23, INS+24
MENU	PROT~, PROT+3
MSG	MAIL+1~
MSG(	MAIL+5, MAIL+6, MAIL+7, MAIL+8, MAIL+9, MAIL+10
PSOIEN	PROT+2~, PROT+3*, PROT+4, PROT+6
RN	INS+2~, INS+8*, INS+10, INS+12, INS+22, INS+28
RSPIEN	INS+2~, INS+12*, INS+15, INS+16
RX	INS+2~, INS+7*, INS+8, INS+10, INS+12, INS+22, INS+28
SUCCNT	MAIL~, MAIL+8
U	PROT+6
XMDUZ	MAIL+1~, MAIL+3*
XMSUB	MAIL+1~, MAIL+3*
XMTEXT	MAIL+1~, MAIL+4*
XMY	MAIL+1~
XMY(	MAIL+2*
XQORM	PROT+2~, PROT+4*, PROT+5, PROT+7
>> ZTDESC	INSJOB+7*
>> ZTDTH	INSJOB+6*
>> ZTIO	INSJOB+6*
>> ZTRTN	INSJOB+6*
>> ZTSK	INSJOB+13, INSJOB+14