Routine: APCLP813

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

Package	Total	Caller Graph
Patient Care Component Reports	4	APCLP810 APCLP814 APCLP815 APCLP816

Name	Comments	DBIA/ICR reference
PLDMDOO(P,F)	;EP
LASTWC(P,EDATE,F)	;PEP - return last ht and date
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
IFG(P,APCLRET)	;EP
LASTHT(P,EDATE,F)	;PEP - return last ht and date
IGT(P,APCLRET)	;EP
LASTDMDX(P,D)	;EP - last pcc dm dx
MS(P,APCLRET)	;EP
FRSTDMDX(P,F)	;EP return date of first dm dx
HTNDX(P,EDATE)	;EP - is HTN on problem list
ABNG(P,APCLRET)	;EP

Name	Field # of Occurrence
$$START1^APCLDF	BPS+5, HTNDX+5, HTNDX+8, LASTHT+5, LASTWC+6, LASTWT+6, FRSTDMDX+5, LASTDMDX+4, LASTDMDX+6, IFG+17 , IFG+19, IGT+17, IGT+19, MS+17, MS+19, ABNG+16, ABNG+18
$$CLINIC^APCLV	BPS+7
$$ICD^ATXCHK	PLDMDOO+7, PLDMDXS+7
$$DOB^AUPNPAT	HTNDX+8, LASTHT+5, LASTDMDX+4, LASTDMDX+6, IFG+17, IFG+19, IGT+17, IGT+19, MS+17, MS+19 , ABNG+16, ABNG+18
$$ICDDX^ICDCODE	PLDMDXS+7, IFG+11, IGT+11, MS+11, ABNG+10
$$VAL^XBDIQ1	CMSFDX+6, IFG+13, IGT+13, MS+13, ABNG+12
$$FMADD^XLFDT	LASTWC+4, LASTWT+3
$$FMTE^XLFDT	BPS+9, HTNDX+8, LASTHT+5, LASTHT+9, LASTWC+7, LASTWT+9, LASTWT+11, CMSFDX+5, PLDMDOO+11, FRSTDMDX+6 , IFG+18, IFG+20, IGT+18, IGT+20, MS+18, MS+20, ABNG+17, ABNG+19

Name	Line Occurrences (* Changed, ! Killed)
^ACM(44 - [#9002244]	CMSFDX+4, CMSFDX+5
^ATXAX("B"	PLDMDOO+3, PLDMDXS+2
^AUPNPROB - [#9000011]	PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, IFG+9, IGT+9, MS+9, ABNG+8
^AUPNPROB("AC"	PLDMDOO+5, PLDMDXS+4, IFG+8, IGT+8, MS+8, ABNG+7
^AUPNVPOV - [#9000010.07]	LASTWT+11
^AUPNVPOV("AD"	LASTWT+9, LASTWT+10
^AUPNVSIT("AC"	LASTHT+3, LASTWC+3
^DPT - [#2]	HTNDX+2
^ICD9("BA"	LASTWT+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	HTNDX+3~, HTNDX+5, LASTHT+4~, LASTHT+5, LASTWC+5~, LASTWC+6*, LASTWT+4~
APCL	BPS+2~, BPS+4!, HTNDX+3~, HTNDX+4!, HTNDX+7!, LASTWT+4~, LASTWT+6!, FRSTDMDX+3~, LASTDMDX+2~, LASTDMDX+6! , IFG+2~, IFG+4!, IFG+19!, IGT+2~, IGT+4!, IGT+19!, MS+2~, MS+4!, MS+19!, ABNG+18!
APCL(	BPS+6, BPS+7, BPS+9, LASTWT+7, LASTWT+8, LASTWT+9, LASTWT+11
APCL(1	HTNDX+6, FRSTDMDX+5, LASTDMDX+5, LASTDMDX+7, IFG+18, IFG+20, IGT+18, IGT+20, MS+18, MS+20 , ABNG+17, ABNG+19
APCL(3	HTNDX+8
APCLARRY	LASTHT+4~, LASTWC+5~, LASTWT+4~
APCLARRY(1	LASTHT+5, LASTHT+9, LASTWC+6, LASTWC+7
>> APCLBP	BPS+6*, BPS+9, BPS+10
APCLC	LASTWT+4~, LASTWT+7, LASTWT+9, LASTWT+11, IFG+2~, IFG+3, IFG+13, IFG+18, IFG+20, IGT+2~ , IGT+3, IGT+13, IGT+18, IGT+20, MS+2~, MS+3, MS+13, MS+18, MS+20, ABNG+2~ , ABNG+3, ABNG+12, ABNG+17, ABNG+19*
APCLD	LASTWT+4~, LASTWT+10*, LASTWT+11
APCLL	BPS+2~, BPS+6*, BPS+7, BPS+9
APCLLL	BPS+2~, BPS+3, BPS+6, BPS+8, BPS+9, BPS+10
APCLN	LASTWT+4~, LASTWT+7*, LASTWT+8, LASTWT+9, LASTWT+11
APCLRET	IFG~, IFG+1!, IGT~, IGT+1!, MS~, MS+1!, ABNG~, ABNG+1!
APCLRET(	IFG+13, IFG+18, IFG+20, IGT+13, IGT+18, IGT+20, MS+13, MS+18, MS+20, ABNG+12 , ABNG+17, ABNG+19
APCLV	BPS+2~, BPS+3, BPS+9, BPS+10*, BPS+11
APCLV221	LASTWT+5~*, LASTWT+11
APCLW	LASTWT+4~, LASTWT+6, LASTWT+9, LASTWT+10, LASTWT+11*, LASTWT+13
APCLX	LASTWT+4~, LASTWT+6*
APCLZ	LASTWT+4~, LASTWT+8*, LASTWT+9, LASTWT+10
BDATE	BPS~, BPS+5, LASTWC+4, LASTWC+6, LASTWT+3, LASTWT+6
D	CMSFDX+4~, CMSFDX+5, CMSFDX+7, PLDMDOO+5~, PLDMDOO+11, PLDMDXS+4~, PLDMDXS+7, PLDMDXS+9, LASTDMDX~, LASTDMDX+4 , LASTDMDX+6
D(	PLDMDOO+8*
D(0	PLDMDOO+11
D1	CMSFDX+4~, CMSFDX+5*, CMSFDX+7
DT	IFG+17, IFG+19, IGT+17, IGT+19, MS+17, MS+19, ABNG+16, ABNG+18
E	BPS+2~, BPS+5, HTNDX+3~, HTNDX+5, HTNDX+8, LASTHT+4~, LASTHT+5, LASTWC+5~, LASTWC+6, LASTWT+4~ , LASTWT+6, FRSTDMDX+3~, FRSTDMDX+5, LASTDMDX+2~, LASTDMDX+4, LASTDMDX+6, IFG+17, IFG+19, IGT+17, IGT+19* , MS+17, MS+19, ABNG+16, ABNG+18
EDATE	BPS~, BPS+5, HTNDX~, HTNDX+8, LASTHT~, LASTHT+5, LASTWC~, LASTWC+4, LASTWC+6, LASTWT~ , LASTWT+3, LASTWT+6
F	BPS~, BPS+1, BPS+9, BPS+10, LASTHT~, LASTHT+2, LASTHT+8, LASTWC~, LASTWC+2, LASTWT~ , LASTWT+2, LASTWT+13, PLDMDOO~, PLDMDOO+2, PLDMDOO+11, FRSTDMDX~, FRSTDMDX+2, FRSTDMDX+6
G	CMSFDX+4~*
H	LASTHT+4~, LASTHT+5, LASTHT+6, LASTHT+7, LASTHT+8, LASTHT+9, LASTWC+5~, LASTWC+6*, LASTWC+7, LASTWT+4~
I	PLDMDOO+5~, PLDMDOO+6, PLDMDOO+7, PLDMDXS+4~, PLDMDXS+5, PLDMDXS+7, IFG+9, IFG+11, IFG+12, IFG+13 , IGT+9, IGT+11, IGT+12, IGT+13, MS+9, MS+11, MS+12, MS+13, ABNG+8, ABNG+10 , ABNG+11, ABNG+12
P	BPS~, BPS+5, HTNDX~, HTNDX+1, HTNDX+2, HTNDX+5, HTNDX+8, LASTHT~, LASTHT+1, LASTHT+3 , LASTHT+5, LASTWC~, LASTWC+1, LASTWC+3, LASTWC+6, LASTWT~, LASTWT+1, LASTWT+6, 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, IFG~, IFG+8, IFG+17, IFG+19, IGT~, IGT+8 , IGT+17, IGT+19, MS~, MS+8, MS+17, MS+19, ABNG~, ABNG+7, ABNG+16, ABNG+18
R	CMSFDX~, CMSFDX+2, CMSFDX+4
T	CMSFDX~, CMSFDX+3, CMSFDX+7, PLDMDOO+3~, PLDMDOO+4, PLDMDOO+7, PLDMDXS+2~, PLDMDXS+3, PLDMDXS+7
U	BPS+6, BPS+7, BPS+9, LASTHT+5, LASTHT+9, LASTWC+6, LASTWC+7, LASTWT+8, LASTWT+9, LASTWT+11 , CMSFDX+4, CMSFDX+5, PLDMDOO+6, PLDMDOO+8, PLDMDXS+5, PLDMDXS+7, FRSTDMDX+5, IFG+9, IFG+11, IFG+18 , IFG+20, IGT+9, IGT+11, IGT+18, IGT+20, MS+9, MS+11, MS+18, MS+20, ABNG+8 , ABNG+10, ABNG+17, ABNG+19
W	LASTHT+4~, LASTWC+5~, LASTWT+4~
X	BPS+2~, BPS+5, HTNDX+8, LASTHT+5~, LASTWC+6~, LASTWT+4~, 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, IFG+8* , IFG+9, IFG+13, IFG+17, IFG+19, IGT+8, IGT+9, IGT+13, IGT+17, IGT+19, MS+8 , MS+9, MS+13, MS+17, MS+19, ABNG+7, ABNG+8, ABNG+12, ABNG+16, ABNG+18*
Y	CMSFDX+4~, CMSFDX+6, CMSFDX+7, FRSTDMDX+3~, FRSTDMDX+4, FRSTDMDX+5, FRSTDMDX+6, LASTDMDX+2~, LASTDMDX+3, LASTDMDX+4 , LASTDMDX+6, IFG+16, IFG+17, IFG+19, IGT+16, IGT+17, IGT+19, MS+16, MS+17, MS+19 , ABNG+15*, ABNG+16, ABNG+18

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLP813

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Local Variables

Legend: