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: BDMDC1P

Package: Diabetes Registry

Routine: BDMDC1P


Information

BDMDC1P ; IHS/CMI/LAB - 2015 DIABETES AUDIT PRINT ;

Source Information

Source file <BDMDC1P.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Diabetes Registry 3 ($$LOCN,$$LOCT)^BDMDC10  CUML^BDMDC14  SDPI^BDMDC1Q  
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 BDMDC1P+178
$$LOCN^BDMDC10 N1
$$LOCT^BDMDC10 N1+1
CUML^BDMDC14 CUML+1
SDPI^BDMDC1Q CUML+2
^DIR N1+3, PAGE+2
$$VAL^XBDIQ1 BDMDC1P+126
$$FMTE^XLFDT BDMDC1P+12, BDMDC1P+13, BDMDC1P+109, BDMDC1P+126, PAGE+7, PAGE+8
$$REPEAT^XLFSTR PAGE+11
$$STRIP^XLFSTR BDMDC1P+37

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ZZZZZZZ",!
  • Line Location: BDMDC1P+9
Function Call: WRITE
  • Prompt: !!
  • Condition for execution: $G(BDMGUI)
  • Line Location: BDMDC1P+12
Function Call: WRITE
  • Prompt: $$CTR("ASSESSMENT OF DIABETES CARE, 2015 DATE AUDIT RUN: "_$$FMTE^XLFDT(DT)_" Page: "_BDMPG,80)
  • Line Location: BDMDC1P+12
Function Call: WRITE
  • Prompt: !,$$I(26.5),!,$$I(26.6)
  • Line Location: BDMDC1P+22
Function Call: WRITE
  • Prompt: $S($P(%,U,1)=3:"2 No",1:"1 Yes")
  • Line Location: BDMDC1P+28
Function Call: WRITE
  • Prompt: $$I(28)
  • Line Location: BDMDC1P+32
Function Call: WRITE
  • Prompt: ?5,$$I(40)
  • Line Location: BDMDC1P+52
Function Call: WRITE
  • Prompt: !?10,$P($$I(44),U,2)
  • Line Location: BDMDC1P+58
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: BDMDC1P+153
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: BDMDC1P+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: BDMDC1P+162
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: BDMDC1P+166
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: BDMDC1P+170
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: BDMDC1P+174
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, 2015 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] BDMDC1P+13
^DPT - [#2] BDMDC1P+16, PAGE+9
^TMP($J DONE+1!
^XTMP("BDMDM15" BDMDC1P+8, DONE+3!, I+1
^XTMP("BDMTAX" DONE+2!

Label References

Name Line Occurrences
$$CTR BDMDC1P+12, PAGE+7
$$I BDMDC1P+14, BDMDC1P+15, BDMDC1P+17, BDMDC1P+18, BDMDC1P+20, BDMDC1P+22, BDMDC1P+24, BDMDC1P+26, BDMDC1P+28, BDMDC1P+30
, BDMDC1P+32, BDMDC1P+34, BDMDC1P+37, BDMDC1P+38, BDMDC1P+40, BDMDC1P+42, BDMDC1P+44, BDMDC1P+46, BDMDC1P+50, BDMDC1P+52
, BDMDC1P+54, BDMDC1P+58, BDMDC1P+60, BDMDC1P+62, BDMDC1P+66, BDMDC1P+69, BDMDC1P+72, BDMDC1P+73, BDMDC1P+74, BDMDC1P+75
, BDMDC1P+76, BDMDC1P+77, BDMDC1P+78, BDMDC1P+79, BDMDC1P+80, BDMDC1P+81, BDMDC1P+82, BDMDC1P+83, BDMDC1P+84, BDMDC1P+86
, BDMDC1P+88, BDMDC1P+90, BDMDC1P+103, BDMDC1P+105, BDMDC1P+107, BDMDC1P+109, BDMDC1P+110, BDMDC1P+114, BDMDC1P+116, BDMDC1P+118
, BDMDC1P+120, BDMDC1P+122, BDMDC1P+126, BDMDC1P+128, BDMDC1P+130, BDMDC1P+131, BDMDC1P+133, BDMDC1P+135, BDMDC1P+137, BDMDC1P+139
, BDMDC1P+142, BDMDC1P+153, BDMDC1P+176, BDMDC1P+179, PAGE+10, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2
, QUANCHK+1, QUANCHK+2, QUANCHK+3
CUML BDMDC1P+5, BDMDC1P+6
N1 BDMDC1P+178
PAGE BDMDC1P+21, BDMDC1P+23, BDMDC1P+25, BDMDC1P+27, BDMDC1P+29, BDMDC1P+31, BDMDC1P+33, BDMDC1P+36, BDMDC1P+39, BDMDC1P+41
, BDMDC1P+43, BDMDC1P+45, BDMDC1P+47, BDMDC1P+49, BDMDC1P+51, BDMDC1P+53, BDMDC1P+55, BDMDC1P+57, BDMDC1P+59, BDMDC1P+61
, BDMDC1P+63, BDMDC1P+65, BDMDC1P+67, BDMDC1P+70, BDMDC1P+85, BDMDC1P+87, BDMDC1P+89, BDMDC1P+100, BDMDC1P+102, BDMDC1P+104
, BDMDC1P+106, BDMDC1P+108, BDMDC1P+111, BDMDC1P+113, BDMDC1P+115, BDMDC1P+117, BDMDC1P+119, BDMDC1P+121, BDMDC1P+123, BDMDC1P+125
, BDMDC1P+127, BDMDC1P+129, BDMDC1P+132, BDMDC1P+134, BDMDC1P+136, BDMDC1P+138, BDMDC1P+140, BDMDC1P+144, BDMDC1P+154, BDMDC1P+177
, BDMDC1P+180

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BDMDC1P+28*, BDMDC1P+37*, BDMDC1P+38
>> BDMADAT BDMDC1P+178
>> BDMBDAT BDMDC1P+178
BDMBTH BDMDC1P+8, DONE+2, DONE+3!, I+1
>> BDMDMRG N1, N1+1
>> BDMDSP PAGE+1, PAGE+4
>> BDMDUZ2 BDMDC1P+13
>> BDMGUI BDMDC1P+4, BDMDC1P+9, BDMDC1P+12, BDMDC1P+180, PAGE+4, PAGE+5
>> BDMGUIC BDMDC1P+8*, BDMDC1P+9, BDMDC1P+10*, PAGE+4
>> BDMIOSL BDMDC1P+4*, BDMDC1P+21, BDMDC1P+23, BDMDC1P+25, BDMDC1P+27, BDMDC1P+29, BDMDC1P+31, BDMDC1P+33, BDMDC1P+36, BDMDC1P+39
, BDMDC1P+41, BDMDC1P+43, BDMDC1P+45, BDMDC1P+47, BDMDC1P+49, BDMDC1P+51, BDMDC1P+53, BDMDC1P+55, BDMDC1P+57, BDMDC1P+59
, BDMDC1P+61, BDMDC1P+63, BDMDC1P+65, BDMDC1P+67, BDMDC1P+70, BDMDC1P+85, BDMDC1P+87, BDMDC1P+89, BDMDC1P+100, BDMDC1P+102
, BDMDC1P+104, BDMDC1P+106, BDMDC1P+108, BDMDC1P+111, BDMDC1P+113, BDMDC1P+115, BDMDC1P+117, BDMDC1P+119, BDMDC1P+121, BDMDC1P+123
, BDMDC1P+125, BDMDC1P+127, BDMDC1P+129, BDMDC1P+132, BDMDC1P+134, BDMDC1P+136, BDMDC1P+138, BDMDC1P+140, BDMDC1P+144, BDMDC1P+154
, BDMDC1P+177, BDMDC1P+180
BDMJOB BDMDC1P+8, DONE+2, DONE+3!, I+1
>> BDMPD BDMDC1P+8*, BDMDC1P+16, BDMDC1P+178, N1, N1+1, I+1, PAGE+9
>> BDMPG BDMDC1P+4*, BDMDC1P+12*, PAGE+3, PAGE+6*, PAGE+7
>> BDMPPN BDMDC1P+16, PAGE+9
>> BDMPREP BDMDC1P+5, BDMDC1P+6, CUML+1, CUML+2
>> BDMQUIT BDMDC1P+4*, BDMDC1P+8, BDMDC1P+21, BDMDC1P+23, BDMDC1P+25, BDMDC1P+27, BDMDC1P+29, BDMDC1P+31, BDMDC1P+33, BDMDC1P+36
, BDMDC1P+39, BDMDC1P+41, BDMDC1P+43, BDMDC1P+45, BDMDC1P+47, BDMDC1P+49, BDMDC1P+51, BDMDC1P+53, BDMDC1P+55, BDMDC1P+57
, BDMDC1P+59, BDMDC1P+61, BDMDC1P+63, BDMDC1P+65, BDMDC1P+67, BDMDC1P+70, BDMDC1P+85, BDMDC1P+87, BDMDC1P+89, BDMDC1P+100
, BDMDC1P+102, BDMDC1P+104, BDMDC1P+106, BDMDC1P+108, BDMDC1P+111, BDMDC1P+113, BDMDC1P+115, BDMDC1P+117, BDMDC1P+119, BDMDC1P+121
, BDMDC1P+123, BDMDC1P+125, BDMDC1P+127, BDMDC1P+129, BDMDC1P+132, BDMDC1P+134, BDMDC1P+136, BDMDC1P+138, BDMDC1P+140, BDMDC1P+144
, BDMDC1P+154, BDMDC1P+177, BDMDC1P+180, PAGE+2*
>> BDMRED BDMDC1P+13, PAGE+8
>> BDMUTT BDMDC1P+142*, BDMDC1P+143, BDMDC1P+153
DIR N1+3!, PAGE+2!
DIR(0 N1+3*, PAGE+2*
DT BDMDC1P+12, PAGE+7
>> DTOUT PAGE+2
DUZ(2 BDMDC1P+13
I I~, I+1
IO PAGE+2
IO(0 PAGE+2
IOF BDMDC1P+11, PAGE+3
IOM CTR+1
IOSL BDMDC1P+4
IOST N1+3, PAGE+2
>> J BDMDC1P+16*, BDMDC1P+17, PAGE+9*, PAGE+10
U BDMDC1P+13, BDMDC1P+15, BDMDC1P+16, BDMDC1P+28, BDMDC1P+30, BDMDC1P+58, BDMDC1P+81, BDMDC1P+82, BDMDC1P+83, BDMDC1P+84
, BDMDC1P+107, BDMDC1P+126, BDMDC1P+128, BDMDC1P+130, BDMDC1P+131, BDMDC1P+133, BDMDC1P+135, BDMDC1P+137, BDMDC1P+139, BDMDC1P+142
, BDMDC1P+153, BDMDC1P+176, BDMDC1P+179, PAGE+9, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2, QUANCHK+1
, QUANCHK+2
X BDMDC1P+34*, BDMDC1P+35, 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