Routine: BDMDE12

Information

BDMDE12 ; IHS/CMI/LAB - 2017 DIABETES AUDIT ;

Source Information

Source file <BDMDE12.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Diabetes Registry	4	($$LASTCPTT,$$LASTPRCT)^BDMAPIU $$PRES^BDMDE18 $$DATE^BDMS9B1 ($$CODEN,$$ICD,$$ICDDX,$$SNOMED)^BDMUTL
Patient Care Component Reports	2	($$LASTBHDT,$$LASTBHDX,$$LASTBHED,$$LASTBHME,$$LASTDXT,$$LASTITEM)^APCLAPIU $$START1^APCLDF
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT
VA Fileman	1	^%DT

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
Diabetes Registry	5	BDMDE10 BDMDE13 BDMDE16 BDMPE10 BDMPE16

Entry Points

Name	Comments	DBIA/ICR reference
SULF(P,BDATE,EDATE)	;EP
MET(P,BDATE,EDATE)	;EP
PLTAX(P,A)	;EP - is DX on problem list 1 or 0
DEPDX(P,BDATE,EDATE)	;EP
SGLT2(P,BDATE,EDATE)	;EP
LASTDEP(P,BD,ED,F)	;
INSULIN(P,BDATE,EDATE)	;EP
LASTDEPS(BDMLPDFN,BDMLBD,BDMLED,BDMLFORM)	;PEP - return last depression screen ;
SETN	;
TBTX(P)	;EP
CPT(P,BDATE,EDATE,T,F)	;EP return ien of CPT entry if patient had this CPT
RAD(P,BDATE,EDATE,T,F)	;EP return if a v rad entry
DPP4(P,BDATE,EDATE)	;EP
CVD(P,EDATE)	;EP
E	;
GLP1(P,BDATE,EDATE)	;EP
COLE(P,BDATE,EDATE)	;EP
TROG(P,BDATE,EDATE)	;EP
ACAR(P,BDATE,EDATE)	;EP
SULFLIKE(P,BDATE,EDATE)	;EP
VE(Y,F,T)	;EP
PLCODE(P,A)	;EP
LOINC(A,B)	;
DEPSCR(P,BDATE,EDATE,F,R)	;EP
BROM(P,BDATE,EDATE)	;EP
AMYLIN(P,BDATE,EDATE)	;EP

External References

Name	Field # of Occurrence
^%DT	INSULIN+4, SULF+4, SULFLIKE+4, MET+4, ACAR+4, TROG+4, SGLT2+4, DPP4+4, AMYLIN+4, GLP1+7 , GLP1+10, BROM+4, COLE+4
$$LASTBHDT^APCLAPIU	LASTDEPS+27
$$LASTBHDX^APCLAPIU	LASTDEPS+20, LASTDEPS+29, LASTDEPS+31
$$LASTBHED^APCLAPIU	LASTDEPS+22
$$LASTBHME^APCLAPIU	LASTDEPS+33, LASTDEPS+35, LASTDEPS+37
$$LASTDXT^APCLAPIU	LASTDEPS+25
$$LASTITEM^APCLAPIU	LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18
$$START1^APCLDF	TBTX+4, INSULIN+2, SULF+2, SULFLIKE+2, MET+2, ACAR+2, TROG+2, SGLT2+2, DPP4+2, AMYLIN+2 , GLP1+2, GLP1+5, BROM+2, COLE+2, DEPDX+34, LASTDEP+3, CVD+15, CVD+18, CVD+21
$$DOB^AUPNPAT	LASTDEPS+2, CVD+15, CVD+18, CVD+21, CVD+23, CVD+25, CVD+27, CVD+29
$$LASTCPTT^BDMAPIU	CVD+27, CVD+29
$$LASTPRCT^BDMAPIU	CVD+23, CVD+25
$$PRES^BDMDE18	INSULIN+5, SULF+5, SULFLIKE+5, MET+5, ACAR+5, TROG+5, SGLT2+5, DPP4+5, AMYLIN+5, GLP1+8 , GLP1+11, BROM+5, COLE+5
$$DATE^BDMS9B1	CPT+23, RAD+26, DEPSCR+5, DEPSCR+6, CVD+16, CVD+19, CVD+22, CVD+24, CVD+26, CVD+28 , CVD+30
$$CODEN^BDMUTL	DEPDX+23, PLCODE+5
$$ICD^BDMUTL	CPT+15, RAD+17, DEPDX+10, DEPDX+25, DEPDX+50, PLCODE+7, PLTAX+5, CVD+10
$$ICDDX^BDMUTL	DEPDX+10, DEPDX+29, DEPDX+49
$$SNOMED^BDMUTL	DEPDX+11
$$VAL^XBDIQ1	LASTDEP+14, VE+1, CVD+11
$$FMADD^XLFDT	CPT+6, RAD+5
$$FMTE^XLFDT	CVD+15, CVD+18, CVD+21

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPPROB - [#9002011.51]	DEPDX+18, DEPDX+27, DEPDX+28
^AMHPPROB("AC"	DEPDX+17
^AMHPROB - [#9002012.2]	DEPDX+19, DEPDX+21, DEPDX+45, DEPDX+48
^AMHREC - [#9002011]	DEPDX+40, DEPDX+41, DEPDX+42, LASTDEP+8
^AMHREC("AE"	DEPDX+39, LASTDEP+7
^AMHRPRO - [#9002011.01]	DEPDX+43
^AMHRPRO("AD"	DEPDX+43
^ATXAX - [#9002226]	TBTX+9, CPT+15, RAD+17, DEPDX+10, DEPDX+25, LOINC+3, LOINC+5, PLCODE+7, PLTAX+5, CVD+10
^ATXAX("B"	TBTX+7, INSULIN+5, SULF+5, SULFLIKE+5, MET+5, ACAR+5, TROG+5, SGLT2+5, DPP4+5, AMYLIN+5 , GLP1+8, GLP1+11, BROM+5, COLE+5, DEPDX+5, DEPDX+16, PLTAX+3, CVD+6
^AUPNHF("AA"	TBTX+9
^AUPNPROB - [#9000011]	DEPDX+7, DEPDX+8, DEPDX+9, DEPDX+11, PLCODE+7, PLTAX+5, CVD+8, CVD+9
^AUPNPROB("AC"	DEPDX+6, PLCODE+7, PLTAX+5, CVD+7
^AUPNVCPT - [#9000010.18]	CPT+15, CPT+22, CPT+23
^AUPNVCPT("AD"	CPT+13, CPT+14
^AUPNVLAB - [#9000010.09]	SETN+1
^AUPNVRAD - [#9000010.22]	RAD+14, RAD+15, RAD+25, RAD+26
^AUPNVRAD("AD"	RAD+12, RAD+13
^AUPNVSIT - [#9000010]	CPT+12, CPT+22, CPT+23, RAD+11, RAD+25, RAD+26
^AUPNVSIT("AA"	CPT+10, CPT+11, RAD+9, RAD+10
^AUTTEDT("C"	LASTDEPS+17
^AUTTHF - [#9999999.64]	TBTX+9
^DPT - [#2]	CVD+2
^LAB(95.3 - [#95.3]	LOINC+2, LOINC+4
^RAMIS(71 - [#71]	RAD+15, RAD+16

Label References

Name	Line Occurrences
$$LASTDEP	LASTDEPS+7
$$LASTDEPS	DEPSCR+4
$$VE	LASTDEP+4
E	LASTDEPS+8, LASTDEPS+10, LASTDEPS+12, LASTDEPS+14, LASTDEPS+16, LASTDEPS+19, LASTDEPS+21, LASTDEPS+23, LASTDEPS+26, LASTDEPS+28 , LASTDEPS+30, LASTDEPS+32, LASTDEPS+34, LASTDEPS+36, LASTDEPS+38

Local Variables

Name	Field # of Occurrence
%	LOINC+1~, LOINC+2, LOINC+3, LOINC+4, LOINC+5, LASTDEP+1~, LASTDEP+3*, CVD+3~
%DT	INSULIN+1~, INSULIN+4!, SULF+4!, SULFLIKE+4!, MET+4!, ACAR+4!, TROG+4!, SGLT2+4!, DPP4+4!, AMYLIN+4!* , GLP1+7!, GLP1+10!, BROM+4!, COLE+4!
A	SETN+1~*, LOINC~, LOINC+2, LOINC+4, PLCODE~, PLCODE+2, PLCODE+5, PLTAX~, PLTAX+2, PLTAX+3
B	LOINC~, LOINC+3, LOINC+5
BD	CPT+8~, CPT+9, CPT+10, RAD+7~, RAD+8, RAD+9, LASTDEP~, LASTDEP+3, LASTDEP+7
BDATE	CPT~, CPT+6, CPT+9, RAD~, RAD+5, RAD+8, INSULIN~, INSULIN+2, SULF~, SULF+2 , SULFLIKE~, SULFLIKE+2, MET~, MET+2, ACAR~, ACAR+2, TROG~, TROG+2, SGLT2~, SGLT2+2 , DPP4~, DPP4+2, AMYLIN~, AMYLIN+2, GLP1~, GLP1+2, GLP1+5, BROM~, BROM+2, COLE~ , COLE+2, DEPDX~, DEPDX+34, DEPDX+39, DEPSCR~, DEPSCR+4
BDM	TBTX+2~, TBTX+3!, INSULIN+1~, INSULIN+5, INSULIN+6, SULF+1~, SULF+5, SULF+6, SULFLIKE+1~, SULFLIKE+5* , SULFLIKE+6, MET+1~, MET+5, MET+6, ACAR+1~, ACAR+5, ACAR+6, TROG+1~, TROG+5, TROG+6 , SGLT2+1~, SGLT2+5, SGLT2+6, DPP4+1~, DPP4+5, DPP4+6, AMYLIN+1~, AMYLIN+5, AMYLIN+6, GLP1+1~ , GLP1+8, GLP1+9, GLP1+11, GLP1+12, BROM+1~, BROM+5, BROM+6, COLE+1~, COLE+5, COLE+6 , DEPDX+1~, DEPDX+2!, DEPDX+36, DEPDX+37, DEPDX+39, DEPDX+43, DEPDX+46, DEPDX+47, DEPDX+50*, DEPDX+52 , CVD+3~, CVD+14!, CVD+17!, CVD+20!
BDM(	SETN+1
BDM(1	TBTX+6, INSULIN+3, SULF+3, SULFLIKE+3, MET+3, ACAR+3, TROG+3, SGLT2+3, DPP4+3, AMYLIN+3 , GLP1+3, GLP1+6, BROM+3, COLE+3, DEPDX+37, CVD+16, CVD+19, CVD+22
BDM(2	DEPDX+35, CVD+22
BDMC	DEPSCR+1~, DEPSCR+4*, DEPSCR+5, DEPSCR+6
BDMD	DEPDX+1~, DEPDX+36, DEPDX+37, DEPDX+41
BDMLBD	LASTDEPS~, LASTDEPS+2*, LASTDEPS+7, LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22 , LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37
BDMLC	LASTDEP+2~, LASTDEP+6*, LASTDEP+7
BDMLED	LASTDEPS~, LASTDEPS+3*, LASTDEPS+7, LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22 , LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37
BDMLFORM	LASTDEPS~, LASTDEPS+4*, LASTDEPS+39
BDMLG	LASTDEP+2~
BDMLG(1	LASTDEP+4
BDMLLAST	E+1, LASTDEPS+5~, LASTDEPS+6, LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22 , LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+40
BDMLPDFN	LASTDEPS~, LASTDEPS+2, LASTDEPS+7, LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22 , LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37
BDMLV	LASTDEP+2~, LASTDEP+6*
BDMLVAL	E+1, LASTDEPS+5~, LASTDEPS+7, LASTDEPS+9, LASTDEPS+11, LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22 , LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37*
BDMLX	LASTDEPS+5~, LASTDEPS+17*, LASTDEPS+18, LASTDEP+2~
BDMLX(	LASTDEP+13, LASTDEP+14*, LASTDEP+15
BDMLX(0	LASTDEP+15
BDMLX(9999999	LASTDEP+4*
BDMP	DEPDX+1~, DEPDX+43*, DEPDX+44, DEPDX+45, DEPDX+48
BDMP4	DEPDX+1~, DEPDX+45*, DEPDX+46, DEPDX+47
>> BDMV	DEPDX+33*, DEPDX+42
D	CPT+8~, RAD+7~, DEPDX+1~, DEPDX+39, LASTDEP+1~, LASTDEP+7, LASTDEP+12, LASTDEP+13, LASTDEP+14
DT	LASTDEPS+3
E	TBTX+2~, TBTX+4, TBTX+5, INSULIN+1~, INSULIN+2, SULF+1~, SULF+2, SULFLIKE+1~, SULFLIKE+2, MET+1~ , MET+2, ACAR+1~, ACAR+2, TROG+1~, TROG+2, SGLT2+1~, SGLT2+2, DPP4+1~, DPP4+2, AMYLIN+1~ , AMYLIN+2, GLP1+1~, GLP1+2, GLP1+5, BROM+1~, BROM+2, COLE+1~, COLE+2, DEPDX+34, DEPDX+39 , LASTDEP+1~, LASTDEP+3, LASTDEP+7, CVD+3~, CVD+15, CVD+18, CVD+21*
ED	CPT+8~, CPT+9, CPT+10, CPT+11, RAD+7~, RAD+8, RAD+9, RAD+10, INSULIN+1~, INSULIN+4* , INSULIN+5, SULF+4, SULF+5, SULFLIKE+4, SULFLIKE+5, MET+4, MET+5, ACAR+4, ACAR+5, TROG+4* , TROG+5, SGLT2+4, SGLT2+5, DPP4+4, DPP4+5, AMYLIN+4, AMYLIN+5, GLP1+7, GLP1+8, GLP1+10* , GLP1+11, BROM+4, BROM+5, COLE+4, COLE+5, LASTDEP~, LASTDEP+3, LASTDEP+7
EDATE	CPT~, CPT+5, CPT+6, CPT+9, RAD~, RAD+4, RAD+5, RAD+8, INSULIN~, INSULIN+2 , INSULIN+4, SULF~, SULF+2, SULF+4, SULFLIKE~, SULFLIKE+2, SULFLIKE+4, MET~, MET+2, MET+4 , ACAR~, ACAR+2, ACAR+4, TROG~, TROG+2, TROG+4, SGLT2~, SGLT2+2, SGLT2+4, DPP4~ , DPP4+2, DPP4+4, AMYLIN~, AMYLIN+2, AMYLIN+4, GLP1~, GLP1+2, GLP1+5, GLP1+7, GLP1+10 , BROM~, BROM+2, BROM+4, COLE~, COLE+2, COLE+4, DEPDX~, DEPDX+34, DEPDX+39, DEPSCR~ , DEPSCR+4, CVD~, CVD+15, CVD+18, CVD+21, CVD+23, CVD+25, CVD+27, CVD+29
F	CPT~, CPT+4, CPT+20, CPT+21, CPT+22, CPT+23, RAD~, RAD+3, RAD+23, RAD+24 , RAD+25, RAD+26, DEPSCR~, DEPSCR+3*, DEPSCR+5, LASTDEP~, LASTDEP+15, VE~
G	SETN+1~, SETN+2, TBTX+9~, TBTX+10, CPT+8~, CPT+9, CPT+10, CPT+11, CPT+14, CPT+15 , CPT+19, CPT+20, CPT+21, CPT+22, CPT+23, RAD+7~, RAD+8, RAD+9, RAD+10, RAD+13 , RAD+18, RAD+22, RAD+23, RAD+24, RAD+25, RAD+26, DEPDX+1~, DEPDX+3, DEPDX+6, DEPDX+10 , DEPDX+11, DEPDX+13, DEPDX+14, DEPDX+17, DEPDX+20, DEPDX+29, DEPDX+31, LASTDEP+1~, LASTDEP+12, LASTDEP+14 , LASTDEP+15, CVD+3~, CVD+5, CVD+7, CVD+11, CVD+13
I	DEPDX+1~, DEPDX+3, DEPDX+7, DEPDX+10, DEPDX+14, DEPDX+18, DEPDX+19, DEPDX+21, DEPDX+22, DEPDX+23 , DEPDX+24, DEPDX+25, DEPDX+29, PLCODE+7~, PLCODE+8, PLTAX+5~, PLTAX+7, CVD+8*, CVD+10
J	DEPDX+1~, DEPDX+19, DEPDX+20, DEPDX+48, DEPDX+49*, DEPDX+50
>> N	SETN+1, SETN+2
P	TBTX~, TBTX+1, TBTX+4, TBTX+9, CPT~, CPT+2, CPT+10, CPT+11, RAD~, RAD+1 , RAD+9, RAD+10, INSULIN~, INSULIN+2, INSULIN+5, SULF~, SULF+2, SULF+5, SULFLIKE~, SULFLIKE+2 , SULFLIKE+5, MET~, MET+2, MET+5, ACAR~, ACAR+2, ACAR+5, TROG~, TROG+2, TROG+5 , SGLT2~, SGLT2+2, SGLT2+5, DPP4~, DPP4+2, DPP4+5, AMYLIN~, AMYLIN+2, AMYLIN+5, GLP1~ , GLP1+2, GLP1+5, GLP1+8, GLP1+11, BROM~, BROM+2, BROM+5, COLE~, COLE+2, COLE+5 , DEPDX~, DEPDX+6, DEPDX+17, DEPDX+34, DEPDX+39, DEPSCR~, DEPSCR+2, DEPSCR+4, PLCODE~, PLCODE+1 , PLCODE+7, PLTAX~, PLTAX+1, PLTAX+5, LASTDEP~, LASTDEP+3, LASTDEP+7, CVD~, CVD+1, CVD+2 , CVD+7, CVD+15, CVD+18, CVD+21, CVD+23, CVD+25, CVD+27, CVD+29
R	DEPSCR~, DEPSCR+5
T	TBTX+7~, TBTX+8, TBTX+9, CPT~, CPT+3, CPT+15, RAD~, RAD+2, RAD+17, DEPDX+1~ , DEPDX+5, DEPDX+10, DEPDX+16, DEPDX+25, PLCODE+3~, PLCODE+5, PLCODE+6, PLCODE+7, PLTAX+3~, PLTAX+4 , PLTAX+5, VE~, CVD+3~, CVD+6, CVD+10
U	SETN+1, TBTX+6, TBTX+9, TBTX+10, CPT+15, CPT+22, CPT+23, RAD+15, RAD+16, RAD+17 , RAD+25, RAD+26, DEPDX+7, DEPDX+8, DEPDX+9, DEPDX+10, DEPDX+11, DEPDX+18, DEPDX+19, DEPDX+21 , DEPDX+25, DEPDX+27, DEPDX+28, DEPDX+29, DEPDX+37, DEPDX+41, DEPDX+42, DEPDX+43, DEPDX+45, DEPDX+48 , DEPDX+49, DEPSCR+5, DEPSCR+6, LOINC+2, LOINC+4, PLCODE+7, PLTAX+5, E+1, LASTDEPS+9, LASTDEPS+11 , LASTDEPS+13, LASTDEPS+15, LASTDEPS+18, LASTDEPS+20, LASTDEPS+22, LASTDEPS+25, LASTDEPS+27, LASTDEPS+29, LASTDEPS+31, LASTDEPS+33 , LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEP+4, LASTDEP+8, LASTDEP+15, VE+1, CVD+8, CVD+9, CVD+10 , CVD+16, CVD+19, CVD+22, CVD+24, CVD+26, CVD+28, CVD+30
V	CPT+8~, CPT+11, CPT+12, CPT+13, CPT+14, CPT+22, CPT+23, RAD+7~, RAD+10, RAD+11 , RAD+12, RAD+13, RAD+25, RAD+26, DEPDX+39, DEPDX+40, DEPDX+41, DEPDX+42, DEPDX+43, LASTDEP+1~ , LASTDEP+7, LASTDEP+8, LASTDEP+14
X	TBTX+2~, TBTX+4, TBTX+9, CPT+1~, CPT+8~, CPT+14, CPT+15, RAD+7~, RAD+13, RAD+14 , RAD+15, RAD+18, INSULIN+1~, INSULIN+2, INSULIN+4, SULF+1~, SULF+2, SULF+4, SULFLIKE+1~, SULFLIKE+2* , SULFLIKE+4, MET+1~, MET+2, MET+4, ACAR+1~, ACAR+2, ACAR+4, TROG+1~, TROG+2, TROG+4* , SGLT2+1~, SGLT2+2, SGLT2+4, DPP4+1~, DPP4+2, DPP4+4, AMYLIN+1~, AMYLIN+2, AMYLIN+4, GLP1+1~ , GLP1+2, GLP1+5, GLP1+7, GLP1+10, BROM+1~, BROM+2, BROM+4, COLE+1~, COLE+2, COLE+4 , DEPDX+1~, DEPDX+3, DEPDX+6, DEPDX+7, DEPDX+8, DEPDX+9, DEPDX+11, DEPDX+14, DEPDX+17, DEPDX+18 , DEPDX+27, DEPDX+28, DEPDX+34, DEPDX+43, DEPSCR+1~, PLCODE+7~, PLTAX+5~, LASTDEP+1~, LASTDEP+8, LASTDEP+9 , LASTDEP+10, LASTDEP+11, CVD+3~, CVD+7, CVD+8, CVD+9, CVD+11, CVD+15, CVD+18, CVD+21* , CVD+23, CVD+24, CVD+25, CVD+26, CVD+27, CVD+28, CVD+29, CVD+30
Y	TBTX+7~, CPT+8~, RAD+7~, RAD+15, RAD+16, RAD+17, INSULIN+4, SULF+4, SULFLIKE+4, MET+4 , ACAR+4, TROG+4, SGLT2+4, DPP4+4, AMYLIN+4, GLP1+7, GLP1+10, BROM+4, COLE+4, DEPDX+33* , DEPDX+34, PLCODE+7~, PLTAX+5~, VE~, VE+1, CVD+3~, CVD+16, CVD+19, CVD+22*
Z	CVD+3~, CVD+22*

Customize PDF page

Package: Diabetes Registry

Routine: BDMDE12

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed