Routine: APCH2P16

Package	Total	Call Graph
Kernel	3	$$CJ^XLFSTR $$ADD^XPDMENU MES^XPDUTL
Patient Care Component	2	^APCHBU16 ^APCHP16
VA Fileman	2	(,IX)^DIC ^DIE

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".
TAX	;
CAT	;;
SORRY(X)	;
BUL	;
TAXREAD	;
POST	;EP

External References

Name	Field # of Occurrence
^APCHBU16	BUL+1
^APCHP16	POST+5
^DIC	INSTALLD+9, INSTALLD+12, POST+12, POST+17, TAXREAD+14
IX^DIC	INSTALLD+6
^DIE	PRE+3, PRE+6, PRE+9, PRE+12, PRE+15, POST+19
$$CJ^XLFSTR	IMES+1, SORRY+4
$$ADD^XPDMENU	POST+1, POST+3
MES^XPDUTL	IMES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Function Call: WRITE	Prompt: "Attempt to add MAJOR CPT taxonomy option failed." Line Location: POST+2
Function Call: WRITE	Prompt: "Attempt to add Minor CPT taxonomy option failed." Line Location: POST+4
Function Call: WRITE	Prompt: !!,"could not update status on ",X," hmr" Line Location: POST+13
Function Call: WRITE	Prompt: !,"category not updated. ",X Line Location: POST+20
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
Routine Call	DIE Line Location: PRE+3 PRE+6 PRE+9 PRE+12 PRE+15 POST+19
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12 POST+12 POST+17 TAXREAD+14
Routine Call	DIC Line Location: INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^APCHHMC - [#9001016.1]	Classic Fileman Calls
^APCHSURV - [#9001018]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCHHMC("B"	PRE+2
^APCHSURV - [#9001018]	PRE+18, POST+14*
^APCHSURV("B"	PRE+5, PRE+8, PRE+11, PRE+14
^APCHTMP("HMR STATUS"	PRE+17!, PRE+18*, POST+11, POST+12
^ATXAX - [#9002226]	POST+7, POST+9, TAXREAD+5, TAXREAD+6, TAXREAD+15, SET+1, SET+2, SET+4*
^ATXAX("B"	POST+5, POST+6, POST+8, TAXREAD+3
^DD(9002226	TAXREAD+13
^DIC(9.4 - [#9.4]	TAXREAD+11

Label References

Name	Line Occurrences
$$INSTALLD	APCH2P16+8
IMES	INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY	APCH2P16+8
TAXREAD	POST+22

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCH1	POST+16*, POST+17, POST+19
>> APCHDA	TAXREAD+3*, TAXREAD+4, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15
>> APCHDATA	TAXREAD+2*, TAXREAD+3, TAXREAD+5, TAXREAD+6, TAXREAD+9
>> APCHN	TAXREAD+10*
>> APCHP	TAXREAD+9*, TAXREAD+10
>> APCHPI	TAXREAD+11*, TAXREAD+12, TAXREAD+13
>> APCHPNSP	SET+3, SET+4
>> APCHPP	TAXREAD+10*, TAXREAD+11, TAXREAD+15
>> APCHS	POST+12*, POST+14
>> APCHST	POST+16*
APCHSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCHSX	POST+16*
>> APCHTEXT	TAXREAD+2*
>> APCHX	POST+11, POST+12, TAXREAD+2
APCHY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> ATXPNSP	TAXREAD+1*
>> D	INSTALLD+5*
DA	PRE+2, PRE+3, PRE+4!, PRE+5, PRE+6, PRE+7!, PRE+8, PRE+9, PRE+10!, PRE+11 , PRE+12, PRE+13!, PRE+14, PRE+15, PRE+16!, POST+6, POST+7, POST+8, POST+9, POST+19! , TAXREAD+8!, TAXREAD+16!
DA(1	TAXREAD+13*
DIC	INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11, POST+12, POST+17!, TAXREAD+8!, TAXREAD+13, TAXREAD+16!
DIC("P"	TAXREAD+13*
DIC(0	INSTALLD+5, POST+12, POST+17, TAXREAD+13
DIE	PRE+3, PRE+4!, PRE+6, PRE+7!, PRE+9, PRE+10!, PRE+12, PRE+13!, PRE+15, PRE+16! , POST+19!
DIFQ	SORRY+1!
DR	PRE+3, PRE+4!, PRE+6, PRE+7!, PRE+9, PRE+10!, PRE+12, PRE+13!, PRE+15, PRE+16! , POST+19!, TAXREAD+8!
IOM	IMES+1, SORRY+4
>> L	SET+3*, SET+4
U	PRE+18, POST+7, POST+9, POST+12, POST+14, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15, SET+2 , SET+4
X	APCH2P16+7, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, SORRY~, SORRY+2, SORRY+3, PRE+18, POST+1 , POST+2, POST+3, POST+4, POST+12, POST+13, POST+17, POST+20, TAXREAD+13, TAXREAD+16!, SET+1* , SET+2, SET+4
>> XPDDIQ(	APCH2P16+7*
>> XPDDIQ("XPZ1"	APCH2P16+6*
>> XPDDIQ("XPZ2"	APCH2P16+6*
>> XPDENV	APCH2P16+6
>> XPDQUIT	SORRY+2, SORRY+3
Y	INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, POST+13, POST+14, POST+18 , POST+19, POST+20, TAXREAD+15, TAXREAD+16!, SET+2*, SET+4

Marked Items

Customize PDF page

Package: Patient Care Component

Routine: APCH2P16

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(@APCHST+APCHSX	POST+16
$T(@APCHTEXT+APCHX	TAXREAD+2