Routine: APCLD810

Information

APCLD810 ; IHS/CMI/LAB -IHS -GETS DATA FOR DIABETES QA REPORT ;

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
Patient Care Component Reports	13	WRITEF^APCLD81 $$CESS^APCLD811 ($$ACAR,$$DEPDX,$$DEPSCR,$$DPP4,$$EKG,$$INCR,$$INSULIN,$$MET,$$REFMED,$$SULF,$$TBTX,$$TROG)^APCLD812 ($$BPS,$$CMSFDX,$$FLU,$$FRSTDMDX,$$HTNDX,$$LASTDMDX,$$LASTHT,$$LASTWT,$$PLDMDOO,$$PLDMDXS,$$PNEU)^APCLD813 CUML^APCLD815 ($$ACE,$$ASPIRIN,$$LIPID,$$TOBACCO)^APCLD816 ($$DENTAL,$$DFE,$$DIETEDUC,$$EXEDUC,$$EYE,$$OTHEDUC)^APCLD817 ($$BMI,$$CHOL,$$CREAT,$$HDL,$$HGBA1C,$$LASTNP,$$LDL,$$MICRO,$$PPD,$$PROTEIN,$$TRIG)^APCLD818 $$TD^APCLD81B ($$GFR,$$QUAN,$$UACR,$$UPCR)^APCLD81C $$ACTDMPT^APCLD81G $$RSTAT^APCLDM6 $$DEMO^APCLUTL
IHS Patient	1	($$COMMRES,$$DOB,$$HRN,$$TRIBE)^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Patient Care Component Reports	3	APCLD81 APCLD812 APCLD81E

Entry Points

Name	Comments	DBIA/ICR reference
DEMO	;pat demographics
REC(DFN,APCLRTYP,APCLRBD,APCLRED,APCLED,APCLDMRG,APCLBDAT)	;EP - called to send back a visit record as
URINPROT()	;
COMM(P)	;EP
PPD	;
EPIREC	;create epi info record in ^APCLDATA("APCLEPI",$J,n)
ACTONREG(P,R)	;
EAUDIT	;EP
TRIBE(P)	;EP
DXDT	;dates of and dm dxs
DATE(D)	;EP
EN	; - ENTRY POINT - from ^APCLASK
IMM	;
TYPEDM	;return type of DM in APCLTYDM
LABS	;
HEADER	; Set node with report header info
VITAL	;
EXAMS	;
S(P,I,V)	;
GATHER	;gather data for 1 patient
THERAPY	;
PROC	;

External References

Name	Field # of Occurrence
WRITEF^APCLD81	EN+8, EAUDIT+22
$$CESS^APCLD811	DXDT+9
$$ACAR^APCLD812	THERAPY+5
$$DEPDX^APCLD812	LABS+17
$$DEPSCR^APCLD812	LABS+19
$$DPP4^APCLD812	THERAPY+8
$$EKG^APCLD812	PPD+4
$$INCR^APCLD812	THERAPY+7
$$INSULIN^APCLD812	THERAPY+2
$$MET^APCLD812	THERAPY+4
$$REFMED^APCLD812	THERAPY+9
$$SULF^APCLD812	THERAPY+3
$$TBTX^APCLD812	PPD+3
$$TROG^APCLD812	THERAPY+6
$$BPS^APCLD813	VITAL+6
$$CMSFDX^APCLD813	DXDT+1, DXDT+2
$$FLU^APCLD813	IMM+3
$$FRSTDMDX^APCLD813	DXDT+5
$$HTNDX^APCLD813	VITAL+4
$$LASTDMDX^APCLD813	DXDT+6
$$LASTHT^APCLD813	VITAL+1
$$LASTWT^APCLD813	VITAL+2
$$PLDMDOO^APCLD813	DXDT+3
$$PLDMDXS^APCLD813	DXDT+4
$$PNEU^APCLD813	IMM+4
CUML^APCLD815	EN+9, EAUDIT+23
$$ACE^APCLD816	THERAPY+12
$$ASPIRIN^APCLD816	IMM+1
$$LIPID^APCLD816	IMM+2
$$TOBACCO^APCLD816	DXDT+7
$$DENTAL^APCLD817	EXAMS+3
$$DFE^APCLD817	EXAMS+1
$$DIETEDUC^APCLD817	EXAMS+4
$$EXEDUC^APCLD817	EXAMS+5
$$EYE^APCLD817	EXAMS+2
$$OTHEDUC^APCLD817	EXAMS+6
$$BMI^APCLD818	LABS+16
$$CHOL^APCLD818	LABS+5
$$CREAT^APCLD818	LABS+4
$$HDL^APCLD818	LABS+7
$$HGBA1C^APCLD818	LABS+1
$$LASTNP^APCLD818	PPD+2
$$LDL^APCLD818	LABS+6
$$MICRO^APCLD818	LABS+14
$$PPD^APCLD818	PPD+1
$$PROTEIN^APCLD818	LABS+13
$$TRIG^APCLD818	LABS+8
$$TD^APCLD81B	IMM+5
$$GFR^APCLD81C	LABS+3
$$QUAN^APCLD81C	LABS+11, URINPROT+3
$$UACR^APCLD81C	LABS+9, URINPROT+1
$$UPCR^APCLD81C	LABS+10, URINPROT+2
$$ACTDMPT^APCLD81G	EAUDIT+11, EAUDIT+17
$$RSTAT^APCLDM6	HEADER+11
$$DEMO^APCLUTL	EN+5, EAUDIT+10
$$COMMRES^AUPNPAT	COMM+3
$$DOB^AUPNPAT	DEMO+2
$$HRN^AUPNPAT	DEMO+1
$$TRIBE^AUPNPAT	TRIBE+3
$$VAL^XBDIQ1	HEADER+14, DEMO+3
$$FMADD^XLFDT	EN+2, THERAPY+1, EAUDIT+2, EAUDIT+4, EAUDIT+5
$$FMTE^XLFDT	HEADER+4, THERAPY+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACM(41 - [#9002241]	EAUDIT+7, EAUDIT+8, EAUDIT+9, ACTONREG+1, ACTONREG+2, ACTONREG+3
^APCLDATA("APCLEPI"	EN+1!, EPIREC+1, EPIREC+2, EPIREC+3*, EAUDIT+1!
^APCLRECD - [#9001004.1]	PROC+2, PROC+3, PROC+4
^APCLRECD("B"	REC+3
^AUPNPAT - [#9000001]	TRIBE+2, COMM+2, EAUDIT+16
^AUTTLOC - [#9999999.06]	HEADER+7, HEADER+8, HEADER+9
^DIC(4 - [#4]	HEADER+6
^DIC(5 - [#5]	DEMO+6
^DPT - [#2]	DEMO+6
^VA(200 - [#200]	HEADER+13
^XTMP("APCLDM81"	EN+2, EN+4, S+1, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+11* , HEADER+13, HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+6, DXDT+1, DXDT+2, DXDT+3 , THERAPY+10, LABS+18, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12, EAUDIT+2*

Label References

Name	Line Occurrences
$$ACTONREG	EAUDIT+19
$$REC	EPIREC+1, EPIREC+2, EPIREC+3
$$TRIBE	DEMO+4
EPIREC	EN+6, EAUDIT+13, EAUDIT+20
GATHER	EN+7, EAUDIT+14, EAUDIT+21
S	DXDT+4, DXDT+5, DXDT+6, DXDT+7, DXDT+8, DXDT+9, VITAL+1, VITAL+2, VITAL+4, VITAL+6 , EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3, THERAPY+4, THERAPY+5 , THERAPY+6, THERAPY+7, THERAPY+8, THERAPY+9, THERAPY+11, THERAPY+12, IMM+1, IMM+2, IMM+3, IMM+4 , IMM+5, PPD+1, PPD+2, PPD+3, PPD+4, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6 , LABS+7, LABS+8, LABS+9, LABS+10, LABS+11, LABS+13, LABS+14, LABS+16, LABS+17, LABS+19
TYPEDM	DXDT+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCL3YE	EAUDIT+5*, EAUDIT+11, EAUDIT+17
>> APCL6MBD	THERAPY+1*, THERAPY+2, THERAPY+3, THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+7, THERAPY+8, THERAPY+12
>> APCLACTI	EAUDIT+6, EAUDIT+16, EAUDIT+19
>> APCLADAT	EPIREC+1, EPIREC+2, EPIREC+3, THERAPY+1, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6, LABS+7 , LABS+8, LABS+9, LABS+10, LABS+11, LABS+13, LABS+14, LABS+17, LABS+19, EAUDIT+4, EAUDIT+5 , EAUDIT+11, EAUDIT+17, URINPROT+1, URINPROT+2, URINPROT+3
APCLBDAT	REC~, EPIREC+1, EPIREC+2, EPIREC+3, LABS+1, LABS+3, LABS+4, LABS+5, LABS+6, LABS+7 , LABS+8, LABS+9, LABS+10, LABS+11, LABS+13, LABS+14, LABS+17, LABS+19, URINPROT+1, URINPROT+2 , URINPROT+3
>> APCLBEGD	EAUDIT+4*, EAUDIT+11, EAUDIT+17
>> APCLBEN	EAUDIT+11, EAUDIT+17
>> APCLBTH	EN+4, S+1, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+11, HEADER+13 , HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+6, DXDT+1, DXDT+2, DXDT+3, THERAPY+10 , LABS+18, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12
>> APCLDEMO	EN+5, EAUDIT+10
>> APCLDEP	LABS+18*, LABS+19
APCLDMRG	REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+11, DXDT+1, DXDT+2, EAUDIT+7, EAUDIT+19
>> APCLEAUT	EAUDIT+7*, EAUDIT+8, EAUDIT+9
APCLED	REC~
>> APCLEPIN	EN+3, EPIREC+1, EPIREC+2, EPIREC+3, EAUDIT+3*
>> APCLEPIR	EPIREC+1, EPIREC+2, EPIREC+3*
>> APCLEPIX	PROC+1, PROC+2
>> APCLER	GATHER+1*
>> APCLFISC	HEADER+2
>> APCLJOB	EN+4, S+1, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+11, HEADER+13 , HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+6, DXDT+1, DXDT+2, DXDT+3, THERAPY+10 , LABS+18, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7, TYPEDM+12
>> APCLPD	EN+4, EN+5, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, HEADER+4, HEADER+6, HEADER+7, HEADER+8 , HEADER+9, HEADER+11, HEADER+13, HEADER+14, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+6, DXDT+1 , DXDT+2, DXDT+3, DXDT+4, DXDT+5, DXDT+6, DXDT+7, DXDT+8, DXDT+9, VITAL+1, VITAL+2 , VITAL+4, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3 , THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+7, THERAPY+8, THERAPY+9, THERAPY+10, THERAPY+11, THERAPY+12, IMM+1 , IMM+2, IMM+3, IMM+4, IMM+5, PPD+1, PPD+2, PPD+3, PPD+4, LABS+1, LABS+3 , LABS+4, LABS+5, LABS+6, LABS+7, LABS+8, LABS+9, LABS+10, LABS+11, LABS+13, LABS+14 , LABS+16, LABS+17, LABS+18, LABS+19, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+7 , TYPEDM+12, EAUDIT+9, EAUDIT+10, EAUDIT+11, EAUDIT+16*, EAUDIT+17, EAUDIT+19, URINPROT+1, URINPROT+2, URINPROT+3
>> APCLPREP	EN+6, EN+8, EN+9, EAUDIT+13, EAUDIT+20, EAUDIT+22, EAUDIT+23
APCLRBD	REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, DXDT+9, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3 , EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+9, IMM+1, IMM+2, IMM+3, LABS+16
APCLREC	REC+1~, REC+2, REC+4, PROC+2, PROC+4, PROC+5
APCLRED	REC~, EPIREC+1, EPIREC+2, EPIREC+3, HEADER+2, DXDT+6, DXDT+7, DXDT+9, VITAL+1, VITAL+2 , VITAL+4, VITAL+6, EXAMS+1, EXAMS+2, EXAMS+3, EXAMS+4, EXAMS+5, EXAMS+6, THERAPY+2, THERAPY+3 , THERAPY+4, THERAPY+5, THERAPY+6, THERAPY+7, THERAPY+8, THERAPY+9, THERAPY+12, IMM+1, IMM+2, IMM+3 , IMM+4, IMM+5, PPD+1, PPD+2, PPD+4, LABS+16
APCLRTYP	REC~, REC+3
APCLRTYP("IEN"	REC+3*, REC+4, PROC+2, PROC+3, PROC+4
>> APCLTAXI	EAUDIT+11, EAUDIT+17
>> APCLTHER	EPIREC+2*
>> APCLTTT	PROC+2*, PROC+3, PROC+4
>> APCLTYDM	DXDT+8, TYPEDM+2, TYPEDM+3, TYPEDM+4, TYPEDM+5, TYPEDM+6, TYPEDM+8, TYPEDM+9, TYPEDM+10, TYPEDM+11 , TYPEDM+13, TYPEDM+14
>> APCLTYPE	EN+5
APCLX	REC+1~, EAUDIT+11, EAUDIT+12, EAUDIT+17, EAUDIT+18
>> C	TYPEDM+8, TYPEDM+10
D	DATE~, DATE+1, DATE+2
DFN	REC~
DT	EN+2, HEADER+4, EAUDIT+2
DUZ	HEADER+13
DUZ(2	HEADER+6, HEADER+7, HEADER+8, HEADER+9, DEMO+1
I	S~, S+1, TYPEDM+8, TYPEDM+10
P	S~, S+1, TRIBE~, TRIBE+1, TRIBE+2, TRIBE+3, COMM~, COMM+1, COMM+2, COMM+3 , ACTONREG~, ACTONREG+1, ACTONREG+2
R	ACTONREG~, ACTONREG+1, ACTONREG+2
U	PROC+4, HEADER+6, HEADER+7, HEADER+8, HEADER+9, HEADER+13, DEMO+6, THERAPY+9, EAUDIT+8, EAUDIT+9 , ACTONREG+3
V	S~, S+1
X	PROC+3, PROC+4, THERAPY+10, TYPEDM+1~, TYPEDM+7, TYPEDM+8, TYPEDM+10, TYPEDM+12, TYPEDM+13, TYPEDM+14 , ACTONREG+2*, ACTONREG+3
>> Y	THERAPY+9, THERAPY+10, THERAPY+11

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLD810

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: