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

Package: IHS RPMS CHR System

Routine: BCHRC6P


Information

BCHRC6P ; IHS/CMI/LAB - print dx by age ;

Source Information

Source file <BCHRC6P.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS RPMS CHR System 2 ($$CTR,$$LOC)^BCHRLU  DONE^BCHUTIL1  
VA Fileman 2 DD^%DT  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;
HEAD2 ; if printer
HEAD1 ; if terminal
PROV ;print each provider
START ;
DONE

External References

Name Field # of Occurrence
DD^%DT START+1, START+2
$$CTR^BCHRLU HEAD2+3, HEAD2+4, HEAD2+5, HEAD2+10
$$LOC^BCHRLU HEAD2+3
DONE^BCHUTIL1 DONE
^DIR HEAD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,"TOTAL"
  • Line Location: START+10
Function Call: WRITE
  • Prompt: ?19,$J($FN(V1,",",0),7)
  • Line Location: START+12
Function Call: WRITE
  • Prompt: ?26,$J($FN(V2,",",0),7)
  • Line Location: START+13
Function Call: WRITE
  • Prompt: ?34,$J($FN(V3,",",0),7)
  • Line Location: START+14
Function Call: WRITE
  • Prompt: ?42,$J($FN(V4,",",0),7)
  • Line Location: START+15
Function Call: WRITE
  • Prompt: ?50,$J($FN(V5,",",0),7)
  • Line Location: START+16
Function Call: WRITE
  • Prompt: ?58,$J($FN(V6,",",0),7)
  • Line Location: START+17
Function Call: WRITE
  • Prompt: ?62,$J($FN(V7,",",0),7)
  • Line Location: START+18
Function Call: WRITE
  • Prompt: ?109,$J($FN(V8,",",1),10)
  • Line Location: START+19
Function Call: WRITE
  • Prompt: ?73,$J($FN(V9,",",0),7)
  • Line Location: START+20
Function Call: WRITE
  • Prompt: ?19,$J($FN(V1,",",0),7)
  • Line Location: PROV+5
Function Call: WRITE
  • Prompt: ?26,$J($FN(V2,",",0),7)
  • Line Location: PROV+6
Function Call: WRITE
  • Prompt: ?34,$J($FN(V3,",",0),7)
  • Line Location: PROV+7
Function Call: WRITE
  • Prompt: ?42,$J($FN(V4,",",0),7)
  • Line Location: PROV+8
Function Call: WRITE
  • Prompt: ?109,$J($FN(V8,",",1),10)
  • Line Location: PROV+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?56,"DATE GENERATED: ",BCHDT,?124,"Page ",BCHPG,!
  • Line Location: HEAD2+2
Function Call: WRITE
  • Prompt: $$CTR^BCHRLU($$LOC^BCHRLU),!
  • Line Location: HEAD2+3
Function Call: WRITE
  • Prompt: !,$$CTR^BCHRLU(X,80)
  • Line Location: HEAD2+4
Function Call: WRITE
  • Prompt: !!,$$CTR^BCHRLU(X,80)
  • Line Location: HEAD2+5
Function Call: WRITE
  • Prompt: !?((80-X)/2),"PROGRAM: ",BCHPROGN
  • Line Location: HEAD2+7
Function Call: WRITE
  • Prompt: !?((80-X)/2),"PATIENTS: ",BCHREGN
  • Line Location: HEAD2+9
Function Call: WRITE
  • Prompt: !,$$CTR^BCHRLU(X,80)
  • Line Location: HEAD2+10
Function Call: WRITE
  • Prompt: !!?20,"SERVICE",?28,"TRAVEL",?36,"LEAVE",?44,"TOTAL",?52,"0 NUM",?60,"1 NUM",?68,">1 NUM",?75,"TOT #"
  • Line Location: HEAD2+11
Function Call: WRITE
  • Prompt: !,"PROVIDER",?20,"HOURS",?28,"HOURS",?36,"HOURS",?44,"HOURS",?52,"SERV",?60,"SERV",?68,"SERV",?74,"SERVED"
  • Line Location: HEAD2+12
Function Call: WRITE
  • Prompt: !,$TR($J(" ",80)," ","-")
  • Line Location: HEAD2+13
Routine Call
  • DIR
  • Line Location:
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHTPROG - [#90002.51] HEAD2+6
^VA(200 - [#200] HEAD2+2
^XTMP("BCHRC6" START+5, START+11, PROV+1, PROV+4, DONE+1!

Label References

Name Line Occurrences
@( START+7
DONE START+5, START+9, PROV+2
HEAD START+9, PROV+2

Naked Globals

Name Field # of Occurrence
^(0 HEAD2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BCHBD START+1
>> BCHBDD START+1*, HEAD2+10
BCHBT START+5, START+11, PROV+1, PROV+4, DONE+1!
>> BCHDT START+2*, HEAD2+2
>> BCHED START+1
>> BCHEDD START+1*, HEAD2+10
BCHJOB START+5, START+11, PROV+1, PROV+4, DONE+1!
>> BCHPG START+3*, HEAD2+1*, HEAD2+2
>> BCHPRG HEAD2+6
>> BCHPROGN HEAD2+6*, HEAD2+7
BCHQUIT START+4!, START+9, PROV+1, PROV+2, HEAD+1*
>> BCHREGN HEAD2+8, HEAD2+9
>> BCHX PROV+1*, PROV+3, PROV+4
DIR HEAD+1!
DIR(0 HEAD+1*
DT START+2
>> DTOUT HEAD+1
DUZ HEAD2+2
>> I START+11*, PROV+4*
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOSL START+9, PROV+2
IOST START+7, HEAD+1
U START+11, PROV+4, HEAD2+2, HEAD2+6
>> V START+11*, PROV+4*
>> V1 START+12*, PROV+5*
>> V2 START+13*, PROV+6*
>> V3 START+14*, PROV+7*
>> V4 START+15*, PROV+8*
>> V5 START+16, PROV+9
>> V6 START+17, PROV+10
>> V7 START+18, PROV+11
>> V9 START+20, PROV+13
>> X HEAD2+4*, HEAD2+5*, HEAD2+6*, HEAD2+7, HEAD2+8*, HEAD2+9, HEAD2+10*
>> Y START+1*, START+2*, HEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All