Routine: BDMDF1P

Package	Total	Call Graph
Diabetes Registry	6	($$LOCN,$$LOCT)^BDMDF10 CUML^BDMDF14 SDPI^BDMDF1Q SDPI16^BDMDF1U QUALCHK^BDMDF1V $$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	BDMDF1P+155, BDMDF1P+158
$$LOCN^BDMDF10	N1
$$LOCT^BDMDF10	N1+1
CUML^BDMDF14	CUML+1
SDPI^BDMDF1Q	CUML+2
SDPI16^BDMDF1U	CUML+3
QUALCHK^BDMDF1V	CUML+4
$$DATE^BDMS9B1	BDMDF1P+110, BDMDF1P+133
^DIR	N1+2, PAGE+2
$$VAL^XBDIQ1	BDMDF1P+133
$$FMTE^XLFDT	BDMDF1P+13, BDMDF1P+14, PAGE+7, PAGE+8
$$REPEAT^XLFSTR	PAGE+11
$$STRIP^XLFSTR	BDMDF1P+46

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ZZZZZZZ",! Line Location: BDMDF1P+10
Function Call: WRITE	Prompt: !! Condition for execution: $G(BDMGUI) Line Location: BDMDF1P+13
Function Call: WRITE	Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2018 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80) Line Location: BDMDF1P+13
Function Call: WRITE	Prompt: !,$$I(26.5),!,$$I(26.6) Line Location: BDMDF1P+23
Function Call: WRITE	Prompt: $S($P(%,U,1)=3:"2 No",1:"1 Yes") Line Location: BDMDF1P+31
Function Call: WRITE	Prompt: $$I(28) Line Location: BDMDF1P+35
Function Call: WRITE	Prompt: Y," ",$S(Y=1:"Yes",1:"No")," ",$P($$I(31),U,3) Line Location: BDMDF1P+38
Function Call: WRITE	Prompt: $S(Y=1:"1 Current user",Y=2:"2 Not a current user",Y=3:"3 Not Documented",1:"")," ",$P($$I(33),U,3) Line Location: BDMDF1P+40
Function Call: WRITE	Prompt: ?34,$$I(40) Line Location: BDMDF1P+61
Function Call: WRITE	Prompt: !?10,$P($$I(44),U,2) Line Location: BDMDF1P+74
Function Call: WRITE	Prompt: !,"If born 1945-1965, screened at least once ever? ",$$I(223) Line Location: BDMDF1P+114
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: BDMDF1P+152
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: BDMDF1P+155
Function Call: WRITE	Prompt: !?5,$P($$I(118),U,1) Line Location: BDMDF1P+156
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, 2018 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]	BDMDF1P+14
^DPT - [#2]	BDMDF1P+17, PAGE+9
^TMP($J	DONE+1!
^XTMP("BDMDM18"	BDMDF1P+9, BDMDF1P+155, DONE+3!, I+1
^XTMP("BDMTAX"	DONE+2!

Label References

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

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

Customize PDF page

Package: Diabetes Registry

Routine: BDMDF1P

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: