Routine: AMHPCCL1

Information

AMHPCCL1 ; IHS/CMI/LAB - CONTINUATION OF AMHPCCL ; 19 Sep 2014 8:37 AM

Source Information

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
VA Fileman	4	DD^%DT FILE^DICN ^DIE $$GET1^DIQ
Mental Health Social Services	3	($$CDNARR,$$MHNARR,$$OTNARR,$$SSNARR)^AMHLEIN ($$PPINT,$$PPNAME)^AMHUTIL $$IMP^AMHUTIL2
Patient Care Component	3	^APCDALVR PLU^APCDAPRB (NAPADD,PLRADD)^APCDPL1
DRG Grouper	2	($$CODEN,$$ICDDX)^ICDCODE ($$CODEN,$$ICDDX,ICDDX)^ICDEX
IHS VA Utilities	2	$$VAL^XBDIQ1 ^XBFMK
IHS Patient	1	^AUPNPAT
MailMan	1	^XMB

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Mental Health Social Services	1	AMHPCCL
Patient Chart	1	BPC15E

Entry Points

Name	Comments	DBIA/ICR reference
DEP	;
KILL	;
MEDPROB	;
VHF	;PASS HEALTH FACTORS
REF	;enter refusal into PCC
EDUC	;education provided
POV	;create V POVS
CPT	;pass v cpt's
V2
3	;crosswalk (mask some stuff, no other)
V3
5	;
4	;
E9
E1
E2
SRA	;
EXAM	;
E8
PROVEXCP	;provider exception to the rule
AT	;create v activity time record
2	;-- pass standard narrative and code
LBULL	;
PROV	;
AHPRV(V,P)	;EP is this provider already on the visit?
VFILES	;EP Create v file entries
VMR	;PASS MEASUREMENTS

External References

Name	Field # of Occurrence
DD^%DT	LBULL+3
$$CDNARR^AMHLEIN	2+10, 5+5
$$MHNARR^AMHLEIN	2+8, 5+3
$$OTNARR^AMHLEIN	2+11, 5+6
$$SSNARR^AMHLEIN	2+9, 5+4
$$PPINT^AMHUTIL	POV+12, PROVEXCP+1
$$PPNAME^AMHUTIL	3+9, E8
$$IMP^AMHUTIL2	POV+5
^APCDALVR	PROV+15, POV+20, MEDPROB+9, AT+7, CPT+10, EDUC+18, VHF+13, VMR+8, EXAM+13, EXAM+28 , DEP+13, SRA+13
PLU^APCDAPRB	SRA+18
NAPADD^APCDPL1	SRA+26
PLRADD^APCDPL1	SRA+22
^AUPNPAT	VFILES+1
FILE^DICN	REF+6
^DIE	EDUC+21
$$GET1^DIQ	3+11
$$CODEN^ICDCODE	POV+16, POV+18, 3+5
$$ICDDX^ICDCODE	2+6, 2+7, 3+7
$$CODEN^ICDEX	POV+15, POV+17
$$ICDDX^ICDEX	2+3, 2+4, 3+8
ICDDX^ICDEX	2+2, 3+7, 3+8
$$VAL^XBDIQ1	EXAM+3, EXAM+18, DEP+3, SRA+3
^XBFMK	REF+7, REF+8
^XMB	LBULL+4

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Creating refusal entry failed...." Line Location: REF+7
Routine Call	DIE Line Location: EDUC+21

FileNo	Call Tags
^AUPNVPED - [#9000010.16]	Classic Fileman Calls
^AUPNPREF - [#9000022]	Classic Fileman Calls
^AMHRPRO - [#9002011.01]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	POV+6, POV+7, 3+1, 3+2, 3+3, 3+5, 3+9, 3+10, 3+11, 4+1 , 4+2, 5+1, 5+2
^AMHREC - [#9002011]	POV+5, AT+6, EXAM+1, EXAM+4, EXAM+16, EXAM+19, DEP+1, DEP+4, SRA+1, SRA+4 , SRA+16, SRA+18, SRA+20, SRA+22, SRA+24, SRA+26, 3+7, 3+8
^AMHREDU - [#9002011.05]	EDUC+5, EDUC+7, EDUC+10, EDUC+11, EDUC+12, EDUC+13, EDUC+14, EDUC+15, EDUC+16, EDUC+17 , EDUC+21
^AMHREDU("AD"	EDUC+1
^AMHRHF - [#9002011.08]	VHF+5, VHF+7, VHF+10, VHF+11, VHF+12
^AMHRHF("AD"	VHF+1
^AMHRMSR - [#9002011.12]	VMR+5, VMR+7
^AMHRMSR("AD"	VMR+1
^AMHRPRO - [#9002011.01]	POV+4, 3+2, 4+3
^AMHRPRO("AD"	POV+1
^AMHRPROC - [#9002011.04]	CPT+5, CPT+7, CPT+8, CPT+9
^AMHRPROC("AD"	CPT+1
^AMHRPROV - [#9002011.02]	PROV+3, PROV+6, PROV+11, PROV+14
^AMHRPROV("AD"	PROV+1
^AMHRTMDP - [#9002011.03]	MEDPROB+7
^AMHRTMDP("AD"	MEDPROB+1
^AMHSITE - [#9002013]	POV+12, PROVEXCP+1, PROVEXCP+3, 2+3, 2+4, 2+6, 2+7
^AUPNVPRV - [#9000010.06]	AHPRV+4
^AUPNVPRV("AD"	AHPRV+3
^AUTTEXAM - [#9999999.15]	REF+3
^AUTTEXAM("C"	EXAM+2, EXAM+17, DEP+2, SRA+2, REF+3
^AUTTREFT("B"	REF+1
^DD(9000010.06	PROV+6, PROV+11
^DD(9000010.16	EDUC+8, EDUC+14
^DD(9000010.23	VHF+8
^DIC(16 - [#16]	PROV+9, EDUC+8, VHF+8
^DIC(3 - [#3]	PROV+6
^DPT - [#2]	LBULL+3
^VA(200 - [#200]	PROV+9, E9

Label References

Name	Line Occurrences
$$AHPRV	PROV+3
@(	PROV+16, POV+13, POV+21, MEDPROB+10, AT+8, CPT+11, EDUC+19, VHF+14, VMR+9, EXAM+14 , PROVEXCP+6
E2	3+6
E8	PROVEXCP+2, PROVEXCP+4
E9	PROV+8, PROV+9
KILL	PROV+2, POV+3, MEDPROB+2, AT+1, CPT+2, EDUC+2, VHF+2, VMR+2, EXAM+6, EXAM+21 , DEP+6, SRA+6
LBULL	V2, V3, E1, E2, E8, E9
PROVEXCP	POV+12
REF	EXAM+5, EXAM+20, DEP+5, SRA+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	POV+17, POV+18, POV+19
A	PROV+6*!, PROV+8, PROV+9, PROV+10
AMHBN	PROV+16, POV+21, MEDPROB+10, AT+8, CPT+11, EDUC+19, VHF+14, VMR+9, EXAM+14, PROVEXCP+2 , PROVEXCP+4, 3+6, LBULL+3, LBULL+4!
>> AMHCOM	EXAM+4, EXAM+11, EXAM+19, EXAM+26, DEP+4, DEP+11, SRA+4, SRA+11, REF+5
AMHERR	3+3!, 3+6*
AMHERROR	V2, V3, E1, E2, E8, E9, LBULL+3, LBULL+4!
AMHEXCDE	EXAM+5!, EXAM+20!, DEP+5!, SRA+5!, REF+3
>> AMHGOT	POV+1, POV+2, POV+22
AMHICDP	KILL+1!, POV+15, POV+16
>> AMHIMP	POV+5*, POV+6, POV+7, POV+15, POV+16, POV+17, POV+18, 2+3, 2+4, 2+6 , 2+7, 4+1, 4+2, 5+1, 5+2
>> AMHLPCCT	POV+2, POV+13
>> AMHP	EXAM+4, EXAM+12, EXAM+19, EXAM+27, DEP+4, DEP+12, SRA+4, SRA+12
AMHPOVP	KILL+1!, POV+4*, POV+6, POV+7, 3+1, 3+2, 3+3, 3+5, 3+9, 3+10 , 3+11, 4+1, 4+2, 5+1, 5+2
>> AMHPTYPE	2+8, 2+9, 2+10, 2+11, 5+3, 5+4, 5+5, 5+6
>> AMHR	PROV+1, POV+1, POV+5, POV+12, MEDPROB+1, AT+6, CPT+1, EDUC+1, VHF+1, VMR+1 , EXAM+1, EXAM+3, EXAM+4, EXAM+16, EXAM+18, EXAM+19, DEP+1, DEP+3, DEP+4, SRA+1 , SRA+3, SRA+4, SRA+16, SRA+18, SRA+20, SRA+22, SRA+24, SRA+26, PROVEXCP+1, 3+7 , 3+8, 3+9, E8, LBULL+3
>> AMHR0	VFILES+1, PROV+13, POV+10, MEDPROB+6, AT+4, AT+5, CPT+6, EDUC+6, VHF+6, VMR+6 , EXAM+9, EXAM+24, DEP+9, SRA+9, REF+5, LBULL+3
>> AMHRES	EXAM+3, EXAM+5, EXAM+10, EXAM+18, EXAM+20, EXAM+25, DEP+3, DEP+5, DEP+10, SRA+3 , SRA+5, SRA+10, REF+5
>> AMHTID	REF+3*, REF+5
>> AMHTIDI	REF+3*, REF+5
AMHVAL	SRA+17~, SRA+18, SRA+21~, SRA+22, SRA+25~*, SRA+26
AMHVFILE	PROV+16, POV+21, MEDPROB+10, AT+8, CPT+11, EDUC+19, VHF+14, VMR+9, EXAM+14, PROVEXCP+2 , PROVEXCP+4, 3+6, E2, LBULL+3, LBULL+4!
>> AMHVSIT	PROV+3, PROV+4, POV+8, MEDPROB+3, AT+2, CPT+3, EDUC+3, VHF+3, VMR+3, EXAM+6 , EXAM+21, DEP+6, SRA+6, SRA+18, SRA+22, SRA+26
>> AMHX	PROV+1, PROV+3, PROV+6, PROV+11, PROV+14, POV+1, POV+4, MEDPROB+1, MEDPROB+7, CPT+1 , CPT+5, CPT+7, CPT+8, CPT+9, EDUC+1, EDUC+5, EDUC+7, EDUC+10, EDUC+11, EDUC+12 , EDUC+13, EDUC+14, EDUC+15, EDUC+16, EDUC+17, EDUC+21, VHF+1, VHF+5, VHF+7, VHF+10 , VHF+11, VHF+12, VMR+1*, VMR+5, VMR+7, 3+2, 3+11, 4+3
APCDAFLG	KILL+1!
APCDALVR	KILL+1!
APCDALVR("APCDADFN"	EDUC+21
APCDALVR("APCDAFLG"	PROV+16, POV+21, MEDPROB+10, AT+8, CPT+11, EDUC+19, VHF+14, VMR+9, EXAM+14
APCDALVR("APCDATMP"	PROV+5, POV+9, MEDPROB+4, AT+3, CPT+4, EDUC+4, VHF+4, VMR+4, EXAM+7, EXAM+22 , DEP+7, SRA+7
APCDALVR("APCDOVRR"	POV+11, MEDPROB+8
APCDALVR("APCDPAT"	PROV+13, POV+10, MEDPROB+6, AT+5, CPT+6, EDUC+6, VHF+6, VMR+6, EXAM+9, EXAM+24 , DEP+9, SRA+9
APCDALVR("APCDTACT"	AT+4*
APCDALVR("APCDTBC"	EDUC+15*
APCDALVR("APCDTCOM"	EDUC+16, VHF+12, EXAM+11, EXAM+26, DEP+11, SRA+11
APCDALVR("APCDTCPT"	CPT+5, EDUC+12
APCDALVR("APCDTEPR"	EXAM+12, EXAM+27, DEP+12, SRA+12
APCDALVR("APCDTEX"	EXAM+8, EXAM+23, DEP+8, SRA+8
APCDALVR("APCDTHF"	VHF+5*
APCDALVR("APCDTIG"	EDUC+10*
APCDALVR("APCDTLOU"	EDUC+13*
APCDALVR("APCDTLS"	VHF+10*
APCDALVR("APCDTM1"	CPT+7*
APCDALVR("APCDTM2"	CPT+8*
APCDALVR("APCDTMIN"	EDUC+11*
APCDALVR("APCDTNQ"	MEDPROB+7, 2+8, 2+9, 2+10, 2+11, 2+12, 3+2, 3+7, 3+8, 3+9 , 3+10, 3+11, 4+3, 5+3, 5+4, 5+5, 5+6, 5+7
APCDALVR("APCDTOBJ"	EDUC+14*
APCDALVR("APCDTPOV"	POV+12, POV+15, POV+16, POV+17, POV+18, POV+19, MEDPROB+5, 2+3, 2+4, 2+6* , 2+7, 3+1, 4+1, 4+2, 5+1, 5+2
APCDALVR("APCDTPRO"	PROV+12, EDUC+7, VHF+7*
APCDALVR("APCDTPRV"	EDUC+7*
APCDALVR("APCDTPS"	PROV+14*
APCDALVR("APCDTQTY"	VHF+11*
APCDALVR("APCDTRES"	EXAM+10, EXAM+25, DEP+10, SRA+10
APCDALVR("APCDTRTL"	EDUC+17*
APCDALVR("APCDTTOP"	EDUC+5*
APCDALVR("APCDTTSG"	AT+6*
APCDALVR("APCDTTYP"	VMR+5*
APCDALVR("APCDTUN"	CPT+9*
APCDALVR("APCDTVAL"	VMR+7*
APCDALVR("APCDVSIT"	PROV+4, POV+8, MEDPROB+3, AT+2, CPT+3, EDUC+3, VHF+3, VMR+3, EXAM+6, EXAM+21 , DEP+6, SRA+6
APCDANE	KILL+1!
APCDATMP	KILL+1!
APCDAUTO	KILL+1!
APCDCAT	KILL+1!
APCDCLN	KILL+1!
APCDLOC	KILL+1!
APCDPAT	KILL+1!
APCDTAT	KILL+1!
APCDTLOU	KILL+1!
APCDTNQ	KILL+1!
APCDTPOV	KILL+1!
APCDTPRO	KILL+1!
APCDTPRV	KILL+1!
APCDTPS	KILL+1!
APCDTTOP	KILL+1!
APCDTYPE	KILL+1!
AUPNTALK	KILL+1!
D0	REF+6!
DA	EDUC+21*!
DD	REF+6!
DIADD	REF+4!, REF+7!, REF+9!
DIC	REF+4!, REF+5*
DIC("DR"	REF+5*
DIC(0	REF+5*
DIE	EDUC+21*!
DLAYGO	REF+4!, REF+7!, REF+9!
DR	EDUC+21*!
DUZ(2	POV+12, PROVEXCP+1, PROVEXCP+3, 2+3, 2+4, 2+6, 2+7, 2+8, 2+9, 2+10 , 2+11, 5+3, 5+4, 5+5, 5+6
G	AHPRV+1~, AHPRV+2, AHPRV+3, AHPRV+4, AHPRV+6
P	AHPRV~, AHPRV+4, PROV+6*!, PROV+9
U	AHPRV+4, VFILES+1, PROV+3, PROV+6, PROV+9, PROV+11, PROV+13, PROV+14, POV+4, POV+5 , POV+6, POV+7, POV+10, MEDPROB+6, MEDPROB+7, AT+4, AT+5, AT+6, CPT+5, CPT+6 , CPT+7, CPT+8, CPT+9, EDUC+5, EDUC+6, EDUC+7, EDUC+8, EDUC+10, EDUC+11, EDUC+12 , EDUC+13, EDUC+14, EDUC+15, EDUC+16, EDUC+17, EDUC+21, VHF+5, VHF+6, VHF+7, VHF+8 , VHF+10, VHF+11, VHF+12, VMR+5, VMR+6, VMR+7, EXAM+1, EXAM+4, EXAM+9, EXAM+16 , EXAM+19, EXAM+24, DEP+1, DEP+4, DEP+9, SRA+1, SRA+4, SRA+9, SRA+16, SRA+18 , SRA+20, SRA+22, SRA+24, SRA+26, REF+3, REF+5, PROVEXCP+3, 2+3, 2+4, 2+6 , 2+7, 3+1, 3+2, 3+3, 3+5, 3+7, 3+8, 3+9, 3+10, 3+11 , 4+1, 4+2, 4+3, 5+1, 5+2, E9, LBULL+3
V	AHPRV~, AHPRV+3
>> X	PROV+6, PROV+7, PROV+10, PROV+11, PROV+12, EDUC+7, EDUC+8, EDUC+14, VHF+7, VHF+8 , REF+1, REF+2, PROVEXCP+3, PROVEXCP+4, PROVEXCP+5, PROVEXCP+6, 3+5*, E9
XMB	LBULL+1!, LBULL+3*, LBULL+4!
XMB(1	LBULL+3*
XMB(2	LBULL+3*
XMB(3	LBULL+3*
XMB(4	LBULL+3*
XMB(5	LBULL+3*
XMDUZ	LBULL+2*, LBULL+4!
Y	AHPRV+1~, AHPRV+3, AHPRV+4, VFILES+1, REF+7, PROVEXCP+1, PROVEXCP+2, PROVEXCP+3, 3+5, 3+6 , 3+7, 3+8, LBULL+3*
Z	AHPRV+1~

Customize PDF page

Package: Mental Health Social Services

Routine: AMHPCCL1

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items