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: BUD8RPL2

Package: IHS Uniform Data System

Routine: BUD8RPL2


Information

BUD8RPL2 ; IHS/CMI/LAB - UDS print lists ;

Source Information

Source file <BUD8RPL2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Patient 1 ($$AGE,$$HRN)^AUPNPAT  
IHS Uniform Data System 1 $$RACE^BUD8RPTC  
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 BUD8RPTL  

Entry Points

Name Comments DBIA/ICR reference
LOC() ;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y) ;EP - Center X in a field Y wide.
T52 ;EP
T5H2 ;
USR() ;EP - Return name of current user from ^VA(200.
T52H ;
T5W ;

External References

Name Field # of Occurrence
$$CLINIC^APCLV T5W+8
$$LOCENC^APCLV T5W+8
$$PRIMPROV^APCLV T5W+8
$$AGE^AUPNPAT T5W+2
$$HRN^AUPNPAT T5W+1
$$RACE^BUD8RPTC T5W+2
^DIR T52H+2
$$FMTE^XLFDT T5W+8, T5H2+3, T5H2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Uncategorized Provider visits to report."
  • Line Location: T52+2
Function Call: WRITE
  • Prompt: !!,"Line ",BUD8L," ",BUDY
  • Line Location: T52+5
Function Call: WRITE
  • Prompt: !
  • Line Location: T52+13
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U,1),1,22),?24,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2)),?36,$E(BUDCOM,1,12)
  • Line Location: T5W+1
Function Call: WRITE
  • Prompt: ?51,$P(^DPT(DFN,0),U,2),?55,$$AGE^AUPNPAT(DFN,BUDCAD),?60,$E($P($$RACE^BUD8RPTC(DFN),U,3)_"-"_$P($$RACE^BUD8RPTC(DFN),U,4),1,19)
  • Line Location: T5W+2
Function Call: WRITE
  • Prompt: !!,"Line ",BUD8L," ",BUDY
  • Line Location: T5W+7
Function Call: WRITE
  • Prompt: !
  • Line Location: T52H+2
Function Call: WRITE
  • Prompt: !,"***** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT *****"
  • Line Location: T5H2+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,!
  • Line Location: T5H2+3
Function Call: WRITE
  • Prompt: !,$$CTR("*** BPHC Uniform Data System (UDS) ***",80)
  • Line Location: T5H2+4
Function Call: WRITE
  • Prompt: !,$$CTR("Patient List for Table 5 Columns B & C, Uncategorized Provider Visits",80),!
  • Line Location: T5H2+5
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),!
  • Line Location: T5H2+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: T5H2+7
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","-")
  • Line Location: T5H2+8
Function Call: WRITE
  • Prompt: !,"List of all patients, for uncategorized provider visits. Displays",!,"community, gender, age and visit data, including Provider codes."
  • Line Location: T5H2+9
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"AGE",?60,"RACE*"
  • Line Location: T5H2+13
Function Call: WRITE
  • Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"PROV CD",?50,"SRV",?55,"CLINIC",?70,"LOCATION"
  • Line Location: T5H2+14
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T5H2+15
Routine Call
  • DIR
  • Line Location:
    • T52H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] T5W+4, T5W+8
^BUDGTFIV - [#90660.5] T52+4
^BUDGTFIV("B" T52+4
^DIC(4 - [#4] T5H2+6, LOC+1
^DPT - [#2] T5W+1, T5W+2
^VA(200 - [#200] T5H2+3, USR+1
^XTMP("BUD8RPT1" T52+2, T52+6, T52+7, T52+8, T52+9, T5W+3

Label References

Name Line Occurrences
$$CTR T5H2+4, T5H2+5, T5H2+6, T5H2+7
T52H T52+2, T52+3, T5W+7
T5H2 T52H+1
T5W T52+9

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUD8L T52+1*, T52+2, T52+4*, T52+5, T52+6, T52+7, T52+8, T52+9, T5W+3, T5W+7
>> BUD8L2 T52+4*, T52+6, T52+7, T52+8, T52+9, T5W+3
>> BUDAGE T52+7*, T52+8, T52+9, T5W+3
>> BUDBD T5H2+7
>> BUDCAD T5W+2
>> BUDCOM T52+6*, T52+7, T52+8, T52+9, T5W+1, T5W+3
>> BUDDD T5W+5*, T5W+6
>> BUDED T5H2+7
>> BUDGPG T52H+1, T5H2+1*, T5H2+3
>> BUDH T52+2, T52+6, T52+7, T52+8, T52+9, T5W+3
>> BUDJ T52+2, T52+6, T52+7, T52+8, T52+9, T5W+3
>> BUDP T52+1*, T5H2+9, T5H2+16*
>> BUDQUIT T52+6, T52+7, T52+8, T52+9, T5W+3, T5W+5, T5W+6, T5W+7, T52H+2*
>> BUDSEX T52+8*, T52+9, T5W+3
>> BUDSITE T5W+1, T5H2+6
>> BUDV T5W+3*, T5W+4, T5W+6*, T5W+8
BUDVLST T5W+3!
BUDVLST( T5W+4*, T5W+5, T5W+6
>> BUDY T52+4*, T52+5, T5W+7
>> DFN T52+9*, T5W+1, T5W+2, T5W+3
DIR T52H+2!
DIR(0 T52H+2*
DT T5H2+3
>> DTOUT T52H+2
DUZ T5H2+3, USR+1
DUZ(2 T5W+1, LOC+1
IO T52H+2
IO(0 T52H+2
IOF T5H2+1
IOM CTR+1
IOSL T5W+7
IOST T52H+2
U T52+4, T5W+1, T5W+2, T5W+4, T5W+8, T5H2+3, T5H2+6, USR+1, LOC+1
X T5H2+7*, CTR~, CTR+1
Y T52H+2, CTR~, CTR+1
>> ZTQUEUED T52H+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All