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

Package: Diabetes Registry

Routine: BDMD81P


Information

BDMD81P ; IHS/CMI/LAB - 2008 DIABETES AUDIT PRINT ;

Source Information

Source file <BDMD81P.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 $$FMTE^XLFDT  $$STRIP^XLFSTR  
Diabetes Registry 1 CUML^BDMD814  
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
CUML^BDMD814 CUML+1
^DIR BDMD81P+153, PAGE+1
$$FMTE^XLFDT BDMD81P+11, BDMD81P+13, BDMD81P+41
$$STRIP^XLFSTR BDMD81P+56

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ZZZZZZZ",!
  • Line Location: BDMD81P+8
Function Call: WRITE
  • Prompt: !,"Does you community receive SDPI grant funds? "_$S(BDMSDPI=1:"Yes",BDMSDPI=2:"No",BDMSDPI=3:"Don't know",1:"")
  • Line Location: BDMD81P+15
Function Call: WRITE
  • Prompt: " ",BDMSDPG
  • Line Location: BDMD81P+16
Function Call: WRITE
  • Prompt: ?J,"PRIMARY CARE PROVIDER: ",$$I(15)
  • Line Location: BDMD81P+20
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($$I(114))
  • Line Location: BDMD81P+41
Function Call: WRITE
  • Prompt: " ",$P($$I(57),U,2)
  • Line Location: BDMD81P+147
Function Call: WRITE
  • Prompt: !!
  • Line Location: BDMD81P+153
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+1
Routine Call
  • DIR
  • Line Location:
    • BDMD81P+153
    • PAGE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] BDMD81P+13
^DPT - [#2] BDMD81P+20
^TMP($J DONE+1!
^XTMP("BDMDM81" BDMD81P+7, DONE+2!, I+1

Label References

Name Line Occurrences
$$ACPCOQ BDMD81P+103
$$ACPCRES BDMD81P+104
$$CTR BDMD81P+11
$$I BDMD81P+14, BDMD81P+18, BDMD81P+19, BDMD81P+20, BDMD81P+23, BDMD81P+24, BDMD81P+26, BDMD81P+27, BDMD81P+28, BDMD81P+29
, BDMD81P+30, BDMD81P+31, BDMD81P+32, BDMD81P+33, BDMD81P+34, BDMD81P+38, BDMD81P+40, BDMD81P+41, BDMD81P+45, BDMD81P+46
, BDMD81P+53, BDMD81P+54, BDMD81P+56, BDMD81P+57, BDMD81P+58, BDMD81P+60, BDMD81P+63, BDMD81P+67, BDMD81P+70, BDMD81P+73
, BDMD81P+74, BDMD81P+76, BDMD81P+79, BDMD81P+81, BDMD81P+84, BDMD81P+86, BDMD81P+87, BDMD81P+91, BDMD81P+93, BDMD81P+97
, BDMD81P+99, BDMD81P+112, BDMD81P+115, BDMD81P+117, BDMD81P+128, BDMD81P+131, BDMD81P+132, BDMD81P+134, BDMD81P+136, BDMD81P+139
, BDMD81P+142, BDMD81P+143, BDMD81P+144, BDMD81P+145, BDMD81P+147, BDMD81P+149, BDMD81P+152, ACPCOQ+1, ACPCOQ+2, ACPCOQ+3
, ACPCRES+1, ACPCRES+2, QUANCHK+1, QUANCHK+2, QUANCHK+3
$$QUANCHK BDMD81P+102
CUML BDMD81P+5
PAGE BDMD81P+36, BDMD81P+39, BDMD81P+42, BDMD81P+44, BDMD81P+47, BDMD81P+49, BDMD81P+52, BDMD81P+55, BDMD81P+59, BDMD81P+62
, BDMD81P+64, BDMD81P+66, BDMD81P+69, BDMD81P+72, BDMD81P+75, BDMD81P+82, BDMD81P+85, BDMD81P+88, BDMD81P+90, BDMD81P+94
, BDMD81P+98, BDMD81P+108, BDMD81P+111, BDMD81P+114, BDMD81P+116, BDMD81P+122, BDMD81P+124, BDMD81P+127, BDMD81P+130, BDMD81P+133
, BDMD81P+135, BDMD81P+138, BDMD81P+141, BDMD81P+146, BDMD81P+148, BDMD81P+151

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BDMD81P+56*, BDMD81P+57
BDMBTH BDMD81P+7, DONE+2!, I+1
>> BDMGUI BDMD81P+4, BDMD81P+8
>> BDMGUIC BDMD81P+7*, BDMD81P+8, BDMD81P+9*
>> BDMIOSL BDMD81P+4*, BDMD81P+36, BDMD81P+39, BDMD81P+42, BDMD81P+44, BDMD81P+47, BDMD81P+49, BDMD81P+52, BDMD81P+55, BDMD81P+59
, BDMD81P+62, BDMD81P+64, BDMD81P+66, BDMD81P+69, BDMD81P+72, BDMD81P+75, BDMD81P+82, BDMD81P+85, BDMD81P+88, BDMD81P+90
, BDMD81P+94, BDMD81P+98, BDMD81P+108, BDMD81P+111, BDMD81P+114, BDMD81P+116, BDMD81P+122, BDMD81P+124, BDMD81P+127, BDMD81P+130
, BDMD81P+133, BDMD81P+135, BDMD81P+138, BDMD81P+141, BDMD81P+146, BDMD81P+148, BDMD81P+151
BDMJOB BDMD81P+7, DONE+2!, I+1
>> BDMPD BDMD81P+7*, BDMD81P+20, I+1
>> BDMPG BDMD81P+4*
>> BDMPPN BDMD81P+20
>> BDMPREP BDMD81P+5, CUML+1
>> BDMQUIT BDMD81P+4*, BDMD81P+7, BDMD81P+36, BDMD81P+39, BDMD81P+42, BDMD81P+44, BDMD81P+47, BDMD81P+49, BDMD81P+52, BDMD81P+55
, BDMD81P+59, BDMD81P+62, BDMD81P+64, BDMD81P+66, BDMD81P+69, BDMD81P+72, BDMD81P+75, BDMD81P+82, BDMD81P+85, BDMD81P+88
, BDMD81P+90, BDMD81P+94, BDMD81P+98, BDMD81P+108, BDMD81P+111, BDMD81P+114, BDMD81P+116, BDMD81P+122, BDMD81P+124, BDMD81P+127
, BDMD81P+130, BDMD81P+133, BDMD81P+135, BDMD81P+138, BDMD81P+141, BDMD81P+146, BDMD81P+148, BDMD81P+151, PAGE+1*
>> BDMRED BDMD81P+13
>> BDMSDPG BDMD81P+16
>> BDMSDPI BDMD81P+15, BDMD81P+16
DIR BDMD81P+153!, PAGE+1!
DIR(0 BDMD81P+153*, PAGE+1*
DT BDMD81P+11
>> DTOUT PAGE+1
DUZ(2 BDMD81P+13
I I~, I+1
IO PAGE+1
IO(0 PAGE+1
IOF BDMD81P+10, PAGE+2
IOM CTR+1
IOSL BDMD81P+4
IOST BDMD81P+153, PAGE+1
>> J BDMD81P+20*
U BDMD81P+13, BDMD81P+18, BDMD81P+20, BDMD81P+38, BDMD81P+54, BDMD81P+58, BDMD81P+93, BDMD81P+97, BDMD81P+147, ACPCOQ+1
, ACPCOQ+2, ACPCOQ+3, ACPCRES+1, ACPCRES+2, QUANCHK+1, QUANCHK+2
X CTR~, CTR+1
Y PAGE+1, CTR~, CTR+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All