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

Package: IHS Uniform Data System

Routine: BUDRPTL2


Information

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

Source Information

Source file <BUDRPTL2.m>

Call Graph

Call Graph Total: 5

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

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+6
$$LOCENC^APCLV T5W+6
$$PRIMPROV^APCLV T5W+6
$$AGE^AUPNPAT T5W
$$HRN^AUPNPAT T5W
$$RACE^BUDRPTC T5W
^DIR T52H+2
$$FMTE^XLFDT T5W+6, T5H2+3, T5H2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Line ",BUD5L," ",BUDY
  • Line Location: T52+4
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),?51,$P(^DPT(DFN,0),U,2),?55,$$AGE^AUPNPAT(DFN,BUDCAD),?60,$P($$RACE^BUDRPTC(DFN),U,2)
  • Line Location: T5W+0
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 Users, 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/ETHN"
  • Line Location: T5H2+10
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T5H2+11
Routine Call
  • DIR
  • Line Location:
    • T52H+2

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUD5L T52+3*, T52+4, T52+5, T52+6, T52+7, T52+8, T5W+1
>> BUDAGE T52+6*, T52+7, T52+8, T5W+1
>> BUDBD T5H2+7
>> BUDCAD T5W
>> BUDCOM T52+5*, T52+6, T52+7, T52+8, T5W, T5W+1
>> BUDDD T5W+3*, T5W+4
>> BUDED T5H2+7
>> BUDGPG T52H+1, T5H2+1*, T5H2+3
>> BUDH T52+5, T52+6, T52+7, T52+8, T5W+1
>> BUDJ T52+5, T52+6, T52+7, T52+8, T5W+1
>> BUDP T52+1*, T5H2+9, T5H2+12*
>> BUDQUIT T52+5, T52+6, T52+7, T52+8, T5W+1, T5W+3, T5W+4, T5W+5, T52H+2*
>> BUDSEX T52+7*, T52+8, T5W+1
>> BUDSITE T5W, T5H2+6
>> BUDV T5W+1*, T5W+2, T5W+4*, T5W+6
BUDVLST T5W+1!
BUDVLST( T5W+2*, T5W+3, T5W+4
>> BUDY T52+3*, T52+4
>> DFN T52+8*, T5W, T5W+1
DIR T52H+2!
DIR(0 T52H+2*
DT T5H2+3
>> DTOUT T52H+2
DUZ T5H2+3, USR+1
DUZ(2 T5W, LOC+1
IO T52H+2
IO(0 T52H+2
IOF T5H2+1
IOM CTR+1
IOSL T5W+5
IOST T52H+2
U T52+3, T5W, T5W+2, T5W+6, 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