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

Package: IHS RPMS CHR System

Routine: BCHRU1P


Information

BCHRU1P ; IHS/CMI/LAB - print all visit report ;

Source Information

Source file <BCHRU1P.m>

Call Graph

Call Graph Total: 5

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

Entry Points

Name Comments DBIA/ICR reference
HEAD ;
HEAD2 ;
HEAD1 ;
START ;
DONE ;
HA ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT",!!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !?4,"TOTAL",?28,$J($FN(BCHTOTA,",",0),6),?35,"100%",?41,$J($FN(BCHTOTC,",",0),5),?47,"100%",?54,$J($FN(BCHTOTT,",",0),5),?60,"100%",?67,$J($FN(BCHTOTS,",",0),5),?73,"100%",!
  • Line Location: HA+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HA+13
Function Call: WRITE
  • Prompt: ?73,$S(BCHTOTS:$J(((BCHCS/BCHTOTS)*100),3,0),1:$J("0",3,0)),"%"
  • Line Location: HA+18
Function Call: WRITE
  • Prompt: ?35,$S(BCHTOTA:$J(((BCHCA/BCHTOTA)*100),3,0),1:$J("0",3,0)),"%"
  • Line Location: HA+25
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?58,BCHDT,?72,"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),"PROVIDER: ",BCHPROVN
  • Line Location: HEAD2+9
Function Call: WRITE
  • Prompt: !?((80-X)/2),"PATIENTS: ",BCHREGN
  • Line Location: HEAD2+11
Function Call: WRITE
  • Prompt: !?17,"REPORT DATES: ",BCHBDD," TO ",BCHEDD,!
  • Line Location: HEAD2+12
Function Call: WRITE
  • Prompt: !!?3,BCHCH,?31,"# PATIENTS",?44,"# FEMALES",?56,"# MALES",?69,"SERVICE"
  • Line Location: HEAD2+13
Function Call: WRITE
  • Prompt: !?69,"HOURS"
  • Line Location: HEAD2+14
Function Call: WRITE
  • Prompt: !,$TR($J(" ",80)," ","-")
  • Line Location: HEAD2+15
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, HEAD2+8
^XTMP("BCHRU1" START+4, HA+9, HA+10, HA+21, HA+22, DONE+2!

Label References

Name Line Occurrences
@( HA+1
DONE START+4, HA+7
HEAD START+4, HA+7, HA+11, HA+23

Naked Globals

Name Field # of Occurrence
^( HA+10, HA+22
^(0 HEAD2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BCHBD START+3
>> BCHBDD START+3*, HEAD2+12
BCHBTH START+4, HA+9, HA+10, HA+21, HA+22, DONE+2!
>> BCHCA HA+10*, HA+15, HA+22*, HA+25
>> BCHCC HA+10*, HA+16, HA+22*, HA+26
>> BCHCH HEAD2+5, HEAD2+13
>> BCHCHR1 HEAD2+8
>> BCHCS HA+10*, HA+18, HA+22*, HA+28
>> BCHCT HA+10*, HA+17, HA+22*, HA+27
>> BCHDT START+1*, HEAD2+2
>> BCHED START+3
>> BCHEDD START+3*, HEAD2+12
>> BCHHA HA+9*, HA+10, HA+14, HA+21, HA+22
BCHJOB START+4, HA+9, HA+10, HA+21, HA+22, DONE+2!
>> BCHPATS HA+4
>> BCHPATS("F" HA+5
>> BCHPATS("M" HA+6
>> BCHPATS("ST" HA+3
>> BCHPG START+2*, HEAD2+1*, HEAD2+2
>> BCHPRG HEAD2+6
>> BCHPROGN HEAD2+6*, HEAD2+7, HEAD2+8
>> BCHPROVN HEAD2+8*, HEAD2+9
>> BCHPROVT HEAD2+8
BCHQUIT START+2!, HA+7, HA+9, HA+11, HA+21, HA+23, HEAD+1*
>> BCHREGN HEAD2+10, HEAD2+11
>> BCHRPT HEAD2+4
>> BCHSUB HA+13, HA+19
>> BCHSUB1 HA+21*, HA+22, HA+24
>> BCHTOTA HA+4*, HA+8, HA+15, HA+25
>> BCHTOTC HA+5*, HA+8, HA+16, HA+26
>> BCHTOTS HA+3*, HA+8, HA+18, HA+28
>> BCHTOTT HA+6*, HA+8, HA+17, HA+27
DIR HEAD+1!
DIR(0 HEAD+1*
>> DTOUT HEAD+1
DUZ HEAD2+2
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOSL HA+7, HA+11, HA+23
IOST HA+1, HEAD+1
U HA+10, HA+22, HEAD2+2, HEAD2+6, HEAD2+8
>> X START+1, HEAD2+4*, HEAD2+5*, HEAD2+6*, HEAD2+7, HEAD2+8*, HEAD2+9, HEAD2+10*, HEAD2+11
>> Y START+1*, START+3*, HEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All