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

Package: IHS Uniform Data System

Routine: BUD2RPL4


Information

BUD2RPL4 ; IHS/CMI/LAB - UDS REPORT DRIVER TABLE 6B ;

Source Information

Source file <BUD2RPL4.m>

Call Graph

Call Graph Total: 5

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Uniform Data System 1 BUD2RPTL  

Entry Points

Name Comments DBIA/ICR reference
T3BELX ;
T3BRL1 ;
RACEL(R,E) ;EP
LOC() ;EP - Return location name from file 4 based on DUZ(2).
T3BRL2 ;
T3BRH1 ;
CTR(X,Y) ;EP - Center X in a field Y wide.
T3BEL2 ;
T3BEL1 ;
T3BE ;EP
T3BRLX ;
T3BEH1 ;
T3BRH ;
RACE(R) ;EP
USR() ;EP - Return name of current user from ^VA(200.
T3BEH ;
T3BR ;EP

External References

Name Field # of Occurrence
$$CLINIC^APCLV T3BRL2+18, T3BEL2+13
$$LOCENC^APCLV T3BRL2+18, T3BEL2+13
$$PRIMPROV^APCLV T3BRL2+18, T3BEL2+13
$$AGE^AUPNPAT T3BRL2+11, T3BEL2+10
$$HRN^AUPNPAT T3BRL2+10, T3BEL2+9
$$HISP^BUD2RPTC T3BRL2+14, T3BEL2+10
$$RACE^BUD2RPTC T3BRL2+12
^DIR T3BRH+2, T3BEH+2
$$FMTE^XLFDT T3BRL2+18, T3BRH1+3, T3BRH1+7, T3BEL2+13, T3BEH1+3, T3BEH1+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No patients to report."
  • Line Location: T3BR+3
Function Call: WRITE
  • Prompt: !!,"TOTAL PATIENTS: ",BUDTOT,!
  • Line Location: T3BR+6
Function Call: WRITE
  • Prompt: !,BUDRACEL
  • Line Location: T3BRL2+3
Function Call: WRITE
  • Prompt: !,BUDRACEL,!
  • Line Location: T3BRL2+8
Function Call: WRITE
  • Prompt: !,BUDRACEL,!
  • Line Location: T3BRL2+17
Function Call: WRITE
  • Prompt: !!,"Sub-Total ",BUDRACEL,": ",BUDSTOT,!
  • Line Location: T3BRL2+20
Function Call: WRITE
  • Prompt: !
  • Line Location: T3BRH+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T3BRH1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T3BRH1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** RPMS Uniform Data System (UDS) ***",80)
  • Line Location: T3BRH1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 3B, Patients by Hispanic or Latino Identity and Race",80),!
  • Line Location: T3BRH1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T3BRH1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3BRH1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3BRH1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T3BRH1+9
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE"
  • Line Location: T3BRH1+18
Function Call: WRITE
  • Prompt: !,?2,"RACE*",?24,"HISPANIC OR LATINO IDENTITY*"
  • Line Location: T3BRH1+19
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"SRV",?45,"CLINIC",?62,"LOCATION"
  • Line Location: T3BRH1+20
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: T3BRH1+21
Function Call: WRITE
  • Prompt: !!,"No patients to report."
  • Line Location: T3BE+3
Function Call: WRITE
  • Prompt: !!,"TOTAL PATIENTS: ",BUDTOT,!
  • Line Location: T3BE+6
Function Call: WRITE
  • Prompt: !,$P(BUDRACE,"-",1),!
  • Line Location: T3BEL2+2
Function Call: WRITE
  • Prompt: !,$P(BUDRACE,"-",1),!
  • Line Location: T3BEL2+7
Function Call: WRITE
  • Prompt: !,$P(BUDRACE,"-",1),!
  • Line Location: T3BEL2+12
Function Call: WRITE
  • Prompt: !!,"Sub-Total ",$P(BUDRACE,"-",1),": ",BUDSTOT,!
  • Line Location: T3BEL2+15
Function Call: WRITE
  • Prompt: !
  • Line Location: T3BEH+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T3BEH1+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T3BEH1+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** RPMS Uniform Data System (UDS) ***",80)
  • Line Location: T3BEH1+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 3B, Patients by Ethnicity",80),!
  • Line Location: T3BEH1+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T3BEH1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3BEH1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T3BEH1+8
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T3BEH1+9
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE",?60,"ETHNICITY*"
  • Line Location: T3BEH1+18
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"SRV",?45,"CLINIC",?62,"LOCATION"
  • Line Location: T3BEH1+19
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: T3BEH1+20
Routine Call
  • DIR
  • Line Location:
    • T3BRH+2
    • T3BEH+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] T3BRL2+18, T3BEL2+13
^DIC(4 - [#4] LOC+1, T3BRH1+6, T3BEH1+6
^DPT - [#2] T3BRL2+10, T3BRL2+11, T3BEL2+9, T3BEL2+10
^VA(200 - [#200] USR+1, T3BRH1+3, T3BEH1+3
^XTMP("BUD2RPT1" T3BR+3, T3BRL1+3, T3BRL1+4, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BE+3, T3BEL1+3
, T3BEL2+3, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+11

Label References

Name Line Occurrences
$$CTR T3BRH1+4, T3BRH1+5, T3BRH1+6, T3BRH1+7, T3BRH1+8, T3BEH1+4, T3BEH1+5, T3BEH1+6, T3BEH1+7, T3BEH1+8
$$RACEL T3BRL2+2
T3BEH T3BE+2, T3BE+5, T3BEL1+1, T3BEL2+7, T3BEL2+12, T3BEL2+14
T3BEH1 T3BEH+1
T3BEL1 T3BE+4
T3BEL2 T3BEL1+3
T3BELX T3BE+5
T3BRH T3BR+2, T3BR+5, T3BRL1+1, T3BRL2+8, T3BRL2+17, T3BRL2+19
T3BRH1 T3BRH+1
T3BRL1 T3BR+4
T3BRL2 T3BRL1+4
T3BRLX T3BR+5

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUDA T3BRL2+4*, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BEL2+3*, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+11
>> BUDBD T3BRH1+7, T3BEH1+7
>> BUDBEN T3BRH1+8, T3BEH1+8
>> BUDCAD T3BRL2+11, T3BEL2+10
>> BUDCOM T3BRL2+6*, T3BRL2+7, T3BRL2+11, T3BRL2+16, T3BEL2+5*, T3BEL2+6, T3BEL2+10, T3BEL2+11
>> BUDED T3BRH1+7, T3BEH1+7
>> BUDETH T3BRL1+4*, T3BRL2+2, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16
>> BUDGPG T3BRH+1, T3BRH1+1*, T3BRH1+3, T3BEH+1, T3BEH1+1*, T3BEH1+3
>> BUDH T3BR+3, T3BRL1+3, T3BRL1+4, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BE+3, T3BEL1+3
, T3BEL2+3, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+11
>> BUDHISV T3BRL2+14*, T3BRL2+15
>> BUDJ T3BR+3, T3BRL1+3, T3BRL1+4, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BE+3, T3BEL1+3
, T3BEL2+3, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+11
>> BUDP T3BR+1*, T3BRH1+10, T3BRH1+22*, T3BE+1*, T3BEH1+10, T3BEH1+21*
>> BUDQUIT T3BR+1*, T3BR+2, T3BR+5, T3BRL1+1, T3BRL1+3, T3BRL1+4, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7
, T3BRL2+8, T3BRL2+16, T3BRL2+17, T3BRL2+19, T3BRH+2*, T3BE+1*, T3BE+2, T3BE+5, T3BEL1+1, T3BEL1+3
, T3BEL2+3, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+7, T3BEL2+11, T3BEL2+12, T3BEL2+14, T3BEH+2*
>> BUDRACE T3BRL1+3*, T3BRL1+4, T3BRL2+2, T3BRL2+4, T3BRL2+5, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BEL1+3*, T3BEL2+2
, T3BEL2+3, T3BEL2+4, T3BEL2+5, T3BEL2+6, T3BEL2+7, T3BEL2+11, T3BEL2+12, T3BEL2+15
>> BUDRACEL T3BRL2+2*, T3BRL2+3, T3BRL2+8, T3BRL2+17, T3BRL2+20
>> BUDRACV T3BRL2+12*, T3BRL2+13
>> BUDSEX T3BRL2+5*, T3BRL2+6, T3BRL2+7, T3BRL2+16, T3BEL2+4*, T3BEL2+5, T3BEL2+6, T3BEL2+11
>> BUDSITE T3BRL2+10, T3BRH1+6, T3BEL2+9, T3BEH1+6
>> BUDSTOT T3BRL2+1*, T3BRL2+9*, T3BRL2+20, T3BEL2+1*, T3BEL2+8*, T3BEL2+15
>> BUDTOT T3BR+1*, T3BR+6, T3BRL1+2*, T3BRL2+9*, T3BE+1*, T3BE+6, T3BEL1+2*, T3BEL2+8*
>> BUDV T3BRL2+16*, T3BRL2+18, T3BEL2+11*, T3BEL2+13
>> DFN T3BRL2+7*, T3BRL2+10, T3BRL2+11, T3BRL2+12, T3BRL2+14, T3BRL2+16, T3BEL2+6*, T3BEL2+9, T3BEL2+10, T3BEL2+11
DIR T3BRH+2!, T3BEH+2!
DIR(0 T3BRH+2*, T3BEH+2*
DT T3BRH1+3, T3BEH1+3
>> DTOUT T3BRH+2, T3BEH+2
DUZ USR+1, T3BRH1+3, T3BEH1+3
DUZ(2 LOC+1, T3BRL2+10, T3BEL2+9
E RACEL~, RACEL+1, RACEL+2, RACEL+3, RACEL+4, RACEL+5, RACEL+6, RACEL+7, RACEL+8, RACEL+9
, RACEL+10, RACEL+11, RACEL+12, RACEL+13, RACEL+14, RACEL+15, RACEL+16, RACEL+17
IO T3BRH+2, T3BEH+2
IO(0 T3BRH+2, T3BEH+2
IOF T3BRH1+1, T3BEH1+1
IOM CTR+1
IOSL T3BR+5, T3BRL1+1, T3BRL2+8, T3BRL2+17, T3BRL2+19, T3BE+5, T3BEL1+1, T3BEL2+7, T3BEL2+12, T3BEL2+14
IOST T3BRH+2, T3BEH+2
R RACEL~, RACEL+1, RACEL+2, RACEL+3, RACEL+4, RACEL+5, RACEL+6, RACEL+7, RACEL+8, RACEL+9
, RACEL+10, RACEL+11, RACEL+12, RACEL+13, RACEL+14, RACEL+15, RACEL+16, RACEL+17, RACE~, RACE+1
, RACE+2, RACE+3, RACE+4, RACE+5, RACE+6, RACE+7, RACE+8, RACE+9
U USR+1, LOC+1, T3BRL2+10, T3BRL2+11, T3BRL2+13, T3BRL2+15, T3BRL2+18, T3BRH1+3, T3BRH1+6, T3BEL2+9
, T3BEL2+10, T3BEL2+13, T3BEH1+3, T3BEH1+6
X CTR~, CTR+1, T3BRH1+7*, T3BRH1+8*, T3BEH1+7*, T3BEH1+8*
Y CTR~, CTR+1, T3BRH+2, T3BEH+2
>> ZTQUEUED T3BRH+2, T3BEH+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All