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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BDMDG19

Package: Diabetes Registry

Routine: BDMDG19


Information

BDMDG19 ; IHS/CMI/LAB - 2019 DIABETES AUDIT ;

Source Information

Source file <BDMDG19.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS VA Utilities 2 ^XBCLS  ^XBDBQUE  
Kernel 1 $$STRIP^XLFSTR  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Diabetes Registry 4 BDMDG1  BDMDG15  BDMDG1E  BDMDG1Y  

Entry Points

Name Comments DBIA/ICR reference
ZIS ;
TEXTD ;EP
BANNER ;EP - banner for 2014 audit menu
TAXCHK ;EP - called by gui
GUICHK ;EP
XIT ;EP
PRINT
DONE ;
LASTHF(P,C,BDATE,EDATE,F) ;EP - get last factor in category C for patient P
PAGE ;
BMIEPI(H,W) ;EP ;

External References

Name Field # of Occurrence
^DIR DONE+1, PAGE+1
^XBCLS PRINT
^XBDBQUE ZIS+2
$$STRIP^XLFSTR BMIEPI+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking for Taxonomies to support the 2019 Audit. ",!,"Please enter the device for printing.",!
  • Line Location: BDMDG19+5
Function Call: WRITE
  • Prompt: !,"All taxonomies are present.",!
  • Line Location: GUICHK+26
Function Call: WRITE
  • Prompt: !!,"In order for the 2019 DM AUDIT Report to find all necessary data, several",!,"taxonomies must be established. The following taxonomies are missing or have",!,"no entries:"
  • Line Location: GUICHK+27
Function Call: WRITE
  • Prompt: !?80-$L(BDMX)\2,BDMX
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !?80-(8+$L(BDM("VERSION")))/2,"Version ",BDM("VERSION")
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?80-$L(BDM("SITE"))\2,BDM("SITE")
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+1
Routine Call
  • DIR
  • Line Location:
    • DONE+1
    • PAGE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] GUICHK+17
^ATXAX("B" GUICHK+15, GUICHK+16
^ATXLAB - [#9002228] GUICHK+21, GUICHK+23, GUICHK+24
^ATXLAB("B" GUICHK+19, GUICHK+20
^AUPNVHF - [#9000010.23] LASTHF+16
^AUPNVHF("AA" LASTHF+8, LASTHF+9, LASTHF+12
^AUTTHF - [#9999999.64] LASTHF+16
^AUTTHF("AC" LASTHF+7
^AUTTHF("B" LASTHF+4
^BDMTAXS - [#9003202.3] GUICHK+4, GUICHK+5, GUICHK+6, GUICHK+7
^BDMTAXS("B" GUICHK+3
^DIC - [#1] GUICHK+11, GUICHK+12
^DIC(4 - [#4] PRINT+3
^LAB(60 - [#60] GUICHK+25

Label References

Name Line Occurrences
DONE GUICHK+26
XIT ZIS+3, PRINT+3, PRINT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BMIEPI+1~, BMIEPI+6*, BMIEPI+7
A GUICHK+1~, GUICHK+2!, GUICHK+26!
A( GUICHK+15*, GUICHK+17*, GUICHK+19*, GUICHK+21*, GUICHK+25*, GUICHK+28, GUICHK+30
BDATE LASTHF~, LASTHF+11
BDM XIT+1!
BDM("SITE" PRINT+3*
BDM("VERSION" BANNER+1*, PRINT+2
>> BDMDUZ2 PRINT+3
>> BDMFILE GUICHK+9*, GUICHK+10, GUICHK+11, GUICHK+14, GUICHK+18
>> BDMIPRE GUICHK+6, GUICHK+7
BDMJ XIT+1!, BANNER+2*, PRINT+1*
BDMLINE XIT+1!, BANNER+2*, PRINT+1
BDMQUIT TAXCHK+2!, GUICHK+28, XIT+1!, PAGE+1*
BDMT GUICHK+1~, GUICHK+4*, GUICHK+5, GUICHK+6, GUICHK+7, GUICHK+26!
BDMTEXT XIT+1!, BANNER+1*
>> BDMTN GUICHK+8*, GUICHK+15, GUICHK+16, GUICHK+17, GUICHK+19, GUICHK+20, GUICHK+21, GUICHK+25
>> BDMTYPE GUICHK+12*, GUICHK+13
BDMX GUICHK+1~, GUICHK+26!, GUICHK+28*, GUICHK+30, XIT+1!, BANNER+2*, PRINT+1*!
BDMY GUICHK+1~, GUICHK+5*, GUICHK+8, GUICHK+9, GUICHK+12, GUICHK+24*, GUICHK+25, GUICHK+26!
>> BDMYR GUICHK+3*, GUICHK+4, GUICHK+5, GUICHK+6, GUICHK+7
C LASTHF~, LASTHF+2, LASTHF+4*, LASTHF+5, LASTHF+7
D LASTHF+6~, LASTHF+9*, LASTHF+10, LASTHF+11, LASTHF+12, LASTHF+14*, LASTHF+15, LASTHF+16
DIR DONE+1!, PAGE+1!
DIR("A" DONE+1*
DIR(0 DONE+1*, PAGE+1*
>> DIRUT DONE+1*
>> DTOUT PAGE+1
>> DUOUT DONE+1
DUZ(2 PRINT+3
EDATE LASTHF~, LASTHF+10
F LASTHF~, LASTHF+3*, LASTHF+16
H LASTHF+6~*, LASTHF+7*, LASTHF+8, LASTHF+9, LASTHF+12, BMIEPI~, BMIEPI+2, BMIEPI+4, BMIEPI+6*
I GUICHK+1~, GUICHK+16*, GUICHK+17, GUICHK+20*, GUICHK+21, GUICHK+23, GUICHK+24, GUICHK+26!
IO DONE+1, PAGE+1
IO(0 DONE+1, PAGE+1
IOF BDMDG19+4, PRINT
IOST DONE+1, PAGE+1
J GUICHK+1~, XIT+2!
O LASTHF+6~!
O( LASTHF+12*, LASTHF+16
O(0 LASTHF+14
P LASTHF~, LASTHF+1, LASTHF+8, LASTHF+9, LASTHF+12
U GUICHK+6, GUICHK+7, GUICHK+8, GUICHK+9, GUICHK+12, GUICHK+23, GUICHK+25, GUICHK+30, LASTHF+16
W BMIEPI~, BMIEPI+3, BMIEPI+6
X XIT+2!
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y GUICHK+1~, GUICHK+13*, GUICHK+15, GUICHK+17, GUICHK+19, GUICHK+21, GUICHK+25, GUICHK+26!, XIT+2!, PAGE+1
Z GUICHK+1~, GUICHK+26!

Marked Items

Name Field # of Occurrence
$T(@BDMTEXT+BDMJ BANNER+2, PRINT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All