Routine: BDMDE1P

Package	Total	Call Graph
Diabetes Registry	5	($$LOCN,$$LOCT)^BDMDE10 CUML^BDMDE14 SDPI^BDMDE1Q SDPI16^BDMDE1U $$DATE^BDMS9B1
Kernel	2	$$FMTE^XLFDT ($$REPEAT,$$STRIP)^XLFSTR
IHS Patient	1	$$AGE^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
CUML	;
CTR(X,Y)	;EP - Center X in a field Y wide.
PAGE	;
ACPCOQ()	;-- return none if no UACR, UPCR, Quant
DONE	;
QUANCHK()	;--check quantitative
N1
I(I)	;
ACPCRES()	;-- return result from UACR UPCR

External References

Name	Field # of Occurrence
$$AGE^AUPNPAT	BDMDE1P+148, BDMDE1P+151
$$LOCN^BDMDE10	N1
$$LOCT^BDMDE10	N1+1
CUML^BDMDE14	CUML+1
SDPI^BDMDE1Q	CUML+2
SDPI16^BDMDE1U	CUML+3
$$DATE^BDMS9B1	BDMDE1P+110, BDMDE1P+126
^DIR	N1+2, PAGE+2
$$VAL^XBDIQ1	BDMDE1P+126
$$FMTE^XLFDT	BDMDE1P+13, BDMDE1P+14, PAGE+7, PAGE+8
$$REPEAT^XLFSTR	PAGE+11
$$STRIP^XLFSTR	BDMDE1P+46

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ZZZZZZZ",! Line Location: BDMDE1P+10
Function Call: WRITE	Prompt: !! Condition for execution: $G(BDMGUI) Line Location: BDMDE1P+13
Function Call: WRITE	Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2017 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80) Line Location: BDMDE1P+13
Function Call: WRITE	Prompt: !,$$I(26.5),!,$$I(26.6) Line Location: BDMDE1P+23
Function Call: WRITE	Prompt: $S($P(%,U,1)=3:"2 No",1:"1 Yes") Line Location: BDMDE1P+31
Function Call: WRITE	Prompt: $$I(28) Line Location: BDMDE1P+35
Function Call: WRITE	Prompt: Y,"-",$S(Y=1:"Yes",1:"No")," ",$P($$I(31),U,3) Line Location: BDMDE1P+38
Function Call: WRITE	Prompt: $S(Y=1:"1 Current user",Y=2:"2 Not a current user",Y=3:"3 Not Documented",1:"") Line Location: BDMDE1P+40
Function Call: WRITE	Prompt: ?34,$$I(40) Line Location: BDMDE1P+61
Function Call: WRITE	Prompt: !?10,$P($$I(44),U,2) Line Location: BDMDE1P+74
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2)_" "_$P($$I(92),U,12),?43,$P($$I(92),U,3),?55,$E($P($$I(92),U,4),1,19) Line Location: BDMDE1P+145
Function Call: WRITE	Prompt: !?5,"This is only calculated for patients 40 years of age and older without,",!,"a statin allegry or intolerance." Line Location: BDMDE1P+148
Function Call: WRITE	Prompt: !?5,$P($$I(118),U,1) Line Location: BDMDE1P+149
Function Call: WRITE	Prompt: !! Line Location: N1+2
Function Call: WRITE	Prompt: ! Line Location: PAGE+2
Function Call: WRITE	Prompt: !,"ZZZZZZZ",! Line Location: PAGE+4
Function Call: WRITE	Prompt: !! Line Location: PAGE+5
Function Call: WRITE	Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2017 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80) Line Location: PAGE+7
Function Call: WRITE	Prompt: !,"Audit Period Ending Date: ",$$FMTE^XLFDT(BDMRED) Line Location: PAGE+8
Function Call: WRITE	Prompt: !,$S($G(BDMPPN):"NAME: "_$P($G(^DPT(BDMPD,0)),U),1:"") Line Location: PAGE+9
Function Call: WRITE	Prompt: ?J,"CHART #: ",$$I(16)," DOB: ",$$I(18)," SEX: ",$$I(20) Line Location: PAGE+10
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",79) Line Location: PAGE+11
Routine Call	DIR Line Location: N1+2 PAGE+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	BDMDE1P+14
^DPT - [#2]	BDMDE1P+17, PAGE+9
^TMP($J	DONE+1!
^XTMP("BDMDM17"	BDMDE1P+9, BDMDE1P+148, DONE+3!, I+1
^XTMP("BDMTAX"	DONE+2!

Label References

Name	Line Occurrences
$$CTR	BDMDE1P+13, PAGE+7
$$I	BDMDE1P+15, BDMDE1P+16, BDMDE1P+18, BDMDE1P+19, BDMDE1P+21, BDMDE1P+23, BDMDE1P+25, BDMDE1P+27, BDMDE1P+31, BDMDE1P+33 , BDMDE1P+35, BDMDE1P+38, BDMDE1P+40, BDMDE1P+43, BDMDE1P+46, BDMDE1P+47, BDMDE1P+49, BDMDE1P+51, BDMDE1P+53, BDMDE1P+55 , BDMDE1P+59, BDMDE1P+61, BDMDE1P+63, BDMDE1P+67, BDMDE1P+70, BDMDE1P+74, BDMDE1P+76, BDMDE1P+78, BDMDE1P+81, BDMDE1P+82 , BDMDE1P+83, BDMDE1P+84, BDMDE1P+85, BDMDE1P+86, BDMDE1P+87, BDMDE1P+88, BDMDE1P+89, BDMDE1P+90, BDMDE1P+91, BDMDE1P+92 , BDMDE1P+93, BDMDE1P+95, BDMDE1P+97, BDMDE1P+99, BDMDE1P+100, BDMDE1P+104, BDMDE1P+106, BDMDE1P+108, BDMDE1P+110, BDMDE1P+114 , BDMDE1P+116, BDMDE1P+118, BDMDE1P+120, BDMDE1P+122, BDMDE1P+126, BDMDE1P+127, BDMDE1P+129, BDMDE1P+131, BDMDE1P+135, BDMDE1P+137 , BDMDE1P+139, BDMDE1P+142, BDMDE1P+145, BDMDE1P+149, BDMDE1P+152, PAGE+10, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1 , ACPCRES+2, QUANCHK+1, QUANCHK+2, QUANCHK+3
CUML	BDMDE1P+5, BDMDE1P+6, BDMDE1P+7
N1	BDMDE1P+151
PAGE	BDMDE1P+22, BDMDE1P+24, BDMDE1P+26, BDMDE1P+28, BDMDE1P+30, BDMDE1P+32, BDMDE1P+34, BDMDE1P+36, BDMDE1P+39, BDMDE1P+41 , BDMDE1P+45, BDMDE1P+48, BDMDE1P+50, BDMDE1P+52, BDMDE1P+54, BDMDE1P+56, BDMDE1P+58, BDMDE1P+60, BDMDE1P+62, BDMDE1P+64 , BDMDE1P+66, BDMDE1P+68, BDMDE1P+71, BDMDE1P+73, BDMDE1P+75, BDMDE1P+77, BDMDE1P+79, BDMDE1P+94, BDMDE1P+96, BDMDE1P+98 , BDMDE1P+101, BDMDE1P+103, BDMDE1P+105, BDMDE1P+107, BDMDE1P+109, BDMDE1P+111, BDMDE1P+113, BDMDE1P+115, BDMDE1P+117, BDMDE1P+119 , BDMDE1P+121, BDMDE1P+123, BDMDE1P+125, BDMDE1P+128, BDMDE1P+130, BDMDE1P+134, BDMDE1P+136, BDMDE1P+138, BDMDE1P+144, BDMDE1P+146 , BDMDE1P+150, BDMDE1P+153

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	BDMDE1P+31, BDMDE1P+46, BDMDE1P+47
>> BDMADAT	BDMDE1P+148, BDMDE1P+151
BDMBTH	BDMDE1P+9, BDMDE1P+148, DONE+2, DONE+3!, I+1
>> BDMDMRG	N1, N1+1
>> BDMDSP	PAGE+1, PAGE+4
>> BDMDUZ2	BDMDE1P+14
>> BDMGUI	BDMDE1P+4, BDMDE1P+10, BDMDE1P+13, BDMDE1P+153, PAGE+4, PAGE+5
>> BDMGUIC	BDMDE1P+9, BDMDE1P+10, BDMDE1P+11, PAGE+4
>> BDMIOSL	BDMDE1P+4*, BDMDE1P+22, BDMDE1P+24, BDMDE1P+26, BDMDE1P+28, BDMDE1P+30, BDMDE1P+32, BDMDE1P+34, BDMDE1P+36, BDMDE1P+39 , BDMDE1P+41, BDMDE1P+45, BDMDE1P+48, BDMDE1P+50, BDMDE1P+52, BDMDE1P+54, BDMDE1P+56, BDMDE1P+58, BDMDE1P+60, BDMDE1P+62 , BDMDE1P+64, BDMDE1P+66, BDMDE1P+68, BDMDE1P+71, BDMDE1P+73, BDMDE1P+75, BDMDE1P+77, BDMDE1P+79, BDMDE1P+94, BDMDE1P+96 , BDMDE1P+98, BDMDE1P+101, BDMDE1P+103, BDMDE1P+105, BDMDE1P+107, BDMDE1P+109, BDMDE1P+111, BDMDE1P+113, BDMDE1P+115, BDMDE1P+117 , BDMDE1P+119, BDMDE1P+121, BDMDE1P+123, BDMDE1P+125, BDMDE1P+128, BDMDE1P+130, BDMDE1P+134, BDMDE1P+136, BDMDE1P+138, BDMDE1P+144 , BDMDE1P+146, BDMDE1P+150, BDMDE1P+153
BDMJOB	BDMDE1P+9, BDMDE1P+148, DONE+2, DONE+3!, I+1
>> BDMPD	BDMDE1P+9*, BDMDE1P+17, BDMDE1P+148, BDMDE1P+151, N1, N1+1, I+1, PAGE+9
>> BDMPG	BDMDE1P+4, BDMDE1P+13, PAGE+3, PAGE+6*, PAGE+7
>> BDMPPN	BDMDE1P+17, PAGE+9
>> BDMPREP	BDMDE1P+5, BDMDE1P+6, BDMDE1P+7, CUML+1, CUML+2, CUML+3
>> BDMQUIT	BDMDE1P+4, BDMDE1P+9, BDMDE1P+22, BDMDE1P+24, BDMDE1P+26, BDMDE1P+28, BDMDE1P+30, BDMDE1P+32, BDMDE1P+34, BDMDE1P+36 , BDMDE1P+39, BDMDE1P+41, BDMDE1P+45, BDMDE1P+48, BDMDE1P+50, BDMDE1P+52, BDMDE1P+54, BDMDE1P+56, BDMDE1P+58, BDMDE1P+60 , BDMDE1P+62, BDMDE1P+64, BDMDE1P+66, BDMDE1P+68, BDMDE1P+71, BDMDE1P+73, BDMDE1P+75, BDMDE1P+77, BDMDE1P+79, BDMDE1P+94 , BDMDE1P+96, BDMDE1P+98, BDMDE1P+101, BDMDE1P+103, BDMDE1P+105, BDMDE1P+107, BDMDE1P+109, BDMDE1P+111, BDMDE1P+113, BDMDE1P+115 , BDMDE1P+117, BDMDE1P+119, BDMDE1P+121, BDMDE1P+123, BDMDE1P+125, BDMDE1P+128, BDMDE1P+130, BDMDE1P+134, BDMDE1P+136, BDMDE1P+138 , BDMDE1P+144, BDMDE1P+146, BDMDE1P+150, BDMDE1P+153, PAGE+2
>> BDMRED	BDMDE1P+14, PAGE+8
>> BDMUTT	BDMDE1P+142*, BDMDE1P+145
DIR	N1+2!, PAGE+2!
DIR(0	N1+2, PAGE+2
DT	BDMDE1P+13, PAGE+7
>> DTOUT	PAGE+2
DUZ(2	BDMDE1P+14
I	I~, I+1
IO	PAGE+2
IO(0	PAGE+2
IOF	BDMDE1P+12, PAGE+3
IOM	CTR+1
IOSL	BDMDE1P+4
IOST	N1+2, PAGE+2
>> J	BDMDE1P+17, BDMDE1P+18, PAGE+9, PAGE+10
U	BDMDE1P+14, BDMDE1P+16, BDMDE1P+17, BDMDE1P+31, BDMDE1P+33, BDMDE1P+38, BDMDE1P+40, BDMDE1P+74, BDMDE1P+90, BDMDE1P+91 , BDMDE1P+92, BDMDE1P+93, BDMDE1P+108, BDMDE1P+126, BDMDE1P+127, BDMDE1P+129, BDMDE1P+131, BDMDE1P+135, BDMDE1P+137, BDMDE1P+139 , BDMDE1P+142, BDMDE1P+145, BDMDE1P+149, BDMDE1P+152, PAGE+9, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2 , QUANCHK+1, QUANCHK+2
X	BDMDE1P+43*, BDMDE1P+44, CTR~, CTR+1
Y	BDMDE1P+38, BDMDE1P+40, PAGE+2, CTR~, CTR+1

Customize PDF page

Package: Diabetes Registry

Routine: BDMDE1P

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: