Routine: APCLAL1A

Package	Total	Call Graph
Patient Care Component Reports	4	$$START1^APCLDF XTMP^APCLOSUT $$DEMO^APCLUTL ($$CLINIC,$$PRIMPROV)^APCLV
IHS Patient	1	($$AGE,$$COMMRES)^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	$$FMADD^XLFDT
Taxonomy	1	$$ICD^ATXAPI
VA Fileman	1	^DIR

Name	Comments	DBIA/ICR reference
PEXS
PREF	;now go through refusals in pcc
MPRV(E)	;
BH	;now go through BH
USR()	;EP - Return name of current user from ^VA(200.
EOP	;EP - End of page.
PVPRV(E)	;
BH1	;
HFPRV(E)	;
BPEDS
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
SPRV(E)	;
PCPTS
BMSR
PPV(V)	;
BCPTS
PEDPRV(E)	;
PPEDS
PROC1	;
BPVS
PMSRS
PHF
BHF
CPTPRV(E)	;
PPVS
PRVREF(R)	;
BHPPNAME(R)	;EP primary provider internal # from 200
PROC	;EP

Name	Field # of Occurrence
$$START1^APCLDF	PROC1+1
XTMP^APCLOSUT	PROC+4
$$DEMO^APCLUTL	PROC+7
$$CLINIC^APCLV	PROC1+6
$$PRIMPROV^APCLV	PPV+2
$$ICD^ATXAPI	PCPTS+4, BCPTS+4
$$AGE^AUPNPAT	PEXS+5, PMSRS+8, PHF+7, PPVS+6, PPEDS+7, PCPTS+6, PREF+13, BH1+12, BMSR+7, BHF+7 , BPVS+6, BPEDS+7, BCPTS+6
$$COMMRES^AUPNPAT	PROC+9, PROC+10
^DIR	EOP+7
$$VAL^XBDIQ1	PEXS+4, PEXS+5, PEXS+6, PEXS+9, PMSRS+7, PMSRS+8, PMSRS+9, PMSRS+12, PHF+4, PHF+7 , PHF+8, PHF+11, PPVS+3, PPVS+6, PPVS+7, PPVS+10, PPEDS+7, PPEDS+8, PPEDS+11, PCPTS+6 , PCPTS+7, PCPTS+10, PREF+12, PREF+13, PREF+15, BH1+9, BH1+12, BH1+13, BH1+15, BH1+16 , BMSR+6, BMSR+7, BMSR+8, BMSR+11, BHF+4, BHF+7, BHF+8, BHF+11, BPVS+3, BPVS+6 , BPVS+7, BPVS+10, BPEDS+7, BPEDS+8, BPEDS+11, BCPTS+6, BCPTS+7, BCPTS+10, SPRV+1, PRVREF+1 , MPRV+1, HFPRV+1, PVPRV+1, PEDPRV+1, CPTPRV+1
$$VALI^XBDIQ1	PROC1+8, BH1+5
$$FMADD^XLFDT	BH+2

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EOP+6
Routine Call	DIR Line Location: EOP+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHREC - [#9002011]	BH1+3, BH1+4, BH1+5, BH1+15
^AMHREC("AF"	BH+3, BH1+1
^AMHREDU - [#9002011.05]	BPEDS+2, BPEDS+3
^AMHREDU("AD"	BPEDS+1
^AMHRHF - [#9002011.08]	BHF+2, BHF+3
^AMHRHF("AD"	BHF+1
^AMHRMSR - [#9002011.12]	BMSR+2, BMSR+3
^AMHRMSR("AD"	BMSR+1
^AMHRPRO - [#9002011.01]	BPVS+2
^AMHRPRO("AD"	BPVS+1
^AMHRPROC - [#9002011.04]	BCPTS+2, BCPTS+3
^AMHRPROC("AD"	BCPTS+1
^AMHRPROV - [#9002011.02]	BHPPNAME+2
^AMHRPROV("AD"	BHPPNAME+2
^ATXAX("B"	PCPTS+4, BCPTS+4
^AUPNPAT - [#9000001]	PROC+6
^AUPNPREF - [#9000022]	PREF+2, PREF+3, PREF+4, PREF+5, PRVREF+1
^AUPNPREF("AC"	PREF+1
^AUPNVCPT - [#9000010.18]	PCPTS+2, PCPTS+3, CPTPRV+1
^AUPNVCPT("AD"	PCPTS+1
^AUPNVHF - [#9000010.23]	PHF+2, PHF+3, HFPRV+1
^AUPNVHF("AD"	PHF+1
^AUPNVMSR - [#9000010.01]	PMSRS+2, PMSRS+3, PMSRS+4, MPRV+1
^AUPNVMSR("AD"	PMSRS+1
^AUPNVPED - [#9000010.16]	PPEDS+2, PPEDS+3, PEDPRV+1
^AUPNVPED("AD"	PPEDS+1
^AUPNVPOV - [#9000010.07]	PPVS+2, PVPRV+1
^AUPNVPOV("AD"	PPVS+1
^AUPNVSIT - [#9000010]	PROC1+7, PROC1+8
^AUPNVXAM - [#9000010.13]	PEXS+1, PEXS+2, SPRV+1
^AUPNVXAM("AD"	PEXS
^AUTTEDT - [#9999999.09]	PPEDS+4, BPEDS+4
^AUTTEXAM - [#9999999.15]	PEXS+3
^AUTTMSR - [#9999999.07]	PMSRS+5, BMSR+4
^DIBT(	PROC+8
^DIC(4 - [#4]	LOC+1
^VA(200 - [#200]	BHPPNAME+2, USR+1
^XTMP("APCLAL1"	PROC+3!, PEXS+5, PEXS+6, PEXS+7, PEXS+8, PEXS+9, PEXS+10, PMSRS+8, PMSRS+9, PMSRS+10* , PMSRS+11, PMSRS+12, PMSRS+13, PHF+7, PHF+8, PHF+9, PHF+10, PHF+11, PHF+12, PPVS+6 , PPVS+7, PPVS+8, PPVS+9, PPVS+10, PPVS+11, PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10, PPEDS+11 , PPEDS+12, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9, PCPTS+10, PCPTS+11, PREF+9, PREF+13, PREF+14* , PREF+15, PREF+16, BH1+6, BH1+12, BH1+13, BH1+14, BH1+15, BH1+16, BMSR+7, BMSR+8* , BMSR+9, BMSR+10, BMSR+11, BMSR+12, BHF+7, BHF+8, BHF+9, BHF+10, BHF+11, BHF+12 , BPVS+6, BPVS+7, BPVS+8, BPVS+9, BPVS+10, BPVS+11, BPEDS+7, BPEDS+8, BPEDS+9, BPEDS+10 , BPEDS+11, BPEDS+12, BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9, BCPTS+10, BCPTS+11

Name	Line Occurrences
$$BHPPNAME	BH1+12, BMSR+7, BMSR+10, BHF+7, BHF+10, BPVS+6, BPVS+9, BPEDS+7, BPEDS+10, BCPTS+6 , BCPTS+9
$$CPTPRV	PCPTS+9
$$HFPRV	PHF+10
$$MPRV	PMSRS+11
$$PEDPRV	PPEDS+10
$$PPV	PEXS+5, PMSRS+8, PHF+7, PPVS+6, PPEDS+7, PCPTS+6
$$PRVREF	PREF+14
$$PVPRV	PPVS+9
$$SPRV	PEXS+8
BH1	BH+3
BMSR	BH1+10
PROC1	PROC+11

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PROC1+1, BHPPNAME+1~, BHPPNAME+2, PPV+1~, PPV+2*, PPV+3, PPV+4
%1	BHPPNAME+1~, BHPPNAME+2*, BHPPNAME+3
>> APCLBD	PROC1+1, PREF+8, BH+2
>> APCLBIEN	BH1+1*, BH1+3, BH1+4, BH1+5, BH1+9, BH1+12, BH1+13, BH1+14, BH1+15, BMSR+1 , BMSR+7, BMSR+8, BMSR+9, BMSR+10, BHF+1, BHF+7, BHF+8, BHF+9, BHF+10, BPVS+1 , BPVS+6, BPVS+7, BPVS+8, BPVS+9, BPEDS+1, BPEDS+7, BPEDS+8, BPEDS+9, BPEDS+10, BCPTS+1 , BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9
>> APCLCNT	PROC+1*
>> APCLCOMT	PROC+9, PROC+10
>> APCLCOMT("ONE"	PROC+9
>> APCLDATE	PROC1+5, PEXS+5, PEXS+6, PEXS+7, PEXS+8, PEXS+9, PEXS+10, PMSRS+8, PMSRS+9, PMSRS+10 , PMSRS+11, PMSRS+12, PMSRS+13, PHF+7, PHF+8, PHF+9, PHF+10, PHF+11, PHF+12, PPVS+6 , PPVS+7, PPVS+8, PPVS+9, PPVS+10, PPVS+11, PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10, PPEDS+11 , PPEDS+12, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9, PCPTS+10, PCPTS+11, PREF+5, PREF+6, PREF+7 , PREF+8, PREF+9, PREF+13, PREF+14, PREF+15, PREF+16, BH1+2*, BH1+6, BH1+12, BH1+13 , BH1+14, BH1+15, BH1+16, BMSR+7, BMSR+8, BMSR+9, BMSR+10, BMSR+11, BMSR+12, BHF+7 , BHF+8, BHF+9, BHF+10, BHF+11, BHF+12, BPVS+6, BPVS+7, BPVS+8, BPVS+9, BPVS+10 , BPVS+11, BPEDS+7, BPEDS+8, BPEDS+9, BPEDS+10, BPEDS+11, BPEDS+12, BCPTS+6, BCPTS+7, BCPTS+8 , BCPTS+9, BCPTS+10, BCPTS+11
>> APCLDEMO	PROC+7
>> APCLE	PROC1+2*, PROC1+3, PROC1+5
>> APCLED	PROC1+1, PREF+7, BH+3
>> APCLEIEN	PEXS, PEXS+1, PEXS+2, PEXS+4, PEXS+5, PEXS+8, PMSRS+1, PMSRS+2, PMSRS+3, PMSRS+4 , PMSRS+7, PMSRS+8, PMSRS+11, PHF+1, PHF+2, PHF+3, PHF+7, PHF+10, PPVS+1, PPVS+2 , PPVS+3, PPVS+6, PPVS+9, PPEDS+1, PPEDS+2, PPEDS+3, PPEDS+7, PPEDS+10, PCPTS+1, PCPTS+2 , PCPTS+3, PCPTS+6, PCPTS+9, BMSR+1, BMSR+2, BMSR+3, BMSR+6, BMSR+7, BHF+1, BHF+2 , BHF+3, BHF+7, BPVS+1, BPVS+2, BPVS+3, BPVS+6, BPEDS+1, BPEDS+2, BPEDS+3, BPEDS+7 , BCPTS+1*, BCPTS+2, BCPTS+3, BCPTS+6
>> APCLEXBH	PROC1+6, BH+1
>> APCLEXC	PREF+4
APCLG	PROC1+1!
APCLG(	PROC1+2, PROC1+3, PROC1+5
>> APCLH	PROC+2*, PROC+3, PEXS+5, PEXS+6, PEXS+7, PEXS+8, PEXS+9, PEXS+10, PMSRS+8, PMSRS+9 , PMSRS+10, PMSRS+11, PMSRS+12, PMSRS+13, PHF+7, PHF+8, PHF+9, PHF+10, PHF+11, PHF+12 , PPVS+6, PPVS+7, PPVS+8, PPVS+9, PPVS+10, PPVS+11, PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10 , PPEDS+11, PPEDS+12, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9, PCPTS+10, PCPTS+11, PREF+9, PREF+13 , PREF+14, PREF+15, PREF+16, BH1+6, BH1+12, BH1+13, BH1+14, BH1+15, BH1+16, BMSR+7 , BMSR+8, BMSR+9, BMSR+10, BMSR+11, BMSR+12, BHF+7, BHF+8, BHF+9, BHF+10, BHF+11 , BHF+12, BPVS+6, BPVS+7, BPVS+8, BPVS+9, BPVS+10, BPVS+11, BPEDS+7, BPEDS+8, BPEDS+9 , BPEDS+10, BPEDS+11, BPEDS+12, BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9, BCPTS+10, BCPTS+11
>> APCLJ	PROC+2*, PROC+3, PEXS+5, PEXS+6, PEXS+7, PEXS+8, PEXS+9, PEXS+10, PMSRS+8, PMSRS+9 , PMSRS+10, PMSRS+11, PMSRS+12, PMSRS+13, PHF+7, PHF+8, PHF+9, PHF+10, PHF+11, PHF+12 , PPVS+6, PPVS+7, PPVS+8, PPVS+9, PPVS+10, PPVS+11, PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10 , PPEDS+11, PPEDS+12, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9, PCPTS+10, PCPTS+11, PREF+9, PREF+13 , PREF+14, PREF+15, PREF+16, BH1+6, BH1+12, BH1+13, BH1+14, BH1+15, BH1+16, BMSR+7 , BMSR+8, BMSR+9, BMSR+10, BMSR+11, BMSR+12, BHF+7, BHF+8, BHF+9, BHF+10, BHF+11 , BHF+12, BPVS+6, BPVS+7, BPVS+8, BPVS+9, BPVS+10, BPVS+11, BPEDS+7, BPEDS+8, BPEDS+9 , BPEDS+10, BPEDS+11, BPEDS+12, BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9, BCPTS+10, BCPTS+11
>> APCLLOCT	PROC1+7, PROC1+8, BH1+4, BH1+5
>> APCLLOCT("ONE"	PROC1+7, BH1+4
>> APCLLOCT("SU"	PROC1+8, BH1+5
>> APCLRES	PEXS+4, PEXS+5, PMSRS+7, PMSRS+8, PHF+6, PHF+7, PPVS+5, PPVS+6, PPEDS+6, PPEDS+7 , PCPTS+5, PCPTS+6, PREF+12, PREF+13, BH1+9, BH1+10, BH1+11, BH1+12, BMSR+6, BMSR+7 , BHF+6, BHF+7, BPVS+5, BPVS+6, BPEDS+6, BPEDS+7, BCPTS+5, BCPTS+6
>> APCLRIEN	PREF+1*, PREF+2, PREF+3, PREF+4, PREF+5, PREF+12, PREF+13, PREF+14
>> APCLRPT4	PROC+7, PROC+8
>> APCLSD	BH+2, BH+3, BH1+1, BH1+2
>> APCLSEAT	PROC+8
>> APCLTAX(	PROC+10
>> APCLVIEN	PROC1+3*, PROC1+4, PROC1+6, PROC1+7, PROC1+8, PEXS, PEXS+5, PEXS+6, PEXS+7, PMSRS+1 , PMSRS+8, PMSRS+9, PMSRS+10, PHF+1, PHF+7, PHF+8, PHF+9, PPVS+1, PPVS+6, PPVS+7 , PPVS+8, PPEDS+1, PPEDS+7, PPEDS+8, PPEDS+9, PCPTS+1, PCPTS+6, PCPTS+7, PCPTS+8
>> C	PROC1+6*
>> DFN	PROC+6*, PROC+7, PROC+8, PROC+9, PROC+10, PROC1+1, PEXS+5, PEXS+6, PEXS+7, PEXS+8 , PEXS+9, PEXS+10, PMSRS+8, PMSRS+9, PMSRS+10, PMSRS+11, PMSRS+12, PMSRS+13, PHF+7, PHF+8 , PHF+9, PHF+10, PHF+11, PHF+12, PPVS+6, PPVS+7, PPVS+8, PPVS+9, PPVS+10, PPVS+11 , PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10, PPEDS+11, PPEDS+12, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9 , PCPTS+10, PCPTS+11, PREF+1, PREF+9, PREF+13, PREF+14, PREF+15, PREF+16, BH+3, BH1+1 , BH1+6, BH1+12, BH1+13, BH1+14, BH1+15, BH1+16, BMSR+7, BMSR+8, BMSR+9, BMSR+10 , BMSR+11, BMSR+12, BHF+7, BHF+8, BHF+9, BHF+10, BHF+11, BHF+12, BPVS+6, BPVS+7 , BPVS+8, BPVS+9, BPVS+10, BPVS+11, BPEDS+7, BPEDS+8, BPEDS+9, BPEDS+10, BPEDS+11, BPEDS+12 , BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9, BCPTS+10, BCPTS+11
DFOUT	EOP+5!
DIR	EOP+4~
DIR("A"	EOP+7*
DIR(0	EOP+7*
DIRUT	EOP+5!
DLOUT	EOP+5!
DTOUT	EOP+5!
DUOUT	EOP+5!
DUZ	USR+1
DUZ(2	LOC+1
E	PROC1+1*, SPRV~, SPRV+1, MPRV~, MPRV+1, HFPRV~, HFPRV+1, PVPRV~, PVPRV+1, PEDPRV~ , PEDPRV+1, CPTPRV~, CPTPRV+1
IO	EOP+2
IO("S"	EOP+3
IO(0	EOP+2
IOM	CTR+1
IOST	EOP+1
>> IOT	EOP+3
R	PEXS+2, PEXS+3, PMSRS+4, PMSRS+5, PMSRS+6, PMSRS+7, PHF+3, PHF+4, PHF+5, PHF+6 , PPVS+3, PPVS+4, PPEDS+3, PPEDS+4, PPEDS+5, PCPTS+3, PCPTS+4, BMSR+3, BMSR+4, BMSR+5 , BMSR+6, BHF+3, BHF+4, BHF+5, BHF+6, BPVS+3, BPVS+4, BPEDS+3, BPEDS+4, BPEDS+5 , BCPTS+3*, BCPTS+4, BHPPNAME~, BHPPNAME+2, PRVREF~, PRVREF+1
U	PROC1+3, PROC1+5, PROC1+7, PROC1+8, PEXS+2, PEXS+3, PEXS+5, PEXS+6, PEXS+7, PEXS+8 , PEXS+9, PEXS+10, PMSRS+3, PMSRS+4, PMSRS+5, PMSRS+8, PMSRS+9, PMSRS+10, PMSRS+11, PMSRS+12 , PMSRS+13, PHF+3, PHF+7, PHF+8, PHF+9, PHF+10, PHF+11, PHF+12, PPVS+6, PPVS+7 , PPVS+8, PPVS+9, PPVS+10, PPVS+11, PPEDS+3, PPEDS+4, PPEDS+7, PPEDS+8, PPEDS+9, PPEDS+10 , PPEDS+11, PPEDS+12, PCPTS+3, PCPTS+6, PCPTS+7, PCPTS+8, PCPTS+9, PCPTS+10, PCPTS+11, PREF+3 , PREF+4, PREF+5, PREF+13, PREF+14, PREF+15, PREF+16, BH1+4, BH1+5, BH1+12, BH1+13 , BH1+14, BH1+15, BH1+16, BMSR+3, BMSR+4, BMSR+7, BMSR+8, BMSR+9, BMSR+10, BMSR+11 , BMSR+12, BHF+3, BHF+7, BHF+8, BHF+9, BHF+10, BHF+11, BHF+12, BPVS+6, BPVS+7 , BPVS+8, BPVS+9, BPVS+10, BPVS+11, BPEDS+3, BPEDS+4, BPEDS+7, BPEDS+8, BPEDS+9, BPEDS+10 , BPEDS+11, BPEDS+12, BCPTS+3, BCPTS+6, BCPTS+7, BCPTS+8, BCPTS+9, BCPTS+10, BCPTS+11, BHPPNAME+2 , SPRV+1, PRVREF+1, USR+1, LOC+1, MPRV+1, HFPRV+1, PVPRV+1, PEDPRV+1, CPTPRV+1
V	PPV~, PPV+2
X	PROC+10*, CTR~, CTR+1
Y	CTR~, CTR+1
>> ZTQUEUED	EOP+3

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLAL1A

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: