Routine: APCLD997

Package	Total	Call Graph
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV,$$PRIMPROV)^APCLV
DRG Grouper	1	$$ICDDX^ICDCODE
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Taxonomy	1	$$ICD^ATXCHK
VA Fileman	1	^%DT

Package	Total	Caller Graph
Patient Care Component Reports	5	APCLD990 APCLD994 APCLD995 APCLD996 APCLD998

Name	Comments	DBIA/ICR reference
DIETEDUC(P,BDATE,EDATE)
EXEDUC(P,BDATE,EDATE)	;EP
LASTDMDX(P,D)	;EP - last pcc dm dx
REFR(V)	;
DNKA(V)	;is this a DNKA visit?
CMSFDX(P,R,T)	;EP - return date/dx of dm in register
BPS(P,BDATE,EDATE,F)	;EP ;
LASTWT(P,EDATE,F)	;PEP - return last wt
PLDMDXS(P)	;EP - get all DM dxs from problem list
OTHEDUC(P,BDATE,EDATE)	;EP
DFE(P,BDATE,EDATE)	;EP
LASTHT(P,EDATE,F)	;PEP - return last ht and date
CESS(P,B,D)	;EP - find any cessation hf in 12 months before E
PLDMDOO(P,F)	;EP
REFUSAL(P,F,I,B,E)	;EP
EYE(P,BDATE,EDATE)	;EP
FRSTDMDX(P,F)	;EP return date of first dm dx
DENTAL(P,BDATE,EDATE)	;EP
HTNDX(P,EDATE)	;EP - is HTN on problem list

Name	Field # of Occurrence
^%DT	DIETEDUC+4, DIETEDUC+5, REFUSAL+6, REFUSAL+7
$$START1^APCLDF	DIETEDUC+20, EXEDUC+2, OTHEDUC+2, DFE+1, DFE+5, EYE+1, EYE+3, DENTAL+4, DENTAL+8, BPS+5 , HTNDX+5, HTNDX+8, LASTHT+5, LASTWT+5, FRSTDMDX+5, LASTDMDX+4, LASTDMDX+6, CESS+4, CESS+6
$$CLINIC^APCLV	DFE+8, EYE+6, DENTAL+9, BPS+7
$$PRIMPOV^APCLV	DNKA+2, DNKA+4, REFR+2
$$PRIMPROV^APCLV	DIETEDUC+15, DIETEDUC+16, DFE+6, EYE+4, DENTAL+11
$$ICD^ATXCHK	PLDMDOO+7, PLDMDXS+7
$$DOB^AUPNPAT	HTNDX+8, LASTHT+5, LASTWT+5, LASTDMDX+4, LASTDMDX+6
$$ICDDX^ICDCODE	PLDMDXS+7
$$VAL^XBDIQ1	CMSFDX+6
$$FMTE^XLFDT	DFE+2, EYE+2, DENTAL+6, DENTAL+9, DENTAL+11, DENTAL+12, BPS+9, HTNDX+8, LASTHT+5, LASTHT+9 , LASTWT+8, LASTWT+10, CMSFDX+5, PLDMDOO+11, FRSTDMDX+6, CESS+5, CESS+7

Name	Line Occurrences (* Changed, ! Killed)
^ACM(44 - [#9002244]	CMSFDX+4, CMSFDX+5
^ATXAX - [#9002226]	DIETEDUC+30, EXEDUC+7, OTHEDUC+7
^ATXAX("B"	DIETEDUC+28, EXEDUC+5, OTHEDUC+5, PLDMDOO+3, PLDMDXS+2
^AUPNPREF - [#9000022]	REFUSAL+8
^AUPNPREF("AA"	REFUSAL+8
^AUPNPROB - [#9000011]	PLDMDOO+6, PLDMDOO+8, PLDMDXS+5
^AUPNPROB("AC"	PLDMDOO+5, PLDMDXS+4
^AUPNVPOV - [#9000010.07]	LASTWT+10
^AUPNVPOV("AD"	DIETEDUC+12, LASTWT+8, LASTWT+9
^AUPNVPRV("AD"	DIETEDUC+13
^AUPNVSIT - [#9000010]	DIETEDUC+9, DIETEDUC+10, DIETEDUC+11
^AUPNVSIT("AA"	DIETEDUC+7, DIETEDUC+8
^AUPNVSIT("AC"	LASTHT+3
^AUTTEXAM("B"	DFE+10, EYE+8, DENTAL+13
^DPT - [#2]	HTNDX+2
^ICD9("BA"	LASTWT+4

Name	Line Occurrences
$$DNKA	DIETEDUC+14, DFE+6, DFE+8, EYE+4, EYE+6, DENTAL+9, DENTAL+11
$$REFR	EYE+4, EYE+6
$$REFUSAL	DIETEDUC+30, EXEDUC+7, OTHEDUC+7, DFE+10, EYE+8, DENTAL+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EXEDUC+1~, OTHEDUC+1~, DFE+1~, DFE+5, EYE+1~, EYE+3, DENTAL+2~, DENTAL+4, DENTAL+5, DENTAL+6 , DENTAL+8, HTNDX+3~, HTNDX+5, LASTHT+4~, LASTHT+5*, LASTWT+3~
%DT	DIETEDUC+3~, DIETEDUC+4, DIETEDUC+5, REFUSAL+6~, REFUSAL+7
APCL	DIETEDUC+3~, DIETEDUC+19!, EXEDUC+1~, OTHEDUC+1~, DFE+1~!, DFE+4!, EYE+1~!, DENTAL+2~, DENTAL+3!, DENTAL+7! , BPS+2~, BPS+4!, HTNDX+3~, HTNDX+4!, HTNDX+7!, LASTWT+3~, LASTWT+5!, FRSTDMDX+3~, LASTDMDX+2~, LASTDMDX+6! , CESS+2~, CESS+3!
APCL(	DIETEDUC+21, DFE+6, DFE+8, EYE+4, EYE+6, DENTAL+9, DENTAL+11, BPS+6, BPS+7, BPS+9 , LASTWT+6, LASTWT+7, LASTWT+8, LASTWT+10
APCL(1	EXEDUC+3, OTHEDUC+3, DFE+2, EYE+2, DENTAL+5, HTNDX+6, FRSTDMDX+5, LASTDMDX+5, LASTDMDX+7, CESS+5 , CESS+7
APCL(3	HTNDX+8
APCLARRY	LASTHT+4~, LASTWT+3~
APCLARRY(1	LASTHT+5, LASTHT+9
>> APCLBP	BPS+6*, BPS+9, BPS+10
APCLD	LASTWT+3~, LASTWT+9*, LASTWT+10
APCLDED	DIETEDUC+21~, DIETEDUC+22, DIETEDUC+23
APCLDED(	DIETEDUC+21*, DIETEDUC+24
APCLL	BPS+2~, BPS+6*, BPS+7, BPS+9
APCLLL	BPS+2~, BPS+3, BPS+6, BPS+8, BPS+9, BPS+10
APCLN	LASTWT+3~, LASTWT+6*, LASTWT+7, LASTWT+8, LASTWT+10
APCLV	BPS+2~, BPS+3, BPS+9, BPS+10*, BPS+11
APCLV221	LASTWT+4~*, LASTWT+10
APCLVRD	DIETEDUC+3~, DIETEDUC+22, DIETEDUC+23, DIETEDUC+26
APCLVRD(	DIETEDUC+15, DIETEDUC+16, DIETEDUC+24
APCLW	LASTWT+3~, LASTWT+5, LASTWT+6, LASTWT+8, LASTWT+9, LASTWT+10*, LASTWT+12
APCLX	LASTWT+3~, LASTWT+5*
APCLZ	LASTWT+3~, LASTWT+7*, LASTWT+8, LASTWT+9
B	REFUSAL~, REFUSAL+4, REFUSAL+6*, REFUSAL+8, CESS~, CESS+4, CESS+6
BD	DIETEDUC+3~, DIETEDUC+4*, DIETEDUC+7
BDATE	DIETEDUC~, DIETEDUC+4, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2, OTHEDUC+7 , DFE~, DFE+1, DFE+5, DFE+10, EYE~, EYE+1, EYE+3, EYE+8, DENTAL~, DENTAL+4 , DENTAL+8, DENTAL+13, BPS~, BPS+5
D	DIETEDUC+3~, DIETEDUC+6, DIETEDUC+7, DIETEDUC+8, DNKA+2~, DNKA+3, DNKA+5, DNKA+6, DNKA+7, REFR+2~ , REFR+3, REFUSAL+8, CMSFDX+4~, CMSFDX+5, CMSFDX+7, PLDMDOO+5~, PLDMDOO+11, PLDMDXS+4~, PLDMDXS+7*, PLDMDXS+9 , LASTDMDX~, LASTDMDX+4, LASTDMDX+6, CESS~, CESS+4
D(	PLDMDOO+8*
D(0	PLDMDOO+11
D1	CMSFDX+4~, CMSFDX+5*, CMSFDX+7
E	DIETEDUC+20, EXEDUC+1~, EXEDUC+2, OTHEDUC+1~, OTHEDUC+2, DFE+1~, DFE+5, REFUSAL~, REFUSAL+5, REFUSAL+7 , REFUSAL+8, EYE+1~, EYE+3, DENTAL+2~, DENTAL+4, DENTAL+8, BPS+2~, BPS+5, HTNDX+3~, HTNDX+5 , HTNDX+8, LASTHT+4~, LASTHT+5, LASTWT+3~, LASTWT+5, FRSTDMDX+3~, FRSTDMDX+5, LASTDMDX+2~, LASTDMDX+4, LASTDMDX+6 , CESS+2~, CESS+4, CESS+6
ED	DIETEDUC+3~, DIETEDUC+5*, DIETEDUC+6
EDATE	DIETEDUC~, DIETEDUC+5, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2, OTHEDUC+7 , DFE~, DFE+1, DFE+5, DFE+10, EYE~, EYE+1, EYE+3, EYE+8, DENTAL~, DENTAL+4 , DENTAL+8, DENTAL+13, BPS~, BPS+5, HTNDX~, HTNDX+8, LASTHT~, LASTHT+5, LASTWT~, LASTWT+5
F	REFUSAL~, REFUSAL+2, REFUSAL+8, BPS~, BPS+1, BPS+9, BPS+10, LASTHT~, LASTHT+2, LASTHT+8 , LASTWT~, LASTWT+2, LASTWT+12, PLDMDOO~, PLDMDOO+2, PLDMDOO+11, FRSTDMDX~, FRSTDMDX+2*, FRSTDMDX+6
G	DIETEDUC+3~, DIETEDUC+24~, DIETEDUC+25, DIETEDUC+27, DIETEDUC+30, DIETEDUC+31, EXEDUC+1~, EXEDUC+4, EXEDUC+7, EXEDUC+8 , OTHEDUC+4, OTHEDUC+7, OTHEDUC+8, DFE+10~, DFE+11, REFUSAL+6~, REFUSAL+8, REFUSAL+9, EYE+8~, EYE+9 , DENTAL+13~, DENTAL+14, CMSFDX+4~
H	LASTHT+4~, LASTHT+5, LASTHT+6, LASTHT+7, LASTHT+8, LASTHT+9
I	REFUSAL~, REFUSAL+3, REFUSAL+8, PLDMDOO+5~, PLDMDOO+6, PLDMDOO+7, PLDMDXS+4~, PLDMDXS+5, PLDMDXS+7
N	DNKA+2~, DNKA+4*, DNKA+5, DNKA+6, DNKA+7, REFR+2~
P	DIETEDUC~, DIETEDUC+7, DIETEDUC+8, DIETEDUC+20, DIETEDUC+30, EXEDUC~, EXEDUC+2, EXEDUC+7, OTHEDUC~, OTHEDUC+2 , OTHEDUC+7, DFE~, DFE+1, DFE+5, DFE+10, REFUSAL~, REFUSAL+1, REFUSAL+8, EYE~, EYE+1 , EYE+3, EYE+8, DENTAL~, DENTAL+1, DENTAL+4, DENTAL+8, DENTAL+13, BPS~, BPS+5, HTNDX~ , HTNDX+1, HTNDX+2, HTNDX+5, HTNDX+8, LASTHT~, LASTHT+1, LASTHT+3, LASTHT+5, LASTWT~, LASTWT+1 , LASTWT+5, CMSFDX~, CMSFDX+1, CMSFDX+4, PLDMDOO~, PLDMDOO+1, PLDMDOO+5, PLDMDXS~, PLDMDXS+1, PLDMDXS+4 , FRSTDMDX~, FRSTDMDX+1, FRSTDMDX+5, LASTDMDX~, LASTDMDX+1, LASTDMDX+4, LASTDMDX+6, CESS~, CESS+1, CESS+4 , CESS+6
R	DFE+6~, EYE+4~, EYE+6*, CMSFDX~, CMSFDX+2, CMSFDX+4
T	DIETEDUC+28~, DIETEDUC+29, DIETEDUC+30, EXEDUC+5~, EXEDUC+6, EXEDUC+7, OTHEDUC+5~, OTHEDUC+6, OTHEDUC+7, CMSFDX~ , CMSFDX+3, CMSFDX+7, PLDMDOO+3~, PLDMDOO+4, PLDMDOO+7, PLDMDXS+2~*, PLDMDXS+3, PLDMDXS+7
U	DIETEDUC+10, DIETEDUC+11, DIETEDUC+21, DIETEDUC+30, EXEDUC+7, OTHEDUC+7, DFE+2, DFE+6, DFE+8, REFUSAL+8 , EYE+2, EYE+4, EYE+6, DENTAL+5, DENTAL+9, DENTAL+11, BPS+6, BPS+7, BPS+9, LASTHT+5 , LASTHT+9, LASTWT+7, LASTWT+8, LASTWT+10, CMSFDX+4, CMSFDX+5, PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, PLDMDXS+7 , FRSTDMDX+5, CESS+5, CESS+7
V	DIETEDUC+3~, DIETEDUC+8*, DIETEDUC+9, DIETEDUC+10, DIETEDUC+11, DIETEDUC+12, DIETEDUC+13, DIETEDUC+14, DIETEDUC+15, DIETEDUC+16 , DNKA~, DNKA+1, DNKA+2, DNKA+4, REFR~, REFR+1, REFR+2
X	DIETEDUC+3~, DIETEDUC+4, DIETEDUC+5, DIETEDUC+20, DIETEDUC+21, DIETEDUC+24, DIETEDUC+30, EXEDUC+1~, EXEDUC+2, EXEDUC+7 , OTHEDUC+1~, OTHEDUC+2, OTHEDUC+7, DFE+6~, DFE+8, REFUSAL+6~, REFUSAL+7, REFUSAL+8, EYE+4~, EYE+6* , DENTAL+9~, DENTAL+11~, BPS+2~, BPS+5, HTNDX+8, LASTHT+5~, LASTWT+3~, CMSFDX+4~, CMSFDX+5, CMSFDX+6 , PLDMDOO+5~, PLDMDOO+6, PLDMDOO+8, PLDMDXS+4~, PLDMDXS+5, FRSTDMDX+3~, FRSTDMDX+5, LASTDMDX+2~, LASTDMDX+4, LASTDMDX+6 , CESS+2~, CESS+4, CESS+6
Y	DIETEDUC+3~, DIETEDUC+4, DIETEDUC+5, DFE+6~, DFE+7, DFE+8, DFE+9, REFUSAL+6~, REFUSAL+7, REFUSAL+8* , EYE+4~, EYE+5, EYE+6, EYE+7, DENTAL+9~, DENTAL+10, DENTAL+11~, DENTAL+12, CMSFDX+4~, CMSFDX+6 , CMSFDX+7, FRSTDMDX+3~, FRSTDMDX+4, FRSTDMDX+5, FRSTDMDX+6, LASTDMDX+2~, LASTDMDX+3*, LASTDMDX+4, LASTDMDX+6

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLD997

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: