Routine: APCP20P6

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP - pre init
OPT	;add 2 new options (supplement, report)
SENDER
GETRECIP	;
PSALAB1	;
WRITEMSG	;
LAB	;
PAPLAB1	;
POST	;EP
SUBJECT

Name	Line Occurrences
Function Call: WRITE	Prompt: "Attempt to new re-export option failed.." Line Location: OPT+4
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR ZERO.",! Line Location: OPT+15
Function Call: WRITE	Prompt: !,"Sending Mailman message to holders of the"_" "_APCPKEY_" "_"security key." Line Location: SENDER+2
Function Call: WRITE	Prompt: !,"Creating ",APCPX," Taxonomy..." Line Location: PAPLAB1+1
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING ",APCPX," TAX" Line Location: PAPLAB1+5
Function Call: WRITE	Prompt: !,"Creating ",APCPX," Taxonomy..." Line Location: PSALAB1+1
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING ",APCPX," TAX" Line Location: PSALAB1+5
Routine Call	%ZIS Line Location: OPT+16
Routine Call	DIC Line Location: PAPLAB1+4 PSALAB1+4

Name	Line Occurrences (* Changed, ! Killed)
^APCPREC - [#9001005.3]	PRE+2
^ATXLAB - [#9002228]	PAPLAB1+6, PAPLAB1+8, PSALAB1+6, PSALAB1+8
^ATXLAB("B"	PAPLAB1+2, PSALAB1+2
^LAB(60 - [#60]	PAPLAB1+7, PSALAB1+7
^TMP($J	OPT+19!, SENDER+4!, WRITEMSG+1*
^XUSEC(	GETRECIP+4

Name	Field # of Occurrence
^(0	PAPLAB1+6, PSALAB1+6

Name	Field # of Occurrence
>> %	WRITEMSG+1*
>> APCPDA	PAPLAB1+2, PAPLAB1+3, PSALAB1+2, PSALAB1+3
APCPKEY	SENDER+2, SENDER+4!, GETRECIP+3*, GETRECIP+4
>> APCPTX	PAPLAB1+6, PAPLAB1+8, PAPLAB1+9, PSALAB1+6, PSALAB1+8, PSALAB1+9
>> APCPX	PRE+2, LAB+1, LAB+2, PAPLAB1+1, PAPLAB1+2, PAPLAB1+4, PAPLAB1+5, PAPLAB1+6, PAPLAB1+7, PAPLAB1+8 , PSALAB1+1, PSALAB1+2, PSALAB1+4, PSALAB1+5, PSALAB1+6, PSALAB1+7*, PSALAB1+8
>> CTR	GETRECIP+3, GETRECIP+4
DA	PRE+2, PAPLAB1+4!, PAPLAB1+9, PSALAB1+4!, PSALAB1+9*
DIADD	PAPLAB1+4!, PSALAB1+4!
DIC	PAPLAB1+4!, PSALAB1+4!
DIC(0	PAPLAB1+4, PSALAB1+4
DIFROM	OPT+18~
>> DIK	PRE+2, PAPLAB1+9, PSALAB1+9*
DLAYGO	PAPLAB1+4!, PSALAB1+4!
DT	PAPLAB1+6, PSALAB1+6
DUZ	OPT+15, SENDER+1, PAPLAB1+6, PSALAB1+6
I	PAPLAB1+4!, PSALAB1+4!
IOST	SENDER+2
U	PAPLAB1+6, PAPLAB1+8, PSALAB1+6, PSALAB1+8
X	OPT+2~, OPT+3, OPT+4, OPT+5, OPT+6, WRITEMSG+1, PAPLAB1+4, PSALAB1+4
XMDUZ	OPT+18~, SENDER*
XMSUB	OPT+18~, SUBJECT*
XMTEXT	OPT+18~, SENDER+1*
XMY	OPT+18~
XMY(	SENDER+1, GETRECIP+4
XMY(1	SENDER+1*
>> XPDDIQ("XPZ1"	APCP20P6+5*
>> XPDDIQ("XPZ2"	APCP20P6+5*
>> XPDENV	APCP20P6+5
>> Y	GETRECIP+4*, PAPLAB1+5, PAPLAB1+6, PSALAB1+5, PSALAB1+6

Name	Field # of Occurrence
$T(WRITEMSG+%	WRITEMSG+1