Routine: BHSDM4

Information

BHSDM4 ;IHS/CIA/MGH - Health Summary for Diabetic Supplement ;30-Nov-2015 10:24;DU

Source Information

Source file <BHSDM4.m>

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
Patient Care Component	4	$$LOINC^APCHS9B2 $$REFDF^APCHS9B3 $$LASTPAP^APCHSMU $$CPT^APCHSMU2
Health Summary Components	3	$$REFDF^BHSDM3 ^BHSMU ($$CPT,$$WH)^BHSMU2
DRG Grouper	2	$$ICDOP^ICDEX $$CPT^ICPTCOD
Kernel	2	$$FMTE^XLFDT $$VERSION^XPDUTL
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV,$$PRIMPROV)^APCLV
IHS Patient	1	($$AGE,$$DOB,$$SEX)^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Taxonomy	1	$$ICD^ATXAPI
Women's Health	1	$$WHAPI^BWVPAT1

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Health Summary Components	3	BHSDM3 BHSDM5 BHSDM6

Entry Points

Name	Comments	DBIA/ICR reference
PLDMDOO(P,F)	;EP get first dm dx from case management
EYE(P,BHSSED)	;EP
BREAST(P,BHSSED)	;EP
CMSFDX(P,F)	;EP - return date/dx of dm in register
DNKA(V)	;EP is this a DNKA visit?
MAMMOG(P)	;EP
FRSTDMDX(P,F)	;EP return date of first dm dx
PAP(P,BHSSED)	;EP
HYSTER(P,EDATE)	;EP
MAMMOG1(P)	;for radiology 4.5+ or until qman can handle taxonomies for radiology procedures
RECTAL(P,BHSSED)	;EP
DFE(P,BHSSED)	;EP
OLDPAP	;
REFR(V)	;

External References

Name	Field # of Occurrence
$$LOINC^APCHS9B2	OLDPAP+15
$$REFDF^APCHS9B3	PAP+4, MAMMOG+60, MAMMOG+63, MAMMOG+66, MAMMOG+69, MAMMOG+72, MAMMOG+75, MAMMOG+78, MAMMOG+81, MAMMOG+84 , MAMMOG+87, MAMMOG+90
$$LASTPAP^APCHSMU	PAP+3
$$CPT^APCHSMU2	MAMMOG+36
$$START1^APCLDF	FRSTDMDX+5, DFE+1, DFE+6, EYE+1, EYE+16, RECTAL+2, OLDPAP+2, OLDPAP+4, OLDPAP+22, OLDPAP+26 , BREAST+2, MAMMOG+19, MAMMOG+23, MAMMOG+27, MAMMOG+31, MAMMOG1+15
$$CLINIC^APCLV	DFE+11, EYE+22
$$PRIMPOV^APCLV	DNKA+2, DNKA+4, REFR+2
$$PRIMPROV^APCLV	DFE+9, EYE+20
$$ICD^ATXAPI	PLDMDOO+10
$$AGE^AUPNPAT	RECTAL+1
$$DOB^AUPNPAT	OLDPAP+34, HYSTER+17
$$SEX^AUPNPAT	PAP+1, BREAST+1, MAMMOG+1, MAMMOG1+1
$$REFDF^BHSDM3	DFE+13, EYE+24, OLDPAP+38
^BHSMU	OLDPAP+30
$$CPT^BHSMU2	HYSTER+20
$$WH^BHSMU2	OLDPAP+34, HYSTER+17
$$WHAPI^BWVPAT1	MAMMOG+43
$$ICDOP^ICDEX	HYSTER+7
$$CPT^ICPTCOD	EYE+12
$$VAL^XBDIQ1	EYE+27
$$FMTE^XLFDT	FRSTDMDX+6, CMSFDX+6, PLDMDOO+16, DFE+3, DFE+6, DFE+10, DFE+12, DFE+15, EYE+3, EYE+12 , EYE+16, EYE+21, EYE+23, EYE+26, RECTAL+4, RECTAL+5, BREAST+4, BREAST+5, HYSTER+14, HYSTER+16 , HYSTER+19
$$VERSION^XPDUTL	MAMMOG+41

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACM(41.1 - [#9002241.1]	CMSFDX+4
^ACM(44 - [#9002244]	CMSFDX+5, CMSFDX+6
^ATXAX("B"	PLDMDOO+6, OLDPAP+7, MAMMOG+35, HYSTER+18
^AUPNPROB - [#9000011]	PLDMDOO+9, PLDMDOO+11
^AUPNPROB("AC"	PLDMDOO+8
^AUPNVCPT("AA"	EYE+8, OLDPAP+30
^AUPNVLAB - [#9000010.09]	OLDPAP+12, OLDPAP+13, OLDPAP+16
^AUPNVLAB("AE"	OLDPAP+9, OLDPAP+10, OLDPAP+11
^AUPNVPRC - [#9000010.08]	HYSTER+7, HYSTER+11
^AUPNVPRC("AC"	HYSTER+7
^AUPNVRAD - [#9000010.22]	MAMMOG+6, MAMMOG+7
^AUPNVRAD("AC"	MAMMOG+5
^AUPNVSIT - [#9000010]	OLDPAP+17, MAMMOG+6, HYSTER+7, HYSTER+11
^AUTTEXAM("B"	DFE+13, EYE+24
^AUTTLOC - [#9999999.06]	MAMMOG+3
^AUTTSITE(1	MAMMOG+3
^BWPCD - [#9002086.1]	MAMMOG+52, MAMMOG+53, MAMMOG+54
^BWPCD("C"	MAMMOG+51
^BWPN("B"	OLDPAP+33, MAMMOG+49, HYSTER+15
^BWVPDT("B"	MAMMOG+42
^DIC(40.7 - [#40.7]	MAMMOG1+6
^DPT - [#2]	MAMMOG+36, HYSTER+20
^ICPT("B"	EYE+7, OLDPAP+30
^LAB(60 - [#60]	PAP+4, OLDPAP+38
^RAMIS(71 - [#71]	MAMMOG+7, MAMMOG+59, MAMMOG+62, MAMMOG+65, MAMMOG+68, MAMMOG+71, MAMMOG+74, MAMMOG+77, MAMMOG+80, MAMMOG+83 , MAMMOG+86, MAMMOG+89, MAMMOG1+7, MAMMOG1+8, MAMMOG1+9, MAMMOG1+10

Name	Line Occurrences
$$DNKA	DFE+9, DFE+11, EYE+20, EYE+22
$$MAMMOG1	MAMMOG+3
$$REFR	EYE+20, EYE+22

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DFE+1~, DFE+6, DFE+8, EYE+1~, EYE+16, EYE+18, EYE+26, EYE+27, EYE+28, RECTAL+2* , OLDPAP+1~, OLDPAP+2, OLDPAP+4~, OLDPAP+22, OLDPAP+26, OLDPAP+30~, BREAST+2~, MAMMOG+4~, MAMMOG+19, MAMMOG+23 , MAMMOG+27, MAMMOG+31, MAMMOG1+15*
APCHY	MAMMOG+59!, MAMMOG+60, MAMMOG+62, MAMMOG+63, MAMMOG+65, MAMMOG+66, MAMMOG+68!, MAMMOG+69, MAMMOG+71, MAMMOG+72 , MAMMOG+74, MAMMOG+75, MAMMOG+77!, MAMMOG+78, MAMMOG+80, MAMMOG+81, MAMMOG+83, MAMMOG+84, MAMMOG+86!, MAMMOG+87 , MAMMOG+89*, MAMMOG+90
BHSCPT	EYE+4, EYE+5~, EYE+10, EYE+12
BHSCPT1	EYE+5~, EYE+10*, EYE+12
BHSEX	EYE+1~, EYE+2, EYE+10*, EYE+27
BHSLT	OLDPAP+4~, OLDPAP+7*, OLDPAP+8, OLDPAP+15
BHSMAM	MAMMOG1+5~
BHSMAM(	MAMMOG1+10*, MAMMOG1+14, MAMMOG1+15, MAMMOG1+17
BHSNAM	MAMMOG1+13~, MAMMOG1+17*
BHSS	FRSTDMDX+3~
BHSS(1	FRSTDMDX+5
BHSSAV	MAMMOG1+13~, MAMMOG1+14, MAMMOG1+17, MAMMOG1+20
BHSSED	DFE~, DFE+3, DFE+6, EYE~, EYE+3, EYE+12, EYE+16, RECTAL~, RECTAL+4, PAP~ , BREAST~, BREAST+4
BHSV	DFE+1~, DFE+5!, EYE+15!
BHSV(	DFE+9, DFE+11, EYE+20, EYE+22
BHSV(9999999	DFE+8, EYE+18
BHSVDT	HYSTER+4~, HYSTER+7*
BHSX	DFE+3, EYE+3, RECTAL+4, BREAST+4, MAMMOG1+13~, MAMMOG1+14*, MAMMOG1+15, MAMMOG1+17
BHSY	DFE+1~, DFE+5!, EYE+1~, EYE+4!, EYE+8, EYE+9, EYE+10, EYE+15!, RECTAL+2~, RECTAL+3 , OLDPAP+1~, OLDPAP+4~, OLDPAP+22!, OLDPAP+26!, OLDPAP+30!, BREAST+2~, BREAST+3, MAMMOG+4~!, MAMMOG+19!, MAMMOG+23! , MAMMOG+27!, MAMMOG+31!, MAMMOG1+13~
BHSY(	DFE+8, EYE+18
BHSY(1	DFE+2, DFE+3, EYE+2, EYE+3, RECTAL+4, RECTAL+5, OLDPAP+3, OLDPAP+5, OLDPAP+23, OLDPAP+24 , OLDPAP+25, OLDPAP+27, OLDPAP+28, OLDPAP+29, OLDPAP+30*, OLDPAP+31, OLDPAP+32, BREAST+4, BREAST+5, MAMMOG+20 , MAMMOG+21, MAMMOG+22, MAMMOG+24, MAMMOG+25, MAMMOG+26, MAMMOG+28, MAMMOG+29, MAMMOG+30, MAMMOG+32, MAMMOG+33 , MAMMOG+34, MAMMOG1+17
C	EYE+5~, EYE+7, EYE+10, HYSTER+3~, HYSTER+7, HYSTER+9
CODE	MAMMOG1+5~, MAMMOG1+6*, MAMMOG1+9
COUNT	MAMMOG1+5~, MAMMOG1+10*
D	CMSFDX+4~, CMSFDX+5, CMSFDX+6, CMSFDX+7, PLDMDOO+8~, PLDMDOO+14, PLDMDOO+15, PLDMDOO+16, DNKA+2~, DNKA+3 , DNKA+5, DNKA+6, DNKA+7, REFR+2~, REFR+3, DFE+9~, DFE+11, EYE+19~, EYE+20, EYE+22* , OLDPAP+1~, OLDPAP+9, OLDPAP+10, OLDPAP+11, MAMMOG+54, MAMMOG+55, MAMMOG+56, HYSTER+11*, HYSTER+14
D(	PLDMDOO+11*
D(0	PLDMDOO+14
D1	CMSFDX+4~, CMSFDX+6*
DT	DFE+6, EYE+16, OLDPAP+34, MAMMOG+36
E	FRSTDMDX+3~, FRSTDMDX+5, DFE+1, DFE+6, EYE+1, EYE+16, RECTAL+2, OLDPAP+2, OLDPAP+4, OLDPAP+22* , OLDPAP+26, BREAST+2, MAMMOG+19, MAMMOG+23, MAMMOG+27, MAMMOG+31, MAMMOG1+15*
EDATE	HYSTER~, HYSTER+17, HYSTER+20
F	FRSTDMDX~, FRSTDMDX+1, FRSTDMDX+6, CMSFDX~, CMSFDX+1, CMSFDX+6, PLDMDOO~, PLDMDOO+2, PLDMDOO+16, HYSTER+3~ , HYSTER+7, HYSTER+11
G	CMSFDX+4~, CMSFDX+5, DFE+9~, DFE+10, DFE+11, DFE+12, DFE+13, DFE+14, EYE+19~, EYE+20* , EYE+21, EYE+22, EYE+23, EYE+24, EYE+25, PAP+4, PAP+5, OLDPAP+9, OLDPAP+10, OLDPAP+11 , OLDPAP+17, OLDPAP+19, OLDPAP+20, OLDPAP+21, OLDPAP+38, OLDPAP+39, MAMMOG+4~, MAMMOG+51, MAMMOG+58, MAMMOG+59 , MAMMOG+60, MAMMOG+61, MAMMOG+62, MAMMOG+63, MAMMOG+64, MAMMOG+65, MAMMOG+66, MAMMOG+67, MAMMOG+68, MAMMOG+69 , MAMMOG+70, MAMMOG+71, MAMMOG+72, MAMMOG+73, MAMMOG+74, MAMMOG+75, MAMMOG+76, MAMMOG+77, MAMMOG+78, MAMMOG+79 , MAMMOG+80, MAMMOG+81, MAMMOG+82, MAMMOG+83, MAMMOG+84, MAMMOG+85, MAMMOG+86, MAMMOG+87, MAMMOG+88, MAMMOG+89* , MAMMOG+90, MAMMOG+91, HYSTER+3~, HYSTER+9, HYSTER+10, HYSTER+14
I	PLDMDOO+8~, PLDMDOO+9, PLDMDOO+10, OLDPAP+1~, OLDPAP+11, OLDPAP+12, OLDPAP+13, OLDPAP+16
IEN	MAMMOG1+5~, MAMMOG1+7*, MAMMOG1+8, MAMMOG1+9, MAMMOG1+10
J	OLDPAP+1~, OLDPAP+13*, OLDPAP+14, OLDPAP+15
LDEE	EYE+1~, EYE+2, EYE+10*, EYE+12, EYE+26
LDFE	DFE+1~, DFE+2, DFE+13, DFE+15, EYE+24
LMAM	MAMMOG+2~, MAMMOG+3, MAMMOG+8, MAMMOG+9, MAMMOG+10, MAMMOG+11, MAMMOG+12, MAMMOG+13, MAMMOG+14, MAMMOG+15 , MAMMOG+16, MAMMOG+17, MAMMOG+18, MAMMOG+21, MAMMOG+22, MAMMOG+25, MAMMOG+26, MAMMOG+29, MAMMOG+30, MAMMOG+33 , MAMMOG+34, MAMMOG+38, MAMMOG+39, MAMMOG+45, MAMMOG+46, MAMMOG+55, MAMMOG+56, MAMMOG+60, MAMMOG+61, MAMMOG+63 , MAMMOG+64, MAMMOG+66, MAMMOG+67, MAMMOG+69, MAMMOG+70, MAMMOG+72, MAMMOG+73, MAMMOG+75, MAMMOG+76, MAMMOG+78 , MAMMOG+79, MAMMOG+81, MAMMOG+82, MAMMOG+84, MAMMOG+85, MAMMOG+87, MAMMOG+88, MAMMOG+90, MAMMOG+91, MAMMOG+92
LPAP	PAP+3, PAP+4, PAP+5, PAP+6, OLDPAP+1~, OLDPAP+2, OLDPAP+3, OLDPAP+4~, OLDPAP+5, OLDPAP+20 , OLDPAP+21, OLDPAP+24, OLDPAP+25, OLDPAP+28, OLDPAP+29, OLDPAP+31, OLDPAP+32, OLDPAP+36, OLDPAP+37, OLDPAP+38 , OLDPAP+39, OLDPAP+40
N	CMSFDX+4~, DNKA+2~, DNKA+4, DNKA+5, DNKA+6, DNKA+7, REFR+2~
P	FRSTDMDX~, FRSTDMDX+2, FRSTDMDX+5, CMSFDX~, CMSFDX+2, CMSFDX+5, PLDMDOO~, PLDMDOO+1, PLDMDOO+8, DFE~ , DFE+1, DFE+6, DFE+13, EYE~, EYE+1, EYE+8, EYE+16, EYE+24, RECTAL~, RECTAL+1 , RECTAL+2, PAP~, PAP+1, PAP+3, PAP+4, OLDPAP+2, OLDPAP+4, OLDPAP+9, OLDPAP+10, OLDPAP+11 , OLDPAP+22, OLDPAP+26, OLDPAP+30, OLDPAP+34, OLDPAP+38, BREAST~, BREAST+1, BREAST+2, MAMMOG~, MAMMOG+1 , MAMMOG+3, MAMMOG+5, MAMMOG+19, MAMMOG+23, MAMMOG+27, MAMMOG+31, MAMMOG+36, MAMMOG+43, MAMMOG+51, MAMMOG+60 , MAMMOG+63, MAMMOG+66, MAMMOG+69, MAMMOG+72, MAMMOG+75, MAMMOG+78, MAMMOG+81, MAMMOG+84, MAMMOG+87, MAMMOG+90 , MAMMOG1~, MAMMOG1+1, MAMMOG1+15, HYSTER~, HYSTER+2, HYSTER+7, HYSTER+17, HYSTER+20
PROV	DFE+9~, DFE+11, EYE+19~, EYE+20, EYE+22
R	CMSFDX+4~*, CMSFDX+5
S	HYSTER+3~, HYSTER+7, HYSTER+13, HYSTER+14
T	PLDMDOO+3~, PLDMDOO+6, PLDMDOO+7, PLDMDOO+10, EYE+5~, EYE+7, EYE+8, EYE+10, OLDPAP+1~, OLDPAP+10* , OLDPAP+11, OLDPAP+30, OLDPAP+33, OLDPAP+34, MAMMOG+2~, MAMMOG+35, MAMMOG+36, MAMMOG+42, MAMMOG+43, MAMMOG+49* , MAMMOG+50, MAMMOG+53, HYSTER+3~, HYSTER+15, HYSTER+16, HYSTER+17, HYSTER+18, HYSTER+19, HYSTER+20
TAXARR	PLDMDOO+3~, PLDMDOO+5*
U	FRSTDMDX+5, CMSFDX+5, CMSFDX+6, PLDMDOO+9, PLDMDOO+11, DFE+2, DFE+3, DFE+8, EYE+2, EYE+3 , EYE+12, EYE+18, RECTAL+4, RECTAL+5, OLDPAP+3, OLDPAP+5, OLDPAP+13, OLDPAP+16, OLDPAP+17, OLDPAP+24 , OLDPAP+25, OLDPAP+28, OLDPAP+29, OLDPAP+31, OLDPAP+32, BREAST+4, BREAST+5, MAMMOG+3, MAMMOG+6, MAMMOG+7 , MAMMOG+21, MAMMOG+22, MAMMOG+25, MAMMOG+26, MAMMOG+29, MAMMOG+30, MAMMOG+33, MAMMOG+34, MAMMOG+36, MAMMOG+44 , MAMMOG+45, MAMMOG+46, MAMMOG+53, MAMMOG+54, MAMMOG1+10, MAMMOG1+17, HYSTER+7, HYSTER+11, HYSTER+19, HYSTER+20
V	DNKA~, DNKA+1, DNKA+2, DNKA+4, REFR~, REFR+1, REFR+2, DFE+9~, DFE+11, EYE+19~ , EYE+20, EYE+22, OLDPAP+1~, OLDPAP+16, OLDPAP+17, MAMMOG+4~, MAMMOG+5, MAMMOG+6, MAMMOG+8, MAMMOG+9 , MAMMOG+10, MAMMOG+11, MAMMOG+12, MAMMOG+13, MAMMOG+14, MAMMOG+15, MAMMOG+16, MAMMOG+17, MAMMOG+18, MAMMOG+43 , MAMMOG+44, MAMMOG+45, MAMMOG+46, MAMMOG+51, MAMMOG+52, MAMMOG+53, MAMMOG+54
X	FRSTDMDX+3~, FRSTDMDX+5, CMSFDX+4~, CMSFDX+5, CMSFDX+6, PLDMDOO+8~, PLDMDOO+9, PLDMDOO+11, OLDPAP+34, OLDPAP+35 , OLDPAP+36, OLDPAP+37, MAMMOG+4~, MAMMOG+5, MAMMOG+6, MAMMOG+7, MAMMOG+36, MAMMOG+37, MAMMOG+38, MAMMOG+39 , MAMMOG+41, MAMMOG+42, MAMMOG+48, MAMMOG+49, MAMMOG1+5~, HYSTER+16, HYSTER+17, HYSTER+19, HYSTER+20
Y	FRSTDMDX+3~, FRSTDMDX+4, FRSTDMDX+5, FRSTDMDX+6, CMSFDX+4~, CMSFDX+5, MAMMOG+4~, MAMMOG+5, MAMMOG+7*, MAMMOG+8 , MAMMOG+9, MAMMOG+10, MAMMOG+11, MAMMOG+12, MAMMOG+13, MAMMOG+14, MAMMOG+15, MAMMOG+16, MAMMOG+17, MAMMOG+18

Customize PDF page

Package: Health Summary Components

Routine: BHSDM4

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items