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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BDMD21

Package: Diabetes Registry

Routine: BDMD21


Information

BDMD21 ; IHS/CMI/LAB - IHS Diabetes Audit 2001 ;

Source Information

Source file <BDMD21.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
IHS VA Utilities 4 ^XBDBQUE  ^XBFMK  ^XBGSAVE  EN^XBVK  
Kernel 2 ($$FMADD,$$FMTE)^XLFDT  $$LOW^XLFSTR  
VA Fileman 2 ^DIC  ^DIR  
Diabetes Registry 1 TAXCHK^BDMD219  
IHS Patient 1 KILL^AUPNPAT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Diabetes Registry 1 BDMD210  

Entry Points

Name Comments DBIA/ICR reference
RAND ;random sample or not
BEGIN ;EP - called from option
P1 ;
ZIS ;
FLAT ;
CC ;current community
CTR(X,Y) ;EP - Center X in a field Y wide.
PCP ;
C ;get register, status, random or not
XIT1 ;
P ;
S ; Get patient name or cohort
GETDATES ;
XIT ;
TIME ;EP - called from BDM Get fiscal year or time frame
C1 ;
WRITEF ;EP write flat file
TYPE ;
IF ;EP - called from BDM indivdual or epi

External References

Name Field # of Occurrence
KILL^AUPNPAT XIT+2
TAXCHK^BDMD219 BEGIN+1
^DIC BEGIN+6, P1+1, S+3, PCP+6, CC+5, C+3
^DIR TYPE+4, IF+2, PCP+3, CC+2, C+8, C+12, RAND+3, RAND+7, TIME+4, FLAT+2
, FLAT+12
^XBDBQUE ZIS+3
^XBFMK XIT+2
^XBGSAVE WRITEF+10
EN^XBVK XIT+1
$$FMADD^XLFDT TIME+9
$$FMTE^XLFDT TIME+8, TIME+10
$$LOW^XLFSTR FLAT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,$$CTR("ASSESSMENT OF DIABETES CARE, 2001")
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !!,$$CTR("PCC DIABETES AUDIT")
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: !,"NO Register Selected!!! The CMS register will not be used in retrieving",!,"any data."
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: !,"No patients selected"
  • Line Location: P1+2
Function Call: WRITE
  • Prompt: !,"No template selected."
  • Line Location: S+4
Function Call: WRITE
  • Prompt: !!,"There are ",BDMCNT," patients in the ",$P(^DIBT(+Y,0),U)," template/cohort.",!
  • Line Location: S+6
Function Call: WRITE
  • Prompt: !,"You have selected a register or template/cohort of patients. ",!,"You can run the audit just for the subset of patients in the cohort or register",!,"who live in a particular community or have a particular primary care provider.",!
  • Line Location: PCP+2
Function Call: WRITE
  • Prompt: !!,C," patients will be used in the audit.",!
  • Line Location: PCP+11
Function Call: WRITE
  • Prompt: !
  • Line Location: CC+2
Function Call: WRITE
  • Prompt: !!,C," patients will be used in the audit.",!
  • Line Location: CC+10
Function Call: WRITE
  • Prompt: !,"No register selected."
  • Line Location: C+4
Function Call: WRITE
  • Prompt: !,"No patients with that status in that register!"
  • Line Location: C1+5
Function Call: WRITE
  • Prompt: !!,"There are ",BDMCNT," patients in the ",$P(^ACM(41.1,BDMCMS,0),U)," register with a status of ",BDMSTAT,".",!!
  • Line Location: C1+6
Function Call: WRITE
  • Prompt: !!,"There are ",BDMCNT," patients selected so far to be used in the audit.",!
  • Line Location: RAND+2
Function Call: WRITE
  • Prompt: !!,"Enter the date of the audit. This date will be considered the ending",!,"date of the audit period. For most data items all data for the period one",!,"year prior to this date will be reviewed.",!
  • Line Location: TIME+3
Function Call: WRITE
  • Prompt: !!,"Future dates not allowed.",!
  • Line Location: TIME+6
Function Call: WRITE
  • Prompt: !!,"Invalid format, must be letters and numbers",!
  • Line Location: FLAT+4
Function Call: WRITE
  • Prompt: !!,"I am going to create a file called ",BDMFILE," which will reside in ",!,"the ",$S($P(^AUTTSITE(1,0),U,21)=1:"/usr/spool/uucppublic",1:"C:\EXPORT")," directory.",!
  • Line Location: FLAT+6
Function Call: WRITE
  • Prompt: "Actually, the file will be placed in the same directory that the data export"
  • Line Location: FLAT+7
Function Call: WRITE
  • Prompt: !,"globals are placed. See your site manager for assistance in finding the file",!,"after it is created. PLEASE jot down and remember the following file name:",!?15,"********** ",BDMFILE," **********",!
  • Line Location: FLAT+8
Function Call: WRITE
  • Prompt: "It may be several hours (or overnight) before your report and flat file are ",!,"finished.",!
  • Line Location: FLAT+9
Function Call: WRITE
  • Prompt: !,"The records that are generated and placed in file ",BDMFILE
  • Line Location: FLAT+10
Function Call: WRITE
  • Prompt: !,"are in a format readable by EPI INFO. For a definition of the format",!,"please see your user manual.",!
  • Line Location: FLAT+11
Routine Call
  • DIC
  • Line Location:
    • BEGIN+6
    • P1+1
    • S+3
    • PCP+6
    • CC+5
    • C+3
Routine Call
  • DIR
  • Line Location:
    • TYPE+4
    • IF+2
    • PCP+3
    • CC+2
    • C+8
    • C+12
    • RAND+3
    • RAND+7
    • TIME+4
    • FLAT+2
    • FLAT+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^ACM(41.1 - [#9002241.1] Classic Fileman Calls
^AUTTCOM - [#9999999.05] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41 - [#9002241] C1+2, C1+3, C1+4
^ACM(41.1 - [#9002241.1] C1+6
^AUPNPAT - [#9000001] PCP+9, CC+8
^AUTTCOM - [#9999999.05] CC+7
^AUTTSITE(1 FLAT+6
^BDMDATA("BDMEPI" XIT1+1!, WRITEF+2, WRITEF+6, WRITEF+12!
^BDMDATA($J XIT1+1!, WRITEF+1!, WRITEF+4*, WRITEF+6*, WRITEF+14!
^BDMRECD(16 WRITEF+4
^DD(9000001 PCP+6
^DIBT( S+5, S+6
^TMP($J TYPE+2!, P+1!, S+1!, S+5*, PCP+9!, PCP+10, CC+8!, CC+9, C+1!, C1+2!
, C1+3*, C1+4*, C1+5, RAND+1, RAND+5, RAND+6!, RAND+10!, RAND+11!, XIT+3!
^VA(200 - [#200] WRITEF+8
^XTMP("BDMDM21" TYPE+2!, P+1!, P1+2, P1+4*, S+1!, C+1!, RAND+5*, RAND+10*, XIT1+2!, WRITEF+15!

Label References

Name Line Occurrences
$$CTR BEGIN+3, BEGIN+4
@( TYPE+7
C C+9, C+13, C1+5, RAND+4
C1 C+10
CC S+9, CC+6, C1+9
FLAT IF+5, FLAT+4
GETDATES TYPE+5
P1 P1+5
PCP S+7, PCP+7, C1+7
RAND S+11, C1+11
TIME GETDATES+1
TYPE TYPE+8, IF+3
XIT GETDATES+1, ZIS+4
XIT1 GETDATES+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BDMADAT TIME+2*, TIME+7*, TIME+8, TIME+9
>> BDMBDAT TIME+9*, TIME+10
BDMBTH BEGIN+9*, TYPE+2, P+1, P1+2, P1+4, S+1, C+1, RAND+5, RAND+10, XIT1+2!
, WRITEF+15!
>> BDMCMS C+2*, C+5*, C1+2, C1+6
>> BDMCNT S+5*, S+6, C1+2*, C1+3*, C1+4*, C1+6, RAND+1*, RAND+2, RAND+7, RAND+10
>> BDMCOM CC+7*, CC+8
>> BDMDMRG BEGIN+7*, BEGIN+8*
>> BDMFILE FLAT+1*, FLAT+5*, FLAT+6, FLAT+8, FLAT+10, WRITEF+8
>> BDMGUI XIT+1
BDMJOB BEGIN+9*, TYPE+2, P+1, P1+2, P1+4, S+1, C+1, RAND+5, RAND+10, XIT1+2!
, WRITEF+15!
>> BDMPCP PCP+8*, PCP+9
>> BDMPD S+5*
>> BDMPREP IF+4*, IF+5, ZIS+1, ZIS+2
>> BDMRBD TIME+2*, TIME+10*
>> BDMRED TIME+2*, TIME+8*
>> BDMSTAT C+7*, C+14*, C1+3, C1+4, C1+6
>> BDMSTP GETDATES+1*, TYPE+1*, TYPE+7*, TYPE+8, IF+1*, IF+5, P+1*, P1+2*, S+1*, S+4*
, S+8, S+10, PCP+1*, PCP+4*, CC+1*, CC+3*, C+2*, C+4*, C1+5*, C1+8
, C1+10, RAND+9*, TIME+1*, TIME+5*, FLAT+3*, FLAT+13*, FLAT+14*
>> BDMTYPE TYPE+3*, TYPE+6*, TYPE+7
>> C PCP+10*, PCP+11, CC+9*, CC+10, RAND+5*, RAND+10*
DA TYPE+4!, PCP+3!, CC+2!, C+8!, C+12!, RAND+3!, RAND+7!, TIME+4!, FLAT+2!, FLAT+12!
DIC BEGIN+6*, P1+1!*, S+2!, S+3*!, PCP+6!*, CC+5!*, C+3*
DIC("A" BEGIN+6*, S+2*, C+3*
DIC("S" S+2*
DIC(0 BEGIN+6*, P1+1*, S+3*, PCP+6*, CC+5*, C+3*
DIR TYPE+4!, IF+2!, PCP+3!, CC+2!, C+8!, C+12!, RAND+3!, RAND+7!, TIME+4!, FLAT+2!
, FLAT+12!
DIR("A" TYPE+4*, IF+2*, PCP+3*, CC+2*, C+8*, C+12*, RAND+3*, RAND+7*, TIME+4*, FLAT+2*
, FLAT+12*
DIR("B" TYPE+4*, IF+2*, PCP+3*, CC+2*, C+8*, C+12*, RAND+3*, FLAT+12*
DIR(0 TYPE+4*, IF+2*, PCP+3*, CC+2*, C+8*, C+12*, RAND+3*, RAND+7*, TIME+4*, FLAT+2*
, FLAT+12*
>> DIRUT TYPE+5, IF+2*, IF+3, PCP+4, CC+3, C+9, C+13, RAND+4, RAND+9, TIME+5
, FLAT+3, FLAT+13
>> DUOUT IF+2
DUZ WRITEF+8
>> I RAND+10*
IOF BEGIN+2
IOM CTR+1
>> N RAND+10*, WRITEF+4*, WRITEF+6*
>> P PCP+9*, CC+8*
U S+6, PCP+6, PCP+9, CC+7, CC+8, C1+3, C1+4, C1+6, FLAT+6, WRITEF+8
X PCP+9*, PCP+10*, CC+8*, CC+9*, C1+2*, C1+3, C1+4, RAND+1*, RAND+5*, RAND+10*
, CTR~, CTR+1, FLAT+4, WRITEF+4*, WRITEF+6*
XBE WRITEF+9*, WRITEF+13!
XBF WRITEF+9*, WRITEF+13!
XBFLT WRITEF+9*, WRITEF+13!
XBFN WRITEF+8*, WRITEF+13!
XBGL WRITEF+7*, WRITEF+13!
XBMED WRITEF+8*, WRITEF+13!
>> XBNS ZIS+1*, ZIS+2*
XBQ WRITEF+9*, WRITEF+13!
>> XBRC ZIS+1*, ZIS+2*
>> XBRP ZIS+1*, ZIS+2*
>> XBRX ZIS+1*, ZIS+2*
XBTLE WRITEF+8*, WRITEF+13!
Y BEGIN+7, BEGIN+8, TYPE+6, IF+4, P1+2, P1+3, P1+4, S+4, S+5, S+6
, PCP+5, PCP+7, PCP+8, CC+4, CC+6, CC+7, C+4, C+5, C+10, C+14
, RAND+5, RAND+6, RAND+10, TIME+7, CTR~, CTR+1, FLAT+5, FLAT+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All