Routine: BDMP912

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

BDMP912 ; IHS/CMI/LAB - 2003 DIABETES AUDIT ;

Source Information

Source file <BDMP912.m>

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
DRG Grouper	2	$$ICDOP^ICDCODE $$CPT^ICPTCOD
Diabetes Registry	2	($$CPT,$$RAD)^BDMP912 $$REFUSAL^BDMP917
IHS Patient	1	($$AGE,$$DOB,$$SEX)^AUPNPAT
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Patient Care Component Reports	1	$$START1^APCLDF
Taxonomy	1	$$ICD^ATXCHK
VA Fileman	1	^%DT

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
Diabetes Registry	5	BDMP910 BDMP911 BDMP912 BDMP916 BDMP91B

Entry Points

Name	Comments	DBIA/ICR reference
INSULIN(P,BDATE,EDATE)	;EP
ALT(P,BDATE,EDATE)	;EP
AST(P,BDATE,EDATE)	;EP
MET(P,BDATE,EDATE)	;EP
LOINC(A,B)	;
PAP(P,BDATE,EDATE)	; EP
ACAR(P,BDATE,EDATE)	;EP
EKG(P,EDATE,F)	;EP
SETN	;
TROG(P,BDATE,EDATE)	;EP
TXNAMES(Y)	;
TBTX(P)	;EP
CPT(P,BDATE,EDATE,T,F)	;EP return ien of CPT entry if patient had this CPT
HYSTER(P,EDATE)	;EP
RAD(P,BDATE,EDATE,T,F)	;EP return if a v rad entry in date range
SULF(P,BDATE,EDATE)	;EP
TXNAME(V)	;EP
WH(P,BDATE,EDATE,T,F)	;EP
MAMMOG(P,BDATE,EDATE)	; EP
MAMMOG1(P,BDATE,EDATE)	;for radiology 4.5+ or until qman can handle taxonomies for radiology procedures

External References

Name	Field # of Occurrence
^%DT	PAP+2, PAP+3, EKG+2, MAMMOG+2, MAMMOG+3
$$START1^APCLDF	TBTX+4, PAP+7, PAP+23, PAP+27, EKG+3, EKG+5, EKG+9, EKG+13, ALT+3, ALT+5 , AST+3, AST+5, INSULIN+2, SULF+2, MET+2, ACAR+2, TROG+2, MAMMOG+24, MAMMOG+28, MAMMOG+32 , MAMMOG1+11
$$ICD^ATXCHK	CPT+14, RAD+17
$$AGE^AUPNPAT	PAP+5, MAMMOG+5
$$DOB^AUPNPAT	EKG+3, HYSTER+12
$$SEX^AUPNPAT	PAP+4, MAMMOG+4
$$CPT^BDMP912	EKG+19, MAMMOG+38
$$RAD^BDMP912	EKG+23
$$REFUSAL^BDMP917	PAP+38, PAP+42
$$ICDOP^ICDCODE	HYSTER+3
$$CPT^ICPTCOD	MAMMOG+18
$$FMADD^XLFDT	CPT+5, RAD+5, WH+5
$$FMTE^XLFDT	PAP+8, PAP+15, PAP+16, PAP+20, PAP+24, PAP+28, PAP+34, CPT+22, RAD+26, EKG+27 , ALT+5, ALT+7, AST+5, AST+7, MAMMOG+42, WH+20

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	TBTX+9, LOINC+3, LOINC+5
^ATXAX("B"	TBTX+7, PAP+9, PAP+30, EKG+18, MAMMOG+37, HYSTER+13
^ATXLAB - [#9002228]	PAP+16, PAP+42
^ATXLAB("B"	PAP+10, PAP+39
^AUPNHF("AA"	TBTX+9
^AUPNVCPT - [#9000010.18]	CPT+14, CPT+21, CPT+22
^AUPNVCPT("AD"	CPT+12, CPT+13
^AUPNVLAB - [#9000010.09]	SETN+1, PAP+14, PAP+15, PAP+16, PAP+18, ALT+7, AST+7
^AUPNVLAB("AE"	PAP+11, PAP+12, PAP+13
^AUPNVPRC - [#9000010.08]	HYSTER+3, HYSTER+6
^AUPNVPRC("AC"	HYSTER+3
^AUPNVRAD - [#9000010.22]	RAD+14, RAD+15, RAD+25, RAD+26, MAMMOG+12, MAMMOG+15
^AUPNVRAD("AC"	MAMMOG+11
^AUPNVRAD("AD"	RAD+12, RAD+13
^AUPNVSIT - [#9000010]	CPT+11, CPT+21, CPT+22, RAD+11, RAD+25, RAD+26, MAMMOG+12, HYSTER+6
^AUPNVSIT("AA"	CPT+9, CPT+10, RAD+9, RAD+10
^AUTTHF - [#9999999.64]	TBTX+9
^AUTTLOC - [#9999999.06]	MAMMOG+8
^AUTTSITE(1	MAMMOG+8
^BWPCD - [#9002086.1]	WH+9, WH+10, WH+11, WH+19, WH+20
^BWPCD("C"	WH+8
^BWPN("B"	PAP+33, HYSTER+10
^DIC(40.7 - [#40.7]	MAMMOG1+2
^DPT - [#2]	HYSTER+15
^LAB(60 - [#60]	PAP+15, PAP+37
^LAB(95.3 - [#95.3]	LOINC+2, LOINC+4
^RAMIS(71 - [#71]	RAD+15, RAD+16, MAMMOG+15, MAMMOG1+3, MAMMOG1+4, MAMMOG1+5, MAMMOG1+6

Name	Line Occurrences
$$CPT	PAP+31, HYSTER+15
$$HYSTER	PAP+6
$$LOINC	PAP+19
$$MAMMOG1	MAMMOG+8
$$TXNAMES	TXNAME+2
$$WH	PAP+35, HYSTER+12
SETN	ALT+6, AST+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PAP+1~, PAP+7, PAP+23, PAP+27, EKG+3~, EKG+5, EKG+9, EKG+13, ALT+1~, ALT+3 , ALT+5, AST+1~, AST+3, AST+5, MAMMOG+24, MAMMOG+28, MAMMOG+32, MAMMOG1+11, LOINC+1~, LOINC+2 , LOINC+3, LOINC+4*, LOINC+5
%DT	PAP+1~, PAP+2, PAP+3, EKG+2, MAMMOG+1~, MAMMOG+2, MAMMOG+3*
A	SETN+1~*, LOINC~, LOINC+2, LOINC+4
B	PAP+11*, LOINC~, LOINC+3, LOINC+5
BD	PAP+3, PAP+11, PAP+35, CPT+7~, CPT+8, CPT+9, RAD+7~, RAD+8, RAD+9, MAMMOG+1~ , MAMMOG+3
BDATE	PAP~, PAP+3, PAP+7, PAP+23, PAP+27, PAP+38, PAP+42, CPT~, CPT+5, CPT+8 , RAD~, RAD+5, RAD+8, ALT~, ALT+3, AST~, AST+3, INSULIN~, INSULIN+2, SULF~ , SULF+2, MET~, MET+2, ACAR~, ACAR+2, TROG~, TROG+2, MAMMOG~, MAMMOG+3, MAMMOG+8 , MAMMOG+14, MAMMOG+24, MAMMOG+28, MAMMOG+32, MAMMOG1~, MAMMOG1+11, WH~, WH+5*, WH+12
BDM	TBTX+2~, TBTX+3!, PAP+7~, PAP+23!, PAP+27!, PAP+31!, EKG+3~, EKG+4, EKG+5!, EKG+9! , EKG+13!, EKG+19!, EKG+20!, EKG+23!, EKG+24!, ALT+1~, ALT+2!, ALT+5!, AST+1~, AST+2! , AST+5!, INSULIN+1~, SULF+1~, MET+1~, ACAR+1~, TROG+1~, MAMMOG+9~, MAMMOG+10!, MAMMOG+24!, MAMMOG+28! , MAMMOG+32!, MAMMOG+38!, MAMMOG+39!
BDM(	SETN+1, ALT+7, AST+7
BDM(0	MAMMOG+23
BDM(1	TBTX+6, PAP+8, PAP+24, PAP+28, PAP+31, EKG+4, EKG+6, EKG+7, EKG+8, EKG+10 , EKG+11, EKG+12, EKG+14, EKG+15, EKG+16, EKG+19, EKG+20, EKG+21, EKG+22, EKG+23* , EKG+24, EKG+25, EKG+26, ALT+4, ALT+5, AST+4, AST+5, INSULIN+3, SULF+3, MET+3 , ACAR+3, TROG+3, MAMMOG+25, MAMMOG+26, MAMMOG+27, MAMMOG+29, MAMMOG+30, MAMMOG+31, MAMMOG+33, MAMMOG+34 , MAMMOG+35, MAMMOG+38*, MAMMOG+39, MAMMOG+40, MAMMOG+41
BDM(9999999	MAMMOG+19, MAMMOG+20, MAMMOG+21*
BDMC	PAP+1~, PAP+11, PAP+12, PAP+13, PAP+15, PAP+16, PAP+20, PAP+22
BDMLTAX	PAP+1~, PAP+10*, PAP+16
BDMLTX	PAP+1~, PAP+9*, PAP+19
BDMMAM	MAMMOG1+1~
BDMMAM(	MAMMOG1+6*, MAMMOG1+10, MAMMOG1+11, MAMMOG1+13
BDMNAM	MAMMOG1+9~, MAMMOG1+13*
BDMSAV	MAMMOG1+9~, MAMMOG1+10, MAMMOG1+13, MAMMOG1+16
BDMX	MAMMOG1+9~, MAMMOG1+10*, MAMMOG1+11, MAMMOG1+13
BDMY	MAMMOG1+9~
BDMY(1	MAMMOG1+13
>> C	HYSTER+3*, HYSTER+4
CODE	MAMMOG1+1~, MAMMOG1+2*, MAMMOG1+5
COUNT	MAMMOG1+1~, MAMMOG1+6*
D	PAP+11, PAP+12, PAP+13, PAP+15, PAP+16, PAP+20, CPT+7~, RAD+7~, ALT+5, AST+5* , HYSTER+6, HYSTER+7, WH+7~, WH+11, WH+12, WH+13, WH+19, WH+20
E	TBTX+2~, TBTX+4, TBTX+5, PAP+7, PAP+11, PAP+23, PAP+27, EKG+3~, EKG+5, EKG+9 , EKG+13, ALT+1~, ALT+3, ALT+5, AST+1~, AST+3, AST+5, INSULIN+1~, INSULIN+2, SULF+1~ , SULF+2, MET+1~, MET+2, ACAR+1~, ACAR+2, TROG+1~, TROG+2, MAMMOG+24, MAMMOG+28, MAMMOG+32* , MAMMOG1+11*
ED	PAP+1~, PAP+2, PAP+5, PAP+11, PAP+31, PAP+35, CPT+7~, CPT+8, CPT+9, CPT+10 , RAD+7~, RAD+8, RAD+9, RAD+10, EKG+2, EKG+19, EKG+23, MAMMOG+1~, MAMMOG+2*, MAMMOG+5 , MAMMOG+38
EDATE	PAP~, PAP+2, PAP+6, PAP+7, PAP+23, PAP+27, PAP+38, PAP+42, CPT~, CPT+4 , CPT+5, CPT+8, RAD~, RAD+4, RAD+5, RAD+8, EKG~, EKG+2, EKG+3, ALT~ , ALT+3, AST~, AST+3, INSULIN~, INSULIN+2, SULF~, SULF+2, MET~, MET+2, ACAR~ , ACAR+2, TROG~, TROG+2, MAMMOG~, MAMMOG+2, MAMMOG+8, MAMMOG+13, MAMMOG+24, MAMMOG+28, MAMMOG+32 , MAMMOG1~, MAMMOG1+11, HYSTER~, HYSTER+7, HYSTER+12, HYSTER+15, WH~, WH+4, WH+5, WH+13
F	CPT~, CPT+3, CPT+19, CPT+20, CPT+21, CPT+22, RAD~, RAD+3, RAD+23, RAD+24 , RAD+25, RAD+26, EKG~, EKG+1, EKG+27, HYSTER+3, HYSTER+6, WH~, WH+3*, WH+17 , WH+18, WH+19, WH+20
G	SETN+1~, SETN+2, TBTX+9~, TBTX+10, PAP+36, PAP+41, PAP+42, PAP+43, CPT+7~, CPT+8 , CPT+9, CPT+10, CPT+13, CPT+14, CPT+18, CPT+19, CPT+20, CPT+21, CPT+22, RAD+7~ , RAD+8, RAD+9, RAD+10, RAD+13, RAD+18, RAD+22, RAD+23, RAD+24, RAD+25, RAD+26 , MAMMOG+1~, MAMMOG+11, HYSTER+4, HYSTER+5, WH+7~, WH+8, WH+14*, WH+16, WH+17, WH+18 , WH+19, WH+20
IEN	MAMMOG1+1~, MAMMOG1+3*, MAMMOG1+4, MAMMOG1+5, MAMMOG1+6
>> J	PAP+18*, PAP+19
>> L	PAP+12*, PAP+13
LEKG	EKG+3~, EKG+4, EKG+7, EKG+8, EKG+11, EKG+12, EKG+15, EKG+16, EKG+21, EKG+22 , EKG+25, EKG+26*, EKG+27
LMAM	MAMMOG+7~, MAMMOG+8, MAMMOG+23, MAMMOG+26, MAMMOG+27, MAMMOG+30, MAMMOG+31, MAMMOG+34, MAMMOG+35, MAMMOG+40 , MAMMOG+41*, MAMMOG+42
>> LMAN	MAMMOG+23
N	SETN+1, SETN+2, ALT+6~, ALT+7, AST+6~, AST+7
P	TBTX~, TBTX+1, TBTX+4, TBTX+9, PAP~, PAP+4, PAP+5, PAP+6, PAP+7, PAP+11 , PAP+12, PAP+13, PAP+23, PAP+27, PAP+31, PAP+35, PAP+38, PAP+42, CPT~, CPT+1 , CPT+9, CPT+10, RAD~, RAD+1, RAD+9, RAD+10, EKG~, EKG+3, EKG+5, EKG+9 , EKG+13, EKG+19, EKG+23, ALT~, ALT+3, ALT+5, AST~, AST+3, AST+5, INSULIN~ , INSULIN+2, SULF~, SULF+2, MET~, MET+2, ACAR~, ACAR+2, TROG~, TROG+2, MAMMOG~ , MAMMOG+4, MAMMOG+5, MAMMOG+6, MAMMOG+8, MAMMOG+11, MAMMOG+24, MAMMOG+28, MAMMOG+32, MAMMOG+38, MAMMOG1~ , MAMMOG1+11, HYSTER~, HYSTER+1, HYSTER+3, HYSTER+12, HYSTER+15, WH~, WH+1, WH+8
R	ALT+1~, AST+1~
>> S	HYSTER+3, HYSTER+8, HYSTER+9
T	TBTX+7~, TBTX+8, TBTX+9, PAP+17, PAP+30, PAP+31, PAP+33, PAP+34, PAP+35, PAP+37 , PAP+38, PAP+39, PAP+40, PAP+42, CPT~, CPT+2, CPT+14, RAD~, RAD+2, RAD+17 , EKG+18, EKG+19, EKG+23, MAMMOG+37, MAMMOG+38, HYSTER+10, HYSTER+11, HYSTER+12, HYSTER+13*, HYSTER+14 , HYSTER+15, WH~, WH+2, WH+10
U	SETN+1, TBTX+6, TBTX+9, TBTX+10, PAP+8, PAP+15, PAP+16, PAP+18, PAP+24, PAP+28 , PAP+42, CPT+14, CPT+21, CPT+22, RAD+15, RAD+16, RAD+25, RAD+26, EKG+4, EKG+7 , EKG+8, EKG+11, EKG+12, EKG+15, EKG+16, EKG+21, EKG+22, EKG+25, EKG+26, ALT+5 , ALT+7, AST+5, AST+7, MAMMOG+8, MAMMOG+12, MAMMOG+15, MAMMOG+18, MAMMOG+26, MAMMOG+27, MAMMOG+30 , MAMMOG+31, MAMMOG+34, MAMMOG+35, MAMMOG+40, MAMMOG+41, MAMMOG1+6, MAMMOG1+13, HYSTER+3, HYSTER+6, HYSTER+15 , WH+10, WH+11, WH+19, WH+20, LOINC+2, LOINC+4
V	CPT+7~, CPT+10, CPT+11, CPT+12, CPT+13, CPT+21, CPT+22, RAD+7~, RAD+10, RAD+11 , RAD+12, RAD+13, RAD+25, RAD+26, ALT+1~, AST+1~, MAMMOG+1~, MAMMOG+11, MAMMOG+12, MAMMOG+13 , MAMMOG+14, MAMMOG+19, MAMMOG+20, MAMMOG+21, TXNAME~, TXNAME+1, TXNAME+2, TXNAME+3, WH+7~, WH+8 , WH+9, WH+10, WH+11, WH+14
X	TBTX+2~, TBTX+4, TBTX+9, PAP+1~, PAP+2, PAP+3, PAP+13, PAP+14, PAP+15, PAP+16 , PAP+18, PAP+34, PAP+35, PAP+42, CPT+7~, CPT+13, CPT+14, RAD+7~, RAD+13, RAD+14 , RAD+15, RAD+18, EKG+2, EKG+3~, ALT+1~, AST+1~, INSULIN+1~, INSULIN+2, SULF+1~, SULF+2 , MET+1~, MET+2, ACAR+1~, ACAR+2, TROG+1~, TROG+2, MAMMOG+1~, MAMMOG+2, MAMMOG+3, MAMMOG+11 , MAMMOG+12, MAMMOG+15, MAMMOG1+1~, HYSTER+11, HYSTER+12, HYSTER+14, HYSTER+15, WH+7~
Y	TBTX+7~, PAP+2, PAP+3, CPT+7~, RAD+7~, RAD+15, RAD+16, RAD+17, EKG+2, MAMMOG+1~ , MAMMOG+2, MAMMOG+3, MAMMOG+11, MAMMOG+15, MAMMOG+16, MAMMOG+18*, MAMMOG+19, MAMMOG+20, MAMMOG+21, TXNAMES~ , TXNAMES+1, TXNAMES+2, TXNAMES+3, TXNAMES+4, TXNAMES+5, TXNAMES+6, TXNAMES+7, TXNAMES+8, TXNAMES+9, TXNAMES+10 , TXNAMES+11, TXNAMES+12, TXNAMES+13, TXNAMES+14, TXNAMES+15, TXNAMES+16, TXNAMES+17, TXNAMES+18, TXNAMES+19, TXNAMES+20 , TXNAMES+21, TXNAMES+22, TXNAMES+23, TXNAMES+24, TXNAMES+25, TXNAMES+26, TXNAMES+27, WH+7~
>> Z	PAP+15*

Customize PDF page

Package: Diabetes Registry

Routine: BDMP912

Call Graph Total: 9

Caller Graph Total: 5