Routine: BDMDA1P

Package	Total	Call Graph
Diabetes Registry	2	($$LOCN,$$LOCT)^BDMDA10 CUML^BDMDA14
Kernel	2	$$FMTE^XLFDT ($$REPEAT,$$STRIP)^XLFSTR
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
I(I)	;
ACPCRES()	;-- return result from UACR UPCR

External References

Name	Field # of Occurrence
$$LOCN^BDMDA10	BDMDA1P+166
$$LOCT^BDMDA10	BDMDA1P+167
CUML^BDMDA14	CUML+1
^DIR	BDMDA1P+169, PAGE+2
$$VAL^XBDIQ1	BDMDA1P+118
$$FMTE^XLFDT	BDMDA1P+11, BDMDA1P+12, BDMDA1P+103, BDMDA1P+118, PAGE+7, PAGE+8
$$REPEAT^XLFSTR	PAGE+11
$$STRIP^XLFSTR	BDMDA1P+33

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ZZZZZZZ",! Line Location: BDMDA1P+8
Function Call: WRITE	Prompt: !! Condition for execution: $G(BDMGUI) Line Location: BDMDA1P+11
Function Call: WRITE	Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2013 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80) Line Location: BDMDA1P+11
Function Call: WRITE	Prompt: !,$$I(26.5),!,$$I(26.6) Line Location: BDMDA1P+21
Function Call: WRITE	Prompt: $$I(28) Line Location: BDMDA1P+29
Function Call: WRITE	Prompt: ?5,$$I(40) Line Location: BDMDA1P+48
Function Call: WRITE	Prompt: !?10,$P($$I(44),U,2) Line Location: BDMDA1P+54
Function Call: WRITE	Prompt: ?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+142
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+146
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+150
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+154
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+158
Function Call: WRITE	Prompt: !?28,$P($$I(92),U,2),?43,$P($$I(92),U,3),?60,$E($P($$I(92),U,4),1,19) Line Location: BDMDA1P+162
Function Call: WRITE	Prompt: !! Line Location: BDMDA1P+169
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, 2013 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: BDMDA1P+169 PAGE+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	BDMDA1P+12
^DPT - [#2]	BDMDA1P+15, PAGE+9
^TMP($J	DONE+1!
^XTMP("BDMDM13"	BDMDA1P+7, DONE+2!, I+1

Label References

Name	Line Occurrences
$$CTR	BDMDA1P+11, PAGE+7
$$I	BDMDA1P+13, BDMDA1P+14, BDMDA1P+16, BDMDA1P+17, BDMDA1P+19, BDMDA1P+21, BDMDA1P+23, BDMDA1P+25, BDMDA1P+27, BDMDA1P+29 , BDMDA1P+31, BDMDA1P+33, BDMDA1P+34, BDMDA1P+36, BDMDA1P+38, BDMDA1P+40, BDMDA1P+42, BDMDA1P+46, BDMDA1P+48, BDMDA1P+50 , BDMDA1P+54, BDMDA1P+56, BDMDA1P+58, BDMDA1P+62, BDMDA1P+65, BDMDA1P+68, BDMDA1P+69, BDMDA1P+70, BDMDA1P+71, BDMDA1P+72 , BDMDA1P+73, BDMDA1P+74, BDMDA1P+75, BDMDA1P+76, BDMDA1P+77, BDMDA1P+78, BDMDA1P+79, BDMDA1P+81, BDMDA1P+83, BDMDA1P+86 , BDMDA1P+87, BDMDA1P+88, BDMDA1P+89, BDMDA1P+90, BDMDA1P+91, BDMDA1P+92, BDMDA1P+93, BDMDA1P+97, BDMDA1P+99, BDMDA1P+101 , BDMDA1P+103, BDMDA1P+104, BDMDA1P+108, BDMDA1P+110, BDMDA1P+112, BDMDA1P+114, BDMDA1P+118, BDMDA1P+120, BDMDA1P+122, BDMDA1P+123 , BDMDA1P+125, BDMDA1P+127, BDMDA1P+129, BDMDA1P+131, BDMDA1P+135, BDMDA1P+139, BDMDA1P+142, BDMDA1P+146, BDMDA1P+150, BDMDA1P+154 , BDMDA1P+158, BDMDA1P+162, BDMDA1P+164, PAGE+10, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2, QUANCHK+1 , QUANCHK+2, QUANCHK+3
CUML	BDMDA1P+5
PAGE	BDMDA1P+20, BDMDA1P+22, BDMDA1P+24, BDMDA1P+26, BDMDA1P+28, BDMDA1P+30, BDMDA1P+32, BDMDA1P+35, BDMDA1P+37, BDMDA1P+39 , BDMDA1P+41, BDMDA1P+43, BDMDA1P+45, BDMDA1P+47, BDMDA1P+49, BDMDA1P+51, BDMDA1P+53, BDMDA1P+55, BDMDA1P+57, BDMDA1P+59 , BDMDA1P+61, BDMDA1P+63, BDMDA1P+66, BDMDA1P+80, BDMDA1P+82, BDMDA1P+84, BDMDA1P+94, BDMDA1P+96, BDMDA1P+98, BDMDA1P+100 , BDMDA1P+102, BDMDA1P+105, BDMDA1P+107, BDMDA1P+109, BDMDA1P+111, BDMDA1P+113, BDMDA1P+115, BDMDA1P+117, BDMDA1P+119, BDMDA1P+121 , BDMDA1P+124, BDMDA1P+126, BDMDA1P+128, BDMDA1P+130, BDMDA1P+132, BDMDA1P+134, BDMDA1P+136, BDMDA1P+138, BDMDA1P+141, BDMDA1P+143 , BDMDA1P+145, BDMDA1P+147, BDMDA1P+149, BDMDA1P+151, BDMDA1P+153, BDMDA1P+155, BDMDA1P+157, BDMDA1P+159, BDMDA1P+161, BDMDA1P+163 , BDMDA1P+165

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	BDMDA1P+33*, BDMDA1P+34
BDMBTH	BDMDA1P+7, DONE+2!, I+1
>> BDMDMRG	BDMDA1P+166, BDMDA1P+167
>> BDMDSP	PAGE+1, PAGE+4
>> BDMDUZ2	BDMDA1P+12
>> BDMGUI	BDMDA1P+4, BDMDA1P+8, BDMDA1P+11, BDMDA1P+165, PAGE+4, PAGE+5
>> BDMGUIC	BDMDA1P+7, BDMDA1P+8, BDMDA1P+9, PAGE+4
>> BDMIOSL	BDMDA1P+4*, BDMDA1P+20, BDMDA1P+22, BDMDA1P+24, BDMDA1P+26, BDMDA1P+28, BDMDA1P+30, BDMDA1P+32, BDMDA1P+35, BDMDA1P+37 , BDMDA1P+39, BDMDA1P+41, BDMDA1P+43, BDMDA1P+45, BDMDA1P+47, BDMDA1P+49, BDMDA1P+51, BDMDA1P+53, BDMDA1P+55, BDMDA1P+57 , BDMDA1P+59, BDMDA1P+61, BDMDA1P+63, BDMDA1P+66, BDMDA1P+80, BDMDA1P+82, BDMDA1P+84, BDMDA1P+94, BDMDA1P+96, BDMDA1P+98 , BDMDA1P+100, BDMDA1P+102, BDMDA1P+105, BDMDA1P+107, BDMDA1P+109, BDMDA1P+111, BDMDA1P+113, BDMDA1P+115, BDMDA1P+117, BDMDA1P+119 , BDMDA1P+121, BDMDA1P+124, BDMDA1P+126, BDMDA1P+128, BDMDA1P+130, BDMDA1P+132, BDMDA1P+134, BDMDA1P+136, BDMDA1P+138, BDMDA1P+141 , BDMDA1P+143, BDMDA1P+145, BDMDA1P+147, BDMDA1P+149, BDMDA1P+151, BDMDA1P+153, BDMDA1P+155, BDMDA1P+157, BDMDA1P+159, BDMDA1P+161 , BDMDA1P+163, BDMDA1P+165
BDMJOB	BDMDA1P+7, DONE+2!, I+1
>> BDMPD	BDMDA1P+7*, BDMDA1P+15, BDMDA1P+166, BDMDA1P+167, I+1, PAGE+9
>> BDMPG	BDMDA1P+4, BDMDA1P+11, PAGE+3, PAGE+6*, PAGE+7
>> BDMPPN	BDMDA1P+15, PAGE+9
>> BDMPREP	BDMDA1P+5, CUML+1
>> BDMQUIT	BDMDA1P+4, BDMDA1P+7, BDMDA1P+20, BDMDA1P+22, BDMDA1P+24, BDMDA1P+26, BDMDA1P+28, BDMDA1P+30, BDMDA1P+32, BDMDA1P+35 , BDMDA1P+37, BDMDA1P+39, BDMDA1P+41, BDMDA1P+43, BDMDA1P+45, BDMDA1P+47, BDMDA1P+49, BDMDA1P+51, BDMDA1P+53, BDMDA1P+55 , BDMDA1P+57, BDMDA1P+59, BDMDA1P+61, BDMDA1P+63, BDMDA1P+66, BDMDA1P+80, BDMDA1P+82, BDMDA1P+84, BDMDA1P+94, BDMDA1P+96 , BDMDA1P+98, BDMDA1P+100, BDMDA1P+102, BDMDA1P+105, BDMDA1P+107, BDMDA1P+109, BDMDA1P+111, BDMDA1P+113, BDMDA1P+115, BDMDA1P+117 , BDMDA1P+119, BDMDA1P+121, BDMDA1P+124, BDMDA1P+126, BDMDA1P+128, BDMDA1P+130, BDMDA1P+132, BDMDA1P+134, BDMDA1P+136, BDMDA1P+138 , BDMDA1P+141, BDMDA1P+143, BDMDA1P+145, BDMDA1P+147, BDMDA1P+149, BDMDA1P+151, BDMDA1P+153, BDMDA1P+155, BDMDA1P+157, BDMDA1P+159 , BDMDA1P+161, BDMDA1P+163, BDMDA1P+165, PAGE+2
>> BDMRED	BDMDA1P+12, PAGE+8
>> BDMUTT	BDMDA1P+139*, BDMDA1P+140, BDMDA1P+142, BDMDA1P+144, BDMDA1P+146, BDMDA1P+148, BDMDA1P+150, BDMDA1P+152, BDMDA1P+154, BDMDA1P+156 , BDMDA1P+158, BDMDA1P+160, BDMDA1P+162
DIR	BDMDA1P+169!, PAGE+2!
DIR(0	BDMDA1P+169, PAGE+2
DT	BDMDA1P+11, PAGE+7
>> DTOUT	PAGE+2
DUZ(2	BDMDA1P+12
I	I~, I+1
IO	PAGE+2
IO(0	PAGE+2
IOF	BDMDA1P+10, PAGE+3
IOM	CTR+1
IOSL	BDMDA1P+4
IOST	BDMDA1P+169, PAGE+2
>> J	BDMDA1P+15, BDMDA1P+16, PAGE+9, PAGE+10
U	BDMDA1P+12, BDMDA1P+14, BDMDA1P+15, BDMDA1P+27, BDMDA1P+54, BDMDA1P+77, BDMDA1P+78, BDMDA1P+79, BDMDA1P+93, BDMDA1P+101 , BDMDA1P+118, BDMDA1P+120, BDMDA1P+122, BDMDA1P+123, BDMDA1P+125, BDMDA1P+127, BDMDA1P+129, BDMDA1P+131, BDMDA1P+135, BDMDA1P+139 , BDMDA1P+142, BDMDA1P+146, BDMDA1P+150, BDMDA1P+154, BDMDA1P+158, BDMDA1P+162, BDMDA1P+164, PAGE+9, ACPCOQ+1, ACPCOQ+2 , ACPCOQ+3, ACPCRES+1, ACPCRES+2, QUANCHK+1, QUANCHK+2
X	CTR~, CTR+1
Y	PAGE+2, CTR~, CTR+1

Customize PDF page

Package: Diabetes Registry

Routine: BDMDA1P

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: