Routine: APCH2P14

Package	Total	Call Graph
VA Fileman	4	(,IX)^DIC FILE^DICN ^DIE (,IX1,IXALL)^DIK
Kernel	3	$$CJ^XLFSTR ($$ADD,$$DELETE)^XPDMENU MES^XPDUTL
Patient Care Component	2	^APCHBU14 ^APCHTX
IHS VA Utilities	1	^XBFMK

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP
IMES	;
SET	;
INSTALLD(APCHSTAL)	;EP - Determine if patch APCHSTAL was installed, where ; APCHSTAL is the name of the INSTALL. E.g "AG6.011".
LABTAX	;
SETTAXL	;
SETPROT	;
TAX	;
CLNTAX	;
CAT	;
DUPE	;
CLINICS	;;
LAB1	;
BUL	;
TAXREAD	;
POST	;EP

External References

Name	Field # of Occurrence
^APCHBU14	BUL+4
^APCHTX	POST+47
^DIC	DUPE+28, TAXREAD+14, LAB1+4, SETTAXL+14, INSTALLD+9, INSTALLD+12, CLNTAX+5
IX^DIC	INSTALLD+6
FILE^DICN	POST+17, POST+21, POST+25, POST+29, POST+33, POST+37, POST+41, SETPROT+11
^DIE	PRE+2, PRE+4, DUPE+12, DUPE+25, DUPE+30
^DIK	POST+3, DUPE+13, DUPE+26
IX1^DIK	LAB1+7, CLNTAX+11
IXALL^DIK	POST+45, POST+46
^XBFMK	POST+17, POST+18, POST+21, POST+22, POST+25, POST+26, POST+29, POST+30, POST+33, POST+34 , POST+37, POST+38, POST+41, POST+42, CLNTAX+8
$$CJ^XLFSTR	IMES+1
$$ADD^XPDMENU	POST+6, POST+8, POST+10, POST+12
$$DELETE^XPDMENU	POST+5, POST+14
MES^XPDUTL	IMES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "Attempt to add modify health summary option option failed." Line Location: POST+7
Function Call: WRITE	Prompt: "Attempt to add modify health summary option option failed." Line Location: POST+9
Function Call: WRITE	Prompt: "Attempt to add health summary site parameter option failed." Line Location: POST+11
Function Call: WRITE	Prompt: "Attempt to add health summary site parameter option failed." Line Location: POST+13
Function Call: WRITE	Prompt: "Attempt to add PATIENT health summary option failed." Line Location: POST+15
Function Call: WRITE	Prompt: !!,"adding health summary component MEDS - CHRONIC & ACUTE W/ ISSUE HISTORY failed." Line Location: POST+18
Function Call: WRITE	Prompt: !!,"adding health summary component MEDS - CHRONIC BY NAME failed." Line Location: POST+22
Function Call: WRITE	Prompt: !!,"adding health summary component MEDS - CURRENT BY NAME failed." Line Location: POST+26
Function Call: WRITE	Prompt: !!,"adding health summary component RADIOLOGY failed." Line Location: POST+30
Function Call: WRITE	Prompt: !!,"adding health summary component EDUCATIONAL ASSESSMENT failed." Line Location: POST+34
Function Call: WRITE	Prompt: !!,"adding health summary component INFANT FEEDING CHOICE PANEL failed." Line Location: POST+38
Function Call: WRITE	Prompt: !!,"adding health summary component INFANT FEEDING CHOICE PANEL failed." Line Location: POST+42
Function Call: WRITE	Prompt: !,"category not updated. ",X Line Location: DUPE+31
Function Call: WRITE	Prompt: !!,"could not update status on ",X," hmr" Line Location: DUPE+36
Function Call: WRITE	Prompt: !,$P(APCHDATA,"\|") Line Location: TAXREAD+5
Function Call: WRITE	Prompt: !,"updating package multiple for ",APCHPP," entry ",$P(^ATXAX(APCHDA,0),U)," failed" Line Location: TAXREAD+15
Function Call: WRITE	Prompt: !,Y Line Location: SET+4
Function Call: WRITE	Prompt: !,"Creating ",APCHX," Taxonomy..." Line Location: LAB1+3
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING ",APCHX," TAX" Line Location: LAB1+5
Function Call: WRITE	Prompt: !,$P(APCHDATA,"\|") Line Location: SETTAXL+5
Function Call: WRITE	Prompt: !,"updating package multiple for ",APCHPP," entry ",$P(^ATXLAB(APCHDA,0),U)," failed" Line Location: SETTAXL+15
Function Call: WRITE	Prompt: !,"Creating Clinic exclusions taxonomy..." Line Location: CLNTAX+2
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING APCH CLINIC STOP FOR PT HS TAX" Line Location: CLNTAX+6
Function Call: WRITE	Prompt: !,Y," ",X Line Location: CLNTAX+8
Routine Call	DIE Line Location: PRE+2 PRE+4 DUPE+12 DUPE+25 DUPE+30
Routine Call	DIC Line Location: DUPE+28 TAXREAD+14 LAB1+4 SETTAXL+14 INSTALLD+9 INSTALLD+12 CLNTAX+5
Routine Call	DIC Line Location: INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(19 - [#19]	Classic Fileman Calls
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^APCHSCTL - [#9001015]	Classic Fileman Calls
^APCHSCMP - [#9001016]	Classic Fileman Calls
^APCHSURV - [#9001018]	Classic Fileman Calls
^ATXAX - [#9002226]	Classic Fileman Calls
^ATXLAB - [#9002228]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCHSCMP - [#9001016]	POST+19, POST+23, POST+27, POST+31, POST+35, POST+39, POST+43, POST+44, DUPE+1, DUPE+2 , DUPE+14, DUPE+15
^APCHSCMP("B"	PRE+1, PRE+3, POST+16, POST+20, POST+24, POST+28, POST+32, POST+36, POST+40
^APCHSCTL - [#9001015]	DUPE+8, DUPE+9, DUPE+10, DUPE+21, DUPE+22, DUPE+23
^ATXAX - [#9002226]	POST+49, POST+51, POST+53, POST+55, POST+57, POST+59, POST+61, TAXREAD+5, TAXREAD+6, TAXREAD+15 , SET+1, SET+2, SET+4, CLNTAX+7, CLNTAX+9
^ATXAX("B"	POST+48, POST+50, POST+52, POST+54, POST+56, POST+58, POST+60, TAXREAD+3, CLNTAX+3
^ATXLAB - [#9002228]	LAB1+6, SETTAXL+5, SETTAXL+6*, SETTAXL+15
^ATXLAB("B"	LAB1+1, SETTAXL+3
^DD(9002226	TAXREAD+13
^DD(9002228	SETTAXL+1, SETTAXL+13
^DIC(19 - [#19]	POST+2
^DIC(40.7 - [#40.7]	CLNTAX+8
^DIC(9.4 - [#9.4]	TAXREAD+11, SETTAXL+11
^ORD(101 - [#101]	SETPROT+1, SETPROT+3, SETPROT+4, SETPROT+5

Label References

Name	Line Occurrences
CLNTAX	BUL+2
IMES	INSTALLD+7, INSTALLD+10, INSTALLD+14
SETTAXL	BUL+1

Naked Globals

Name	Field # of Occurrence
^(0	LAB1+6, CLNTAX+7, CLNTAX+9*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCH1	DUPE+9, DUPE+10, DUPE+12, DUPE+22, DUPE+23, DUPE+25, DUPE+27*, DUPE+28, DUPE+30
>> APCH2	DUPE+10, DUPE+11, DUPE+23, DUPE+24
>> APCHC	DUPE+1, DUPE+3, DUPE+4, DUPE+14, DUPE+16, DUPE+17
>> APCHDA	TAXREAD+3, TAXREAD+4, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15, LAB1+1, LAB1+2, SETTAXL+3*, SETTAXL+4 , SETTAXL+5, SETTAXL+6, SETTAXL+13, SETTAXL+15
>> APCHDATA	TAXREAD+2, TAXREAD+3, TAXREAD+5, TAXREAD+6, TAXREAD+9, SETTAXL+2, SETTAXL+3, SETTAXL+5, SETTAXL+6, SETTAXL+9
>> APCHE	SETPROT+1*, SETPROT+5, SETPROT+8, SETPROT+9
>> APCHIEN	SETPROT+4*, SETPROT+5, SETPROT+9
>> APCHITEM	SETPROT+2*, SETPROT+3, SETPROT+4
>> APCHN	TAXREAD+10, SETTAXL+10
>> APCHP	TAXREAD+9, TAXREAD+10, SETTAXL+9, SETTAXL+10
>> APCHPI	TAXREAD+11, TAXREAD+12, TAXREAD+13, SETTAXL+11, SETTAXL+12, SETTAXL+13
>> APCHPNSP	SET+3, SET+4
>> APCHPP	TAXREAD+10, TAXREAD+11, TAXREAD+15, SETTAXL+10, SETTAXL+11, SETTAXL+15
>> APCHST	DUPE+27*
APCHSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCHSX	DUPE+27*
>> APCHT	DUPE+8, DUPE+9, DUPE+10, DUPE+12, DUPE+21, DUPE+22, DUPE+23, DUPE+25
>> APCHTEXT	TAXREAD+2, SETTAXL+2
>> APCHTX	LAB1+6*, LAB1+7
>> APCHUSE	DUPE+6, DUPE+12, DUPE+19, DUPE+25
>> APCHX	DUPE+1, DUPE+2, DUPE+3, DUPE+14, DUPE+15, DUPE+16, TAXREAD+2*, LAB1+1, LAB1+3, LAB1+4 , LAB1+5, LAB1+6
APCHY	DUPE+1!, DUPE+14!, INSTALLD+3~, INSTALLD+13*, INSTALLD+15
APCHY(	DUPE+3, DUPE+16
APCHY(1	DUPE+6, DUPE+7!, DUPE+19, DUPE+20!
APCHZ	DUPE+1!, DUPE+14!
APCHZ(	DUPE+3, DUPE+7!, DUPE+11, DUPE+13, DUPE+16, DUPE+20!, DUPE+24, DUPE+26
>> ATXFLG	CLNTAX+1*
>> ATXPNSP	TAXREAD+1*
>> BGPDA	CLNTAX+3*, CLNTAX+4
>> BGPTEXT	CLNTAX+8*
>> BGPTX	CLNTAX+7*, CLNTAX+9, CLNTAX+11
>> BGPX	SETTAXL+2, CLNTAX+8, CLNTAX+9
>> D	INSTALLD+5*
D0	POST+17!, POST+21!, POST+25!, POST+29!, POST+33!, POST+37!, POST+41!
DA	PRE+1, PRE+2!, PRE+3, PRE+4!, POST+2, POST+3, POST+4!, POST+48, POST+49, POST+50* , POST+51, POST+52, POST+53, POST+54, POST+55, POST+56, POST+57, POST+58, POST+59, POST+60* , POST+61, DUPE+12, DUPE+13, DUPE+25, DUPE+26, DUPE+30!, TAXREAD+8!, TAXREAD+16!, LAB1+4!, LAB1+7 , SETTAXL+8!, SETTAXL+16!, CLNTAX+5!, CLNTAX+11*
DA(1	DUPE+12, DUPE+25, TAXREAD+13, SETPROT+9, SETTAXL+13*
DD	POST+17!, POST+21!, POST+25!, POST+29!, POST+33!, POST+37!, POST+41!, SETPROT+11!
DIADD	LAB1+4!, CLNTAX+5!, CLNTAX+8!
DIC	POST+17, POST+21, POST+25, POST+29, POST+33, POST+37, POST+41, DUPE+28!, TAXREAD+8!, TAXREAD+13* , TAXREAD+16!, SETPROT+8, LAB1+4!, SETTAXL+8!, SETTAXL+13, SETTAXL+16!, INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11 , CLNTAX+5*!
DIC("DR"	POST+17, POST+21, POST+25, POST+29, POST+33, POST+41, SETPROT+10*
DIC("P"	TAXREAD+13, SETPROT+9, SETTAXL+13*
DIC(0	POST+17, POST+21, POST+25, POST+29, POST+33, POST+37, POST+41, DUPE+28, TAXREAD+13, SETPROT+8 , LAB1+4, SETTAXL+13, INSTALLD+5, CLNTAX+5
DIE	PRE+2!, PRE+4!, DUPE+12, DUPE+25, DUPE+30*!
DIK	POST+3, POST+4!, POST+45, POST+46, DUPE+13, DUPE+26, LAB1+7, CLNTAX+11*
DLAYGO	SETPROT+8, LAB1+4!, CLNTAX+5*!, CLNTAX+8!
DO	POST+17!, POST+21!, POST+25!, POST+29!, POST+33!, POST+37!, POST+41!, SETPROT+11!
DR	PRE+2!, PRE+4!, DUPE+12, DUPE+25, DUPE+30*!, TAXREAD+8!, SETTAXL+8!
DT	LAB1+6, CLNTAX+7
DUZ	LAB1+6, CLNTAX+7
I	LAB1+4!, CLNTAX+5!
IOM	IMES+1
>> L	SET+3*, SET+4
U	POST+19, POST+23, POST+27, POST+31, POST+35, POST+39, POST+43, POST+44, POST+49, POST+51 , POST+53, POST+55, POST+57, POST+59, POST+61, DUPE+2, DUPE+10, DUPE+15, DUPE+23, TAXREAD+5 , TAXREAD+6, TAXREAD+13, TAXREAD+15, SET+2, SET+4, LAB1+6, SETTAXL+5, SETTAXL+6, SETTAXL+13, SETTAXL+15 , CLNTAX+7, CLNTAX+9
X	APCH2P14+7, POST+1~, POST+5, POST+6, POST+7, POST+8, POST+9, POST+10, POST+11, POST+12 , POST+13, POST+14, POST+17, POST+21, POST+25, POST+29, POST+33, POST+37, POST+41, DUPE+28* , DUPE+31, TAXREAD+13, TAXREAD+16!, SET+1, SET+2, SET+4, SETPROT+9, LAB1+4, SETTAXL+13, SETTAXL+16! , INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, CLNTAX+5, CLNTAX+8
>> XPDDIQ(	APCH2P14+7*
>> XPDDIQ("XPZ1"	APCH2P14+6*
>> XPDDIQ("XPZ2"	APCH2P14+6*
>> XPDENV	APCH2P14+6
Y	POST+18, POST+19, POST+22, POST+23, POST+26, POST+27, POST+30, POST+31, POST+34, POST+35 , POST+38, POST+39, POST+42, POST+43, POST+44, DUPE+29, DUPE+30, DUPE+31, TAXREAD+15, TAXREAD+16! , SET+2, SET+4, LAB1+5, LAB1+6, SETTAXL+15, SETTAXL+16!, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10 , INSTALLD+11, INSTALLD+13, IMES+1, CLNTAX+6, CLNTAX+7, CLNTAX+8, CLNTAX+9

Customize PDF page

Package: Patient Care Component

Routine: APCH2P14

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(@APCHST+APCHSX	DUPE+27
$T(@APCHTEXT+APCHX	TAXREAD+2, SETTAXL+2
$T(@BGPTEXT+BGPX	CLNTAX+8