Routine: APCLP12

Package	Total	Call Graph
VA Fileman	3	^DIC DT^DICRW IX1^DIK
Kernel	2	HOME^%ZIS $$ADD^XPDMENU
IHS VA Utilities	1	^XBFMK
MailMan	1	^XMD
Patient Care Component Reports	1	POST^APCLCART

Package

Total

Call Graph

^DIC DT^DICRW IX1^DIK

HOME^%ZIS $$ADD^XPDMENU

^XMD

POST^APCLCART

Name	Comments	DBIA/ICR reference
OPT	;add 2 new options (supplement, report)
WRITEMSG	;
DMADA	;
SENDER
GETRECIP	;
ADA	;
POST	;EP
TX1
SUBJECT

Name	Line Occurrences
Function Call: WRITE	Prompt: "Attempt to new provider practice description report failed.." Line Location: OPT+3
Function Call: WRITE	Prompt: "Attempt to new california state report report failed.." Line Location: OPT+5
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR ZERO.",! Line Location: OPT+16
Function Call: WRITE	Prompt: !,"Sending Mailman message to holders of the"_" "_APCLKEY_" "_"security key." Line Location: SENDER+2
Function Call: WRITE	Prompt: !,"Updating APCH ADA Codes Taxonomy..." Line Location: DMADA+2
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING APCH DM ADA EXAMS TAXONOMY" Line Location: DMADA+5
Routine Call	%ZIS Line Location: OPT+17
Routine Call	DIC Line Location: DMADA+5 TX1

FileNo	Call Tags
^ATXAX - [#9002226]	Classic Fileman Calls
^AUTTADA - [#9999999.31]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	DMADA+6, TX1+1, TX1+2, TX1+3
^ATXAX("B"	DMADA+3
^TMP($J	OPT+20!, SENDER+4!, WRITEMSG+1*
^XUSEC(	GETRECIP+4

Name	Field # of Occurrence
^(0	DMADA+6, TX1+3

Name	Field # of Occurrence
>> %	WRITEMSG+1*
APCLDA	TX1+6!
APCLKEY	SENDER+2, SENDER+4!, GETRECIP+3*, GETRECIP+4
>> APCLL	TX1+2, TX1+3
APCLTEXT	TX1*, TX1+6!
APCLTX	DMADA+3, DMADA+4, DMADA+6, TX1+1, TX1+2, TX1+3, TX1+5, TX1+6!
>> APCLX	TX1*
>> APCLY	TX1+2*
ATXFLG	DMADA+1*, TX1+6!
>> CTR	GETRECIP+3, GETRECIP+4
D0	TX1!
D1	TX1!
DA	DMADA+5!, TX1!, TX1+5*
DI	TX1!
DIADD	DMADA+5*!, TX1!
DIC	DMADA+5!, TX1!
DIC(0	DMADA+5, TX1
DIFROM	OPT+19~
>> DIK	TX1+5*
DLAYGO	DMADA+5*!, TX1!
DQ	TX1!
DR	TX1!
DT	DMADA+6
DUZ	OPT+16, SENDER+1, DMADA+6
I	DMADA+5!
IOST	SENDER+2
U	DMADA+6, TX1, TX1+3
X	OPT+1~, OPT+2, OPT+3, OPT+4, OPT+5, WRITEMSG+1, DMADA+5, TX1*
XMDUZ	OPT+19~, SENDER*
XMSUB	OPT+19~, SUBJECT*
XMTEXT	OPT+19~, SENDER+1*
XMY	OPT+19~
XMY(	SENDER+1, GETRECIP+4
XMY(1	SENDER+1*
>> XPDDIQ("XPZ1"	APCLP12+5*
>> XPDDIQ("XPZ2"	APCLP12+5*
>> XPDENV	APCLP12+5
>> Y	GETRECIP+4, DMADA+5, DMADA+6, TX1, TX1+1, TX1+3

Information