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

Package: IHS Uniform Data System

Routine: BUDERP7S


Information

BUDERP7S ;IHS/CMI/LAB - UDS REPORT T7 PROCESS;

Source Information

Source file <BUDERP7S.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Patient 1 ($$AGE,$$HRN)^AUPNPAT  
IHS Uniform Data System 1 $$HISP^BUDERPTC  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  
Patient Care Component Reports 1 ($$CLINIC,$$PRIMPROV)^APCLV  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
PAUSE ;
DME3 ;EP
LOC() ;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y) ;EP - Center X in a field Y wide.
DME3L ;EP
DME3H ;
USR() ;EP - Return name of current user from ^VA(200.
DME3LX ;
DME3H1 ;
GENI ;general introductions
DME3L2 ;
DME3L1 ;

External References

Name Field # of Occurrence
$$CLINIC^APCLV DME3L2+17
$$PRIMPROV^APCLV DME3L2+17
$$AGE^AUPNPAT DME3L2+8
$$HRN^AUPNPAT DME3L2+7
$$HISP^BUDERPTC DME3L2+8
^DIR PAUSE+1, GENI+4, DME3H+2
$$VAL^XBDIQ1 DME3L2+17
$$FMTE^XLFDT DME3L2+17, DME3H1+3, DME3H1+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NOTE: Patient lists may be hundreds of pages long, depending on the size of your"
  • Line Location: GENI+1
Function Call: WRITE
  • Prompt: !,"patient population. It is recommended that you run these reports at night and"
  • Line Location: GENI+2
Function Call: WRITE
  • Prompt: !,"print to an electronic file, not directly to a printer.",!
  • Line Location: GENI+3
Function Call: WRITE
  • Prompt: !!,"This Patient List option documents the individual patients and visits"
  • Line Location: GENI+5
Function Call: WRITE
  • Prompt: !,"that are counted and summarized on each Table report (main menu"
  • Line Location: GENI+6
Function Call: WRITE
  • Prompt: !,"option REP). The summary Table report is included at the beginning of each"
  • Line Location: GENI+7
Function Call: WRITE
  • Prompt: !,"List report."
  • Line Location: GENI+8
Function Call: WRITE
  • Prompt: !,"UDS searches your database to find all visits and related patients"
  • Line Location: GENI+9
Function Call: WRITE
  • Prompt: !,"during the time period selected. Based on the UDS definition, to be counted"
  • Line Location: GENI+10
Function Call: WRITE
  • Prompt: !,"as a patient, the patient must have had at least one visit meeting the "
  • Line Location: GENI+11
Function Call: WRITE
  • Prompt: !,"following criteria:"
  • Line Location: GENI+12
Function Call: WRITE
  • Prompt: !?4,"- must be to a location specified in your visit location setup"
  • Line Location: GENI+13
Function Call: WRITE
  • Prompt: !?4,"- must be to Service Category Ambulatory (A), Hospitalization (H), Day"
  • Line Location: GENI+14
Function Call: WRITE
  • Prompt: !?6,"Surgery (S), Observation (O), Telemedicine (M), Nursing home visit (R), "
  • Line Location: GENI+15
Function Call: WRITE
  • Prompt: !?6,"or In-Hospital (I) visit"
  • Line Location: GENI+16
Function Call: WRITE
  • Prompt: !?4,"- must NOT have an excluded clinic code (see User Manual for a list)"
  • Line Location: GENI+17
Function Call: WRITE
  • Prompt: !?4,"- must have a primary provider and a coded purpose of visit"
  • Line Location: GENI+18
Function Call: WRITE
  • Prompt: !?4,"- the patient must NOT have a gender of 'Unknown'"
  • Line Location: GENI+19
Function Call: WRITE
  • Prompt: !
  • Line Location: GENI+20
Function Call: WRITE
  • Prompt: !,$$CTR($$LOC,80)
  • Line Location: DME3+2
Function Call: WRITE
  • Prompt: !,$$CTR("UDS 2017",80)
  • Line Location: DME3+3
Function Call: WRITE
  • Prompt: !!,"All Patients w/DM and A1c >9 by Ethnicity (Table 7)",!
  • Line Location: DME3+4
Function Call: WRITE
  • Prompt: !!,"This report provides a list by ethnicity of patients age 18 and older who"
  • Line Location: DME3+7
Function Call: WRITE
  • Prompt: !,"have had two medical visits during the report period, with a diagnosis"
  • Line Location: DME3+8
Function Call: WRITE
  • Prompt: !,"of Type I or Type II diabetes anytime through the end of the report"
  • Line Location: DME3+9
Function Call: WRITE
  • Prompt: !,"period, and without a diagnosis of polycystic ovaries, gestational diabetes,"
  • Line Location: DME3+10
Function Call: WRITE
  • Prompt: !,"or steroid-induced diabetes and with a most recent hemoglobin A1c greater"
  • Line Location: DME3+11
Function Call: WRITE
  • Prompt: !,"than 9%, or with an A1c with no result, or with no A1c test during the"
  • Line Location: DME3+12
Function Call: WRITE
  • Prompt: !,"report period."
  • Line Location: DME3+13
Function Call: WRITE
  • Prompt: !
  • Line Location: DME3+14
Function Call: WRITE
  • Prompt: !!,"No patients to report."
  • Line Location: DME3L+3
Function Call: WRITE
  • Prompt: !!,"TOTAL DM PATIENTS 18+ W/A1C >9% BY EHTNICITY: ",BUDTOT,!
  • Line Location: DME3L+6
Function Call: WRITE
  • Prompt: !,BUDRACE
  • Line Location: DME3L2+2
Function Call: WRITE
  • Prompt: !,BUDRACE,!
  • Line Location: DME3L2+6
Function Call: WRITE
  • Prompt: !,BUDRACE,!
  • Line Location: DME3L2+14
Function Call: WRITE
  • Prompt: ?5,BUDV,!
  • Line Location: DME3L2+15
Function Call: WRITE
  • Prompt: !,BUDRACE,!
  • Line Location: DME3L2+18
Function Call: WRITE
  • Prompt: !,"Sub-Total ",BUDRACE,": ",BUDSTOT,!
  • Line Location: DME3L2+19
Function Call: WRITE
  • Prompt: !
  • Line Location: DME3H+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: DME3H1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: DME3H1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** RPMS Uniform Data System (UDS) ***",80)
  • Line Location: DME3H1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 7, Section C, Diabetes w/A1c >9 by Ethnicity",80),!
  • Line Location: DME3H1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: DME3H1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: DME3H1+7
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: DME3H1+8
Function Call: WRITE
  • Prompt: !?2,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?47,"SEX",?51,"AGE",?55,"ETHNICITY*"
  • Line Location: DME3H1+20
Function Call: WRITE
  • Prompt: !?5,"LAST A1C VALUE OR CD & DATE"
  • Line Location: DME3H1+21
Function Call: WRITE
  • Prompt: !?5,"LAST DM DATE",?19,"DX OR SVC CD",?35,"PROV TYPE",?45,"SVC CAT",?53,"CLINIC",?65,"LOCATION"
  • Line Location: DME3H1+22
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: DME3H1+23
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1
    • GENI+4
    • DME3H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] DME3L2+17
^DIC(4 - [#4] LOC+1, DME3H1+6
^DPT - [#2] DME3L2+7, DME3L2+8
^VA(200 - [#200] USR+1, DME3H1+3
^XTMP("BUDERP7" DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10

Label References

Name Line Occurrences
$$CTR DME3+2, DME3+3, DME3H1+4, DME3H1+5, DME3H1+6, DME3H1+7
$$LOC DME3+2
DME3H DME3L+2, DME3L+5, DME3L1+1, DME3L2+6, DME3L2+14, DME3L2+18
DME3H1 DME3H+1
DME3L1 DME3L+4
DME3L2 DME3L1+3
DME3LX DME3L+5
GENI DME3+5
PAUSE DME3+6

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUDALL DME3L2+10*, DME3L2+11, DME3L2+12
>> BUDBD DME3H1+7
>> BUDCCOM DME3L2+4*, DME3L2+5, DME3L2+8, DME3L2+10
>> BUDED DME3L2+8, DME3H1+7
>> BUDGPG DME3H+1, DME3H1+1*, DME3H1+3
>> BUDH DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDJ DME3L+3, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDNAME DME3L2+3*, DME3L2+4, DME3L2+5, DME3L2+10
>> BUDP DME3L+1*, DME3H1+9, DME3H1+24*
>> BUDPPV DME3L2+12*, DME3L2+13
>> BUDQUIT DME3L+1*, DME3L+2, DME3L+5, DME3L1+1, DME3L1+3, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+6, DME3L2+13
, DME3L2+14, DME3L2+18, DME3H+2*
>> BUDRACE DME3L1+3*, DME3L2+2, DME3L2+3, DME3L2+4, DME3L2+5, DME3L2+6, DME3L2+10, DME3L2+14, DME3L2+18, DME3L2+19
>> BUDSITE DME3L2+7, DME3H1+6
>> BUDSTOT DME3L2+1*, DME3L2+9*, DME3L2+19
>> BUDTOT DME3L+1*, DME3L+6, DME3L1+2*, DME3L2+9*
>> BUDV DME3L2+13*, DME3L2+15, DME3L2+16
>> BUDX DME3L2+13*
>> C DME3L2+16*, DME3L2+17
DA PAUSE+1!
>> DFN DME3L2+5*, DME3L2+7, DME3L2+8, DME3L2+10
DIR PAUSE+1!, GENI+4!, DME3H+2!
DIR("A" PAUSE+1*, GENI+4*
DIR(0 PAUSE+1*, GENI+4*, DME3H+2*
DT DME3H1+3
>> DTOUT DME3H+2
DUZ USR+1, DME3H1+3
DUZ(2 LOC+1, DME3L2+7
IO DME3H+2
IO(0 DME3H+2
IOF DME3+1, DME3H1+1
IOM CTR+1
IOSL DME3L+5, DME3L1+1, DME3L2+6, DME3L2+14, DME3L2+18
IOST DME3H+2
U USR+1, LOC+1, DME3L2+7, DME3L2+8, DME3L2+11, DME3L2+13, DME3L2+17, DME3H1+3, DME3H1+6
>> V DME3L2+16*, DME3L2+17
X CTR~, CTR+1, DME3H1+7*
Y CTR~, CTR+1, DME3H+2
>> ZTQUEUED DME3H+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All