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

Package: IHS RPMS CHR System

Routine: BCHRP3P


Information

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

Source Information

Source file <BCHRP3P.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
LOC ;
HEAD ;I 'BCHPG G HEAD1
HEAD2 ; if printer
HEAD1 ; if terminal
PROV ;
START ;
DONE ;
ACT ;
PROG ;
PROB ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !?13,"********** CONFIDENTIAL PATIENT INFORMATION **********"
  • Line Location: HEAD2+2
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?33,BCHDT,?70,"Page ",BCHPG,!
  • Line Location: HEAD2+3
Function Call: WRITE
  • Prompt: $$CTR^BCHRLU($$LOC^BCHRLU),!
  • Line Location: HEAD2+4
Function Call: WRITE
  • Prompt: ?24,"ACTIVITY REPORT BY HEALTH PROBLEM",!
  • 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: !?17,"REPORT DATES: ",BCHBDD," TO ",BCHEDD,!
  • Line Location: HEAD2+10
Function Call: WRITE
  • Prompt: !?52,"# Activities",?66,"ACT TIME (hrs)",!
  • Line Location: HEAD2+11
Function Call: WRITE
  • Prompt: !,$TR($J(" ",80)," ","-")
  • Line Location: HEAD2+12
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+3
^XTMP("BCHRP3" PROG+1, DONE+2!, LOC+1, PROV+1, ACT+1, PROB+1, PROB+3

Label References

Name Line Occurrences
@( START+4
ACT PROV+5
HEAD PROG+3, PROG+7, LOC+3, LOC+7, PROV+3, PROV+7, ACT+3, ACT+7, PROB+2
LOC PROG+5
PROB ACT+5
PROV LOC+5

Naked Globals

Name Field # of Occurrence
^( PROB+3
^(0 HEAD2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BCHACT ACT+1*, ACT+4, PROB+1, PROB+3
>> BCHACTOT START+3*
>> BCHACTOT("AT" ACT+2*, ACT+9, PROB+6*
>> BCHACTOT("R" ACT+2*, ACT+9, PROB+5*
>> BCHAT PROB+3*, PROB+4, PROB+6
>> BCHATOT START+3*
>> BCHATOT("AT" PROG+2*, PROG+9, PROB+6*
>> BCHATOT("R" PROG+2*, PROG+9, PROB+5*
>> BCHBD START+2
>> BCHBDD START+2*, HEAD2+10
>> BCHBT PROB+3
>> BCHBTH PROG+1, DONE+2, LOC+1, PROV+1, ACT+1, PROB+1
>> BCHDT START+1*, HEAD2+3
>> BCHED START+2
>> BCHEDD START+2*, HEAD2+10
>> BCHFTOT START+3*
>> BCHJOB PROG+1, DONE+2, LOC+1, PROV+1, ACT+1, PROB+1, PROB+3
>> BCHLOC LOC+1*, LOC+4, PROV+1, ACT+1, PROB+1, PROB+3
>> BCHLTOT("AT" LOC+2*, LOC+9, PROB+6*
>> BCHLTOT("R" LOC+2*, LOC+9, PROB+5*
>> BCHPAT PROB+3*
>> BCHPG START+3*, HEAD2+1*, HEAD2+3
>> BCHPRG HEAD2+6
>> BCHPROB PROB+1*, PROB+3, PROB+4
>> BCHPROG PROG+1*, PROG+4, LOC+1, PROV+1, ACT+1, PROB+1, PROB+3
>> BCHPROGN HEAD2+6*, HEAD2+7
>> BCHPROV PROV+1*, PROV+4, ACT+1, PROB+1, PROB+3
>> BCHPTOT START+3*
>> BCHPTOT("AT" PROV+2*, PROV+9, PROB+6*
>> BCHPTOT("R" PROV+2*, PROV+9, PROB+5*
BCHQUIT START+5!, PROG+1, PROG+3, PROG+6, PROG+7, LOC+1, LOC+3, LOC+6, LOC+7, PROV+1
, PROV+3, PROV+6, PROV+7, ACT+1, ACT+3, ACT+6, ACT+7, PROB+1, PROB+2, HEAD+1*
>> BCHREC PROB+3*, PROB+4, PROB+5
>> BCHREGN HEAD2+8, HEAD2+9
>> BCHSTOT START+3*
DIR HEAD+1!
DIR(0 HEAD+1*
>> DTOUT HEAD+1
DUZ HEAD2+3
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOSL PROG+3, PROG+7, LOC+3, LOC+7, PROV+3, PROV+7, ACT+3, ACT+7, PROB+2
IOST START+4, HEAD+1
U PROB+3, HEAD2+3, HEAD2+6
>> X START+1, HEAD2+6*, HEAD2+7, HEAD2+8*, HEAD2+9
>> 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