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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BUDBRP7

Package: IHS Uniform Data System

Routine: BUDBRP7


Information

BUDBRP7 ; IHS/CMI/LAB - UDS REPORT DRIVER TABLE 6B 12 Dec 2014 6:51 AM 30 Dec 2014 8:19 PM 27 Aug 2014 12:41 PM ; 21 Jan 2014 2:52 PM

Source Information

Source file <BUDBRP7.m>

Call Graph

Call Graph Total: 24

Package Total Call Graph
IHS Uniform Data System 14 $$DEMO^BUDBDU  PRINT^BUDBRP71  (PRGHLST,PRGRLST)^BUDBRP7A  HTN^BUDBRP7B  DM^BUDBRP7C  (GENI,PRGE,PRGH,PRGR)^BUDBRP7I  (HTCR,HTR,HTUR)^BUDBRP7J  (HTCE,HTE,HTUE)^BUDBRP7K  
(DMR,DMR1)^BUDBRP7L  (DME,DME1,DME2)^BUDBRP7M  DME3^BUDBRP7S  (DMR2,DMR3)^BUDBRP7T  GETV^BUDBRPTD  TAXCHK^BUDBXTCH  
Kernel 5 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  $$REPEAT^XLFSTR  
VA Fileman 3 COMMA^%DTC  ^DIC  ^DIR  
IHS Patient 1 ($$AGE,$$BEN,$$COMMRES)^AUPNPAT  
IHS VA Utilities 1 EN^XBVK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Uniform Data System 2 BUDBRPT1  BUDBRPTP  

Entry Points

Name Comments DBIA/ICR reference
DME2LIST ;EP
YEAR ;
EOJ ;
PRENATT ;EP
HTELIST ;EP
LINE2 ;
USR() ;EP - Return name of current user from ^VA(200.
HTCRLIST ;EP
TSKMN ;EP ENTRY POINT FROM TASKMAN
PRINT ;EP - called from taskman
LINE ;
DMR1LIST ;EP
C(X,Y) ;
DMR3LIST ;EP
LOC() ;EP - Return location name from file 4 based on DUZ(2).
MDM ;EP
CTR(X,Y) ;EP - Center X in a field Y wide.
HTUELIST ;EP
EN1 ;
EN2 ;
DME3LIST ;EP
PRGELIST ;EP
EN ;
ZIS ;call to XBDBQUE
DMR2LIST ;EP
T7 ;
DRIVER ;
HTCELIST ;EP
PRGRLIST ;EP
PRGHLIST ;EP
MHT ;EP
LORIN
HTRLIST ;EP
PAUSE ;EP
HTURLIST ;EP
MPRG ;EP - called from option
ZIS1 ;
T7H ;
T7I ;EP
LIST ;
DMELIST ;EP
LINE1 ;
GENI ;general introductions
PNC ;
PROC ;EP - called from taskman
LINE3 ;
DMRLIST ;EP
DME1LIST ;EP

External References

Name Field # of Occurrence
COMMA^%DTC C+4
^%ZIS ZIS+2
^%ZISC DRIVER+4
^%ZTLOAD TSKMN+5
$$AGE^AUPNPAT LORIN+6, LORIN+7
$$BEN^AUPNPAT LORIN+1, LORIN+2
$$COMMRES^AUPNPAT LORIN+5
$$DEMO^BUDBDU PROC+16
PRINT^BUDBRP71 PRINT+1
PRGHLST^BUDBRP7A LORIN+10
PRGRLST^BUDBRP7A LORIN+11
HTN^BUDBRP7B LORIN+13
DM^BUDBRP7C LORIN+14
GENI^BUDBRP7I MHT+2, MDM+2, MPRG+2
PRGE^BUDBRP7I PRGELIST+3
PRGH^BUDBRP7I PRGHLIST+3
PRGR^BUDBRP7I PRGRLIST+3
HTCR^BUDBRP7J HTCRLIST+3
HTR^BUDBRP7J HTRLIST+3
HTUR^BUDBRP7J HTURLIST+3
HTCE^BUDBRP7K HTCELIST+3
HTE^BUDBRP7K HTELIST+3
HTUE^BUDBRP7K HTUELIST+3
DMR^BUDBRP7L DMRLIST+3
DMR1^BUDBRP7L DMR1LIST+3
DME^BUDBRP7M DMELIST+3
DME1^BUDBRP7M DME1LIST+3
DME2^BUDBRP7M DME2LIST+3
DME3^BUDBRP7S DME3LIST+3
DMR2^BUDBRP7T DMR2LIST+3
DMR3^BUDBRP7T DMR3LIST+3
GETV^BUDBRPTD LORIN+8
TAXCHK^BUDBXTCH EN2+6
^DIC EN2+2
^DIR EN2+18, MHT+12, MDM+15, MPRG+9, PAUSE+1, YEAR+7
EN^XBVK EOJ+1
$$FMADD^XLFDT PROC+2
$$FMTE^XLFDT EN2+14
$$REPEAT^XLFSTR T7H+1, LINE+1, LINE1+1, LINE2+1, LINE3+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Warning: There are no locations defined in the site parameter file for this",!,"site. Report will not be accurate!"
  • Line Location: EN2+5
Function Call: WRITE
  • Prompt: !!,"Your report will be run for the time period: ",$$FMTE^XLFDT(BUDBD)," to ",$$FMTE^XLFDT(BUDED)
  • Line Location: EN2+14
Function Call: WRITE
  • Prompt: !!,"Classification not entered."
  • Line Location: EN2+19
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+2
Function Call: WRITE
  • Prompt: !!,"UDS Table 7 Hypertension Patient List Selection"
  • Line Location: MHT+4
Function Call: WRITE
  • Prompt: !!?5,"1 All HTN Patients by Race and Hispanic or Latino Identity"
  • Line Location: MHT+5
Function Call: WRITE
  • Prompt: !?5,"2 All HTN Pts w/Controlled BP by Race and Hispanic or Latino Identity"
  • Line Location: MHT+7
Function Call: WRITE
  • Prompt: !?5,"3 All HTN Pts w/Uncontrolled BP by Race and Hispanic or Latino Identity"
  • Line Location: MHT+8
Function Call: WRITE
  • Prompt: !?5,"4 ALL Lists for HTN Patients"
  • Line Location: MHT+11
Function Call: WRITE
  • Prompt: !!,"UDS Table 7 Diabetes Patient List Selection"
  • Line Location: MDM+4
Function Call: WRITE
  • Prompt: !!?5,"1 All Patients w/DM by Race and Hispanic or Latino Identity"
  • Line Location: MDM+5
Function Call: WRITE
  • Prompt: !?5,"2 All Patients w/DM and A1c <8 by Race and Hispanic or Latino Identity"
  • Line Location: MDM+7
Function Call: WRITE
  • Prompt: !?5,"3 All Patients w/A1c >=8 & <=9 by Race and Hispanic or Latino Identity"
  • Line Location: MDM+9
Function Call: WRITE
  • Prompt: !?5,"4 All Patients w/DM and A1c >9 or No Test by Race and Hispanic or Latino Identity"
  • Line Location: MDM+10
Function Call: WRITE
  • Prompt: !?5,"5 ALL Lists for DM Patients"
  • Line Location: MDM+14
Function Call: WRITE
  • Prompt: !!,"UDS Table 7 Pregnant Patient List Selection"
  • Line Location: MPRG+4
Function Call: WRITE
  • Prompt: !!?5,"1 All Pregnant Patients w/HIV"
  • Line Location: MPRG+5
Function Call: WRITE
  • Prompt: !?5,"2 All Pregnant Patients by Race"
  • Line Location: MPRG+6
Function Call: WRITE
  • Prompt: !?5,"3 ALL Lists"
  • Line Location: MPRG+8
Function Call: WRITE
  • Prompt: !,$$CTR("TABLE 7 - HEALTH OUTCOMES AND DISPARITIES"),!,$$REPEAT^XLFSTR("_",79),!
  • Line Location: T7H+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",79),?79,"|",!
  • Line Location: LINE+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",29),?29,"|",$$REPEAT^XLFSTR("_",9),?39,"|",$$REPEAT^XLFSTR("_",9),?49,"|",$$REPEAT^XLFSTR("_",9),?59,"|",$$REPEAT^XLFSTR("_",9),?69,"|",$$REPEAT^XLFSTR("_",9),?79,"|",!
  • Line Location: LINE1+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",29),?29,"|",$$REPEAT^XLFSTR("_",39),?69,"|_________",?79,"|",!
  • Line Location: LINE2+1
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("_",29),?29,"|",$$REPEAT^XLFSTR("_",49),?79,"|",!
  • Line Location: LINE3+1
Function Call: WRITE
  • Prompt: !!,"TABLE 7: HEALTH OUTCOMES AND DISPARITIES"
  • Line Location: T7I+1
Function Call: WRITE
  • Prompt: !,"This report will produce UDS Table 7, health outcomes indicators by race"
  • Line Location: T7I+2
Function Call: WRITE
  • Prompt: !,"and Hispanic/Latino identity for deliveries and birth weights, controlled"
  • Line Location: T7I+3
Function Call: WRITE
  • Prompt: !,"hypertension, and controlled diabetes Glycemic control. Patients must meet "
  • Line Location: T7I+4
Function Call: WRITE
  • Prompt: !,"additional criteria as specified for each indicator."
  • Line Location: T7I+5
Function Call: WRITE
  • Prompt: !
  • Line Location: T7I+6
Function Call: WRITE
  • Prompt: !!,$$CTR($$LOC,80),!,$$CTR("UDS 2014",80),!
  • Line Location: GENI+2
Function Call: WRITE
  • Prompt: !,"UDS searches your database to find all patients reported for the quality"
  • Line Location: GENI+3
Function Call: WRITE
  • Prompt: !,"of care indicators during the time period January 1 - December 31, 2014."
  • Line Location: GENI+4
Function Call: WRITE
  • Prompt: !,"Based on the UDS definition, to be considered a patient, the patient must"
  • Line Location: GENI+5
Function Call: WRITE
  • Prompt: !,"have had at least one visit meeting the following criteria:"
  • Line Location: GENI+6
Function Call: WRITE
  • Prompt: !?4,"- must be to a location specified in your visit location setup"
  • Line Location: GENI+7
Function Call: WRITE
  • Prompt: !?4,"- must be to Service Category Ambulatory (A), Hospitalization (H), Day"
  • Line Location: GENI+8
Function Call: WRITE
  • Prompt: !?6,"Surgery (S), Observation (O), Telemedicine (M), Nursing home visit (R), "
  • Line Location: GENI+9
Function Call: WRITE
  • Prompt: !?6,"or In-Hospital (I) visit"
  • Line Location: GENI+10
Function Call: WRITE
  • Prompt: !?4,"- must NOT have an excluded clinic code (see User Manual for a list)"
  • Line Location: GENI+11
Function Call: WRITE
  • Prompt: !?4,"- must have a primary provider and a coded purpose of visit"
  • Line Location: GENI+12
Function Call: WRITE
  • Prompt: !?4,"- the patient must NOT have a gender of 'Unknown'"
  • Line Location: GENI+13
Function Call: WRITE
  • Prompt: !
  • Line Location: GENI+14
Function Call: WRITE
  • Prompt: !!,"UDS does not calculate the deliveries and birth weight indicators"
  • Line Location: PRENATT+1
Function Call: WRITE
  • Prompt: !,"in Section A. However, you can run a list of patients identified "
  • Line Location: PRENATT+2
Function Call: WRITE
  • Prompt: !,"by UDS as pregnant to determine which of them received prenatal care at"
  • Line Location: PRENATT+3
Function Call: WRITE
  • Prompt: !,"your facility or were referred elsewhere by your facility for prenatal"
  • Line Location: PRENATT+4
Function Call: WRITE
  • Prompt: !,"and perinatal services to assist you with completing Table 7, Section A."
  • Line Location: PRENATT+5
Function Call: WRITE
  • Prompt: !,"The menu options you would select to run the patient list are: LST, LST3,"
  • Line Location: PRENATT+6
Function Call: WRITE
  • Prompt: !,"PRG, PRGR (list by race and Hispanic or Latino identity)."
  • Line Location: PRENATT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRENATT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: YEAR+2
Function Call: WRITE
  • Prompt: !,"Enter the Calendar Year. Use a 4 digit year, e.g. 2003, 2007"
  • Line Location: YEAR+3
Function Call: WRITE
  • Prompt: !!,"Please enter a year only!",!
  • Line Location: YEAR+11
Routine Call
  • DIC
  • Line Location:
    • EN2+2
Routine Call
  • DIR
  • Line Location:
    • EN2+18
    • MHT+12
    • MDM+15
    • MPRG+9
    • PAUSE+1
    • YEAR+7
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BUDBSITE - [#90666.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] PROC+4, PROC+6
^BUDBSITE - [#90666.1] EN2+5
^DIC(4 - [#4] LOC+1
^DPT - [#2] PROC+7, PROC+12, LORIN+3
^TMP($J PROC+5!
^VA(200 - [#200] USR+1
^XTMP("BUDBRP7B" PROC+2*

Label References

Name Line Occurrences
$$CTR T7H+1, GENI+2
$$LOC GENI+2
EN EN2+5
EN1 PRGHLIST+4, PRGRLIST+4, PRGELIST+4, HTRLIST+4, HTCRLIST+4, HTURLIST+4, HTELIST+4, HTCELIST+4, HTUELIST+4, MHT+18
, DMRLIST+4, DMR1LIST+4, DMR2LIST+4, DMR3LIST+4, DMELIST+4, DME1LIST+4, DME2LIST+4, DME3LIST+4, MDM+23, MPRG+15
EOJ T7+1, EN2+3, EN2+13, EN2+19, ZIS+3, DRIVER+5, TSKMN+5, PRGHLIST+1, PRGRLIST+1, PRGELIST+1
, HTRLIST+1, HTCRLIST+1, HTURLIST+1, HTELIST+1, HTCELIST+1, HTUELIST+1, MHT+1, MHT+13, DMRLIST+1, DMR1LIST+1
, DMR2LIST+1, DMR3LIST+1, DMELIST+1, DME1LIST+1, DME2LIST+1, DME3LIST+1, MDM+1, MDM+16, MPRG+1, MPRG+10
GENI EN+1
PAUSE EN+3, EN+5
PRENATT EN+4
PRINT DRIVER+3
PROC DRIVER+1
T7I EN+2
TSKMN ZIS1+1
YEAR EN2+12, YEAR+11

Naked Globals

Name Field # of Occurrence
^(0 USR+1, LOC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ZIS+1!, ZIS+2*
>> BUDAGE LORIN+6*
>> BUDAGEP LORIN+7*
>> BUDBD EN2+14, YEAR+12*
>> BUDBEN EN2+16*, EN2+20*, LORIN+1, LORIN+2
>> BUDCAD LORIN+7, YEAR+13*
>> BUDCOM LORIN+5*
>> BUDDME1L DME1LIST+2*
>> BUDDME2L DME2LIST+2*
>> BUDDME3L DME3LIST+2*
>> BUDDMEL DMELIST+2*
>> BUDDMR1L DMR1LIST+2*, MDM+3*, MDM+17*, MDM+19*
>> BUDDMR2L DMR2LIST+2*, MDM+17*, MDM+20*
>> BUDDMR3L DMR3LIST+2*, MDM+17*, MDM+21*
>> BUDDMRL DMRLIST+2*, MDM+17*, MDM+18*
>> BUDED EN2+14, LORIN+6, YEAR+12*
>> BUDH PROC+1*
>> BUDHTCEL HTCELIST+2*, MHT+3*, MDM+3*
>> BUDHTCRL HTCRLIST+2*, MHT+3*, MHT+14*, MHT+16*
>> BUDHTEL HTELIST+2*, MHT+3*, MDM+3*
>> BUDHTRL HTRLIST+2*, MHT+3*, MHT+14*, MHT+15*, MDM+3*
>> BUDHTUEL HTUELIST+2*, MHT+3*, MDM+3*
>> BUDHTURL HTURLIST+2*, MHT+3*, MHT+14*, MHT+17*, MDM+3*
>> BUDJ PROC+1*
>> BUDPRGEL PRGELIST+2*, MPRG+3*
>> BUDPRGHL PRGHLIST+2*, MPRG+3*, MPRG+11*, MPRG+12*
>> BUDPRGRL PRGRLIST+2*, MPRG+3*, MPRG+11*, MPRG+13*
>> BUDSEX LORIN+3*, LORIN+4
>> BUDSITE EN2+1*, EN2+4*, EN2+5
>> BUDT35V LORIN+9
>> BUDTAXT EN2+6*
>> BUDYEAR EN2+11*, EN2+13, YEAR+1*, YEAR+12*, YEAR+13
DA EN2+18!, MHT+12!, MDM+15!, MPRG+9!, PAUSE+1!
>> DFN PROC+4*, PROC+6, PROC+7, PROC+12, PROC+16, LORIN+1, LORIN+2, LORIN+3, LORIN+5, LORIN+6
, LORIN+7
DIC EN2+2*, YEAR+8!
DIC("A" EN2+2*
DIC(0 EN2+2*
DIR EN2+18!, MHT+12!, MDM+15!, MPRG+9!, PAUSE+1!, YEAR+7!
DIR("?" YEAR+6*
DIR("A" EN2+17*, MHT+12*, MDM+15*, MPRG+9*, PAUSE+1*, YEAR+5*
DIR("B" EN2+18*, MHT+12*, MDM+15*, MPRG+9*
DIR(0 EN2+17*, MHT+12*, MDM+15*, MPRG+9*, PAUSE+1*, YEAR+4*
>> DIRUT EN2+19, MHT+13, MDM+16, MPRG+10, YEAR+9*, YEAR+10
DT PROC+2
>> DUOUT YEAR+9
DUZ USR+1
DUZ(2 LOC+1
IO DRIVER+2, TSKMN+1
IO("DOC" TSKMN+2
IO("Q" ZIS1+1
>> IOCPU TSKMN+5
IOF GENI+1
IOM TSKMN+3, CTR+1
ION TSKMN+1
IOP ZIS+1!
IOSL TSKMN+3
IOST TSKMN+1
>> POP ZIS+3
U PROC+12, LORIN+3, USR+1, LOC+1
X CTR~, CTR+1, C~, C+1, C+5
>> X2 C+3*
>> X3 C+3*
Y EN2+3, EN2+4, EN2+20, MHT+14, MHT+15, MHT+16, MHT+17, MDM+17, MDM+18, MDM+19
, MDM+20, MDM+21, MPRG+11, MPRG+12, MPRG+13, CTR~, CTR+1, C~, C+1, C+2
, YEAR+11, YEAR+12
>> ZTCPU TSKMN+5*
>> ZTDESC TSKMN+5*
>> ZTDTH TSKMN+5*
>> ZTIO TSKMN+1*, TSKMN+2*, TSKMN+3*
>> ZTRTN TSKMN+5*
ZTSAVE TSKMN+4!
ZTSAVE("BUD*" TSKMN+4*
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 |  Naked Globals |  Local Variables |  All