Routine: PSONCPDP

Entry Points

Name	Comments	DBIA/ICR reference
MAIL
NCPDP	;;VISN;SITE#;SITE NAME;NCPDP#
EN	;	ICR #4304 Status: Active Usage: Private

Name

Comments

DBIA/ICR reference

MAIL

NCPDP

;;VISN;SITE#;SITE NAME;NCPDP#

EN

;

FileNo	Call Tags
^PS(59 - [#59]	Classic Fileman Calls, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(59 - [#59]	EN+7
^TMP($J	EN+3!, EN+6*, EN+12, EN+14!
^XUSEC("PSORPH"	MAIL+2

Name	Line Occurrences
MAIL	EN+15

Name	Field # of Occurrence
COUNT	MAIL+4~, MAIL+13, MAIL+16, MAIL+17
DA	EN+13*!
DIE	EN+13*!
DIFROM	MAIL+18~
DIVMAX	MAIL+4~, MAIL+13, MAIL+14, MAIL+17
DIVNAM	EN+2~, EN+9, EN+10, EN+11, EN+12, EN+13, MAIL+14, MAIL+15*, MAIL+16, MAIL+17
DR	EN+13*!
DT	EN+1*, EN+8
DUZ	MAIL+1
II	EN+2~, EN+4*
INACT	EN+2~, EN+8*
NCPDP	EN+2~, EN+4*
>> PSOCXPDA	MAIL+2*
PSODIV	EN+2~, EN+7*, EN+8, EN+9, EN+10, EN+11, EN+13
PSONAM	EN+2~, EN+4*, EN+6
PSONCP	EN+2~, EN+4, EN+5, EN+6, EN+11, EN+12*, EN+13
PSOPOP	EN+2~
PSOPOP(	EN+10, EN+11, EN+12, EN+13, MAIL+14, MAIL+15, MAIL+16, MAIL+17
PSOTEXT	MAIL+3!, MAIL+4~
PSOTEXT(	MAIL+17*
PSOTEXT(1	MAIL+5*
PSOTEXT(2	MAIL+6*
PSOTEXT(3	MAIL+7*
PSOTEXT(4	MAIL+8*
PSOTEXT(5	MAIL+9*
PSOTEXT(6	MAIL+10*
PSOTEXT(7	MAIL+11*
PSOTEXT(8	MAIL+12*
SITE	EN+2~, EN+4, EN+6, EN+10, EN+11, EN+12, EN+13, MAIL+16*, MAIL+17
>> XMDUZ	MAIL+1*
>> XMSUB	MAIL+1*
>> XMTEXT	MAIL+18*
>> XMY(	MAIL+1, MAIL+2
ZTDESC	PSONCPDP+9*!
ZTDTH	PSONCPDP+3, PSONCPDP+4, PSONCPDP+5, PSONCPDP+8*, PSONCPDP+9!
ZTIO	PSONCPDP+9*!
>> ZTQUEUED	PSONCPDP+4, PSONCPDP+10
ZTRTN	PSONCPDP+9*!
>> ZTSK	PSONCPDP+10

Name	Field # of Occurrence
$T(NCPDP+II	EN+4