Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BDMDD1P

Package: Diabetes Registry

Routine: BDMDD1P


Information

BDMDD1P ; IHS/CMI/LAB - 2016 DIABETES AUDIT PRINT ; 22 Sep 2015 7:20 AM

Source Information

Source file <BDMDD1P.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Diabetes Registry 5 ($$LOCN,$$LOCT)^BDMDD10  CUML^BDMDD14  SDPI^BDMDD1Q  SDPI16^BDMDD1U  $$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 BDMDD1P+140, BDMDD1P+143
$$LOCN^BDMDD10 N1
$$LOCT^BDMDD10 N1+1
CUML^BDMDD14 CUML+1
SDPI^BDMDD1Q CUML+2
SDPI16^BDMDD1U CUML+3
$$DATE^BDMS9B1 BDMDD1P+101, BDMDD1P+118
^DIR N1+3, PAGE+2
$$VAL^XBDIQ1 BDMDD1P+118
$$FMTE^XLFDT BDMDD1P+13, BDMDD1P+14, PAGE+7, PAGE+8
$$REPEAT^XLFSTR PAGE+11
$$STRIP^XLFSTR BDMDD1P+38

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ZZZZZZZ",!
  • Line Location: BDMDD1P+10
Function Call: WRITE
  • Prompt: !!
  • Condition for execution: $G(BDMGUI)
  • Line Location: BDMDD1P+13
Function Call: WRITE
  • Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2016 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80)
  • Line Location: BDMDD1P+13
Function Call: WRITE
  • Prompt: !,$$I(26.5),!,$$I(26.6)
  • Line Location: BDMDD1P+23
Function Call: WRITE
  • Prompt: $S($P(%,U,1)=3:"2 No",1:"1 Yes")
  • Line Location: BDMDD1P+29
Function Call: WRITE
  • Prompt: $$I(28)
  • Line Location: BDMDD1P+33
Function Call: WRITE
  • Prompt: ?5,$$I(40)
  • Line Location: BDMDD1P+53
Function Call: WRITE
  • Prompt: !?10,$P($$I(44),U,2)
  • Line Location: BDMDD1P+59
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: BDMDD1P+137
Function Call: WRITE
  • Prompt: !?5,"This is only calculated for patients 40 years of age and older."
  • Line Location: BDMDD1P+140
Function Call: WRITE
  • Prompt: !?5,$P($$I(118),U,1)
  • Line Location: BDMDD1P+141
Function Call: WRITE
  • Prompt: !!
  • Line Location: N1+3
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, 2016 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+3
    • PAGE+2

Global Variables Directly Accessed

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

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BDMDD1P+29*, BDMDD1P+38*, BDMDD1P+39
>> BDMADAT BDMDD1P+140, BDMDD1P+143
BDMBTH BDMDD1P+9, DONE+2, DONE+3!, I+1
>> BDMDMRG N1, N1+1
>> BDMDSP PAGE+1, PAGE+4
>> BDMDUZ2 BDMDD1P+14
>> BDMGUI BDMDD1P+4, BDMDD1P+10, BDMDD1P+13, BDMDD1P+145, PAGE+4, PAGE+5
>> BDMGUIC BDMDD1P+9*, BDMDD1P+10, BDMDD1P+11*, PAGE+4
>> BDMIOSL BDMDD1P+4*, BDMDD1P+22, BDMDD1P+24, BDMDD1P+26, BDMDD1P+28, BDMDD1P+30, BDMDD1P+32, BDMDD1P+34, BDMDD1P+37, BDMDD1P+40
, BDMDD1P+42, BDMDD1P+44, BDMDD1P+46, BDMDD1P+48, BDMDD1P+50, BDMDD1P+52, BDMDD1P+54, BDMDD1P+56, BDMDD1P+58, BDMDD1P+60
, BDMDD1P+62, BDMDD1P+64, BDMDD1P+66, BDMDD1P+68, BDMDD1P+71, BDMDD1P+86, BDMDD1P+88, BDMDD1P+90, BDMDD1P+92, BDMDD1P+94
, BDMDD1P+96, BDMDD1P+98, BDMDD1P+100, BDMDD1P+103, BDMDD1P+105, BDMDD1P+107, BDMDD1P+109, BDMDD1P+111, BDMDD1P+113, BDMDD1P+115
, BDMDD1P+117, BDMDD1P+119, BDMDD1P+121, BDMDD1P+124, BDMDD1P+126, BDMDD1P+130, BDMDD1P+132, BDMDD1P+136, BDMDD1P+138, BDMDD1P+142
, BDMDD1P+145
BDMJOB BDMDD1P+9, DONE+2, DONE+3!, I+1
>> BDMPD BDMDD1P+9*, BDMDD1P+17, BDMDD1P+140, BDMDD1P+143, N1, N1+1, I+1, PAGE+9
>> BDMPG BDMDD1P+4*, BDMDD1P+13*, PAGE+3, PAGE+6*, PAGE+7
>> BDMPPN BDMDD1P+17, PAGE+9
>> BDMPREP BDMDD1P+5, BDMDD1P+6, BDMDD1P+7, CUML+1, CUML+2, CUML+3
>> BDMQUIT BDMDD1P+4*, BDMDD1P+9, BDMDD1P+22, BDMDD1P+24, BDMDD1P+26, BDMDD1P+28, BDMDD1P+30, BDMDD1P+32, BDMDD1P+34, BDMDD1P+37
, BDMDD1P+40, BDMDD1P+42, BDMDD1P+44, BDMDD1P+46, BDMDD1P+48, BDMDD1P+50, BDMDD1P+52, BDMDD1P+54, BDMDD1P+56, BDMDD1P+58
, BDMDD1P+60, BDMDD1P+62, BDMDD1P+64, BDMDD1P+66, BDMDD1P+68, BDMDD1P+71, BDMDD1P+86, BDMDD1P+88, BDMDD1P+90, BDMDD1P+92
, BDMDD1P+94, BDMDD1P+96, BDMDD1P+98, BDMDD1P+100, BDMDD1P+103, BDMDD1P+105, BDMDD1P+107, BDMDD1P+109, BDMDD1P+111, BDMDD1P+113
, BDMDD1P+115, BDMDD1P+117, BDMDD1P+119, BDMDD1P+121, BDMDD1P+124, BDMDD1P+126, BDMDD1P+130, BDMDD1P+132, BDMDD1P+136, BDMDD1P+138
, BDMDD1P+142, BDMDD1P+145, PAGE+2*
>> BDMRED BDMDD1P+14, PAGE+8
>> BDMUTT BDMDD1P+134*, BDMDD1P+135, BDMDD1P+137
DIR N1+3!, PAGE+2!
DIR(0 N1+3*, PAGE+2*
DT BDMDD1P+13, PAGE+7
>> DTOUT PAGE+2
DUZ(2 BDMDD1P+14
I I~, I+1
IO PAGE+2
IO(0 PAGE+2
IOF BDMDD1P+12, PAGE+3
IOM CTR+1
IOSL BDMDD1P+4
IOST N1+3, PAGE+2
>> J BDMDD1P+17*, BDMDD1P+18, PAGE+9*, PAGE+10
U BDMDD1P+14, BDMDD1P+16, BDMDD1P+17, BDMDD1P+29, BDMDD1P+31, BDMDD1P+59, BDMDD1P+82, BDMDD1P+83, BDMDD1P+84, BDMDD1P+85
, BDMDD1P+99, BDMDD1P+118, BDMDD1P+120, BDMDD1P+122, BDMDD1P+123, BDMDD1P+125, BDMDD1P+127, BDMDD1P+131, BDMDD1P+134, BDMDD1P+137
, BDMDD1P+141, BDMDD1P+144, PAGE+9, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2, QUANCHK+1, QUANCHK+2
X BDMDD1P+35*, BDMDD1P+36, CTR~, CTR+1
Y PAGE+2, CTR~, CTR+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All