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

Package: IHS Uniform Data System

Routine: BUDHRPP1


Information

BUDHRPP1 ;IHS/CMI/LAB - UDS PRINT TAB 1-6A;

Source Information

Source file <BUDHRPP1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS Uniform Data System 1 HEADER^BUDHRPTP  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Uniform Data System 1 BUDHRPTP  

Entry Points

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

External References

Name Field # of Occurrence
COMMA^%DTC C+2
HEADER^BUDHRPTP T6+2, T6+5, PRN+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P(BUDARR(1),U,1),!,BUD80L
  • Line Location: PRN+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PRN+20
Function Call: WRITE
  • Prompt: !,$$CTR("TABLE 6A-",80),!
  • Line Location: T6SH+1
Function Call: WRITE
  • Prompt: $$CTR("SELECTED DIAGNOSES AND SERVICES RENDERED",80)
  • Line Location: T6SH+2
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T6SH+3
Function Call: WRITE
  • Prompt: !,?56,"Number of",?70,"Number of"
  • Line Location: T6SH+4
Function Call: WRITE
  • Prompt: !,?28,"Applicable",?56,"Visits by",?70,"Patients"
  • Line Location: T6SH+5
Function Call: WRITE
  • Prompt: !?28,"ICD-10-CM",?56,"Diagnosis",?70,"with"
  • Line Location: T6SH+6
Function Call: WRITE
  • Prompt: !?28,"Code",?56,"regardless",?70,"Diagnosis"
  • Line Location: T6SH+7
Function Call: WRITE
  • Prompt: !?56,"of primacy",?70,"regardless"
  • Line Location: T6SH+8
Function Call: WRITE
  • Prompt: !?70,"of primacy"
  • Line Location: T6SH+9
Function Call: WRITE
  • Prompt: !,"Diagnostic Category",?58,"(A)",?74,"(B)"
  • Line Location: T6SH+10
Function Call: WRITE
  • Prompt: !,"Service Category",?59,"(A)",?76,"(B)"
  • Line Location: T6SH+11
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: T6SH+12
Function Call: WRITE
  • Prompt: !,$$CTR("TABLE 6A-",80),!
  • Line Location: T6SH1+1
Function Call: WRITE
  • Prompt: $$CTR("SELECTED DIAGNOSES AND SERVICES RENDERED",80)
  • Line Location: T6SH1+2
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: T6SH1+3
Function Call: WRITE
  • Prompt: !,?30,"Applicable",?42,"",?58,"Number of",?70,"Number of"
  • Line Location: T6SH1+4
Function Call: WRITE
  • Prompt: !?30,"ICD-10-CM Code",?58,"Visits",?70,"patients"
  • Line Location: T6SH1+5
Function Call: WRITE
  • Prompt: !?30,"or CPT-4/II",?42,""
  • Line Location: T6SH1+6
Function Call: WRITE
  • Prompt: !?30,"Code",?42,""
  • Line Location: T6SH1+7
Function Call: WRITE
  • Prompt: !,"Diagnostic Category",?60,"(A)",?73,"(B)"
  • Line Location: T6SH1+8
Function Call: WRITE
  • Prompt: !,"Service Category",?60,"(A)",?75,"(B)"
  • Line Location: T6SH1+9
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-"),!
  • Line Location: T6SH1+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BUDHTSC - [#90669.907] PRN+5, PRN+6, PRN+7, PRN+8, PRN+10
^BUDHTSC("B" T6+4, T6+6, PRN+2
^DIC(4 - [#4] LOC+1
^VA(200 - [#200] USR+1

Label References

Name Line Occurrences
$$C PRN+11, PRN+12
$$CTR T6SH+1, T6SH+2, T6SH1+1, T6SH1+2
PRN T6+4, T6+6
T6SH T6+2, PRN+13
T6SH1 T6+5, PRN+13

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BUD80L PRN+14, PRN+18
BUDARR PRN+4!
BUDARR( PRN+6*, PRN+7*, PRN+8*, PRN+15, PRN+16, PRN+17
BUDARR(1 PRN+10*, PRN+11*, PRN+12*, PRN+14
BUDFNP T6+1*, T6+3!
>> BUDHD PRN+5*, PRN+14
>> BUDL PRN+15*, PRN+16, PRN+17
>> BUDORD T6+4*, T6+6*, PRN+2, PRN+11, PRN+12
>> BUDPG T6+1*
>> BUDQUIT T6+1*, T6+2, T6+4, T6+5, T6+6, PRN+2, PRN+13, PRN+15
>> BUDT6("P" PRN+12
>> BUDT6("V" PRN+11
>> BUDTYPE T6+1*, T6+6*, PRN+13, T6SH+10, T6SH+11, T6SH1+8, T6SH1+9
>> BUDY PRN+2*, PRN+5, PRN+6, PRN+7, PRN+8, PRN+10
>> C PRN+6*, PRN+7*, PRN+8*
DUZ USR+1
DUZ(2 LOC+1
IOM CTR+1
IOSL PRN+13
>> M PRN+6*, PRN+7*, PRN+8*, PRN+9*
U PRN+5, PRN+6, PRN+7, PRN+8, PRN+10, PRN+11, PRN+12, PRN+14, PRN+16, PRN+17
, USR+1, LOC+1
X PRN+6*, PRN+7*, PRN+8*, C~, C+3, CTR~, CTR+1
>> X2 C+1*
>> X3 C+1*
Y PRN+8*, CTR~, CTR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All