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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BCHRC2

Package: IHS RPMS CHR System

Routine: BCHRC2


Information

BCHRC2 ; IHS/CMI/LAB - CHR Report 2 ;

Source Information

Source file <BCHRC2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 4 DD^%DT  C^%DTC  ^DIC  ^DIR  
IHS RPMS CHR System 1 XTMP^BCHUTIL  
IHS VA Utilities 1 ^XBDBQUE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS RPMS CHR System 2 BCH P CHR REPORT 4  BCH P CHRIS II REPORT 4  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
PROG1 ;enter program
CHRT ;
ZIS ;CALL TO XBDBQUE
CHR1 ;
PROCESS ;
ED ;get ending date
ERR
INFORM ;
GETDATES ;
XIT ;
EOJ ;
PROG ;
D1 ;
PROC ;EP - PROCESS REFERRAL REPORT
REG ;
D ; Run by date of service

External References

Name Field # of Occurrence
DD^%DT ED+1
C^%DTC ED+4, D+1
XTMP^BCHUTIL PROC+1
^DIC PROG1+1, CHR1+2
^DIR BD+1, ED+1, PROG+2, CHRT+2, REG+2
^XBDBQUE ZIS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!!
  • Line Location: BCHRC2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!"
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !?20,"********** CHR REPORT NO. 4 **********"
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !!?26,"NUMBER OF REFERRALS FROM/TO",!!,"You must enter the time frame and the program for which the report",!,"will be run.",!!
  • Line Location: INFORM+3
Routine Call
  • DIC
  • Line Location:
    • PROG1+1
    • CHR1+2
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • PROG+2
    • CHRT+2
    • REG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BCHTPROG - [#90002.51] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHR - [#90002] D1+1, PROCESS+2, PROCESS+18, PROCESS+19, PROCESS+22, PROCESS+23
^BCHR("B" D+2, D1+1
^BCHRPROB - [#90002.01] PROCESS+14
^BCHRPROB("AD" PROCESS+14
^BCHTREF - [#90002.52] PROC+3
^BCHTSERV - [#90002.54] PROCESS+14
^DPT - [#2] PROCESS+7
^XTMP("BCHRC2" PROC+3*, PROC+4*, PROCESS+21*, PROCESS+25*

Label References

Name Line Occurrences
BD ED+2, PROG+3
CHRT PROG+4, CHR1+3, REG+3
D PROC+5
D1 D+2
EOJ PROC+5
INFORM BCHRC2+6
PROCESS D1+1
PROG PROG1+1, CHRT+3
REG CHRT+5
XIT BD+2, ZIS+3

Naked Globals

Name Field # of Occurrence
^(0 D1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BCHBD BD+3*, ED+1, ED+4, XIT+1!, D+1
BCHBDD XIT+1!
BCHBT XIT+1!, PROC+2*, PROC+3, PROC+4, PROCESS+21, PROCESS+25
BCHBTH BCHRC2+5*, XIT+1!, PROC+2*
>> BCHC PROCESS+14*, PROCESS+15
>> BCHCHR1 CHR1+4*, PROCESS+11
BCHDT XIT+1!
BCHED ED+3*, XIT+1!, D+2
BCHEDD XIT+1!
BCHET XIT+1!, EOJ+1*
BCHF XIT+1!
BCHFT XIT+1!
BCHJOB BCHRC2+5*, XIT+1!, PROC+2*, PROC+3, PROC+4, PROCESS+21, PROCESS+25
>> BCHNRPAT PROCESS+2*, PROCESS+3, PROCESS+5, PROCESS+6*
BCHODAT XIT+1!, D+2*, D1+1
>> BCHPAT PROCESS+1*, PROCESS+3, PROCESS+4, PROCESS+6, PROCESS+7
BCHPG XIT+1!
BCHPRG PROG+1*, PROG+4*, PROG1+2*, XIT+1!, PROCESS+9
BCHPROG XIT+1!, PROCESS+8*, PROCESS+9
>> BCHPROV PROCESS+10*, PROCESS+11
BCHPROVT CHRT+1!, CHRT+4*, CHRT+5, PROCESS+11
BCHQUIT XIT+1!
BCHR XIT+1!, D1+1*, PROCESS+2, PROCESS+14, PROCESS+18, PROCESS+19, PROCESS+22, PROCESS+23
BCHR0 XIT+1!, D1+1*, PROCESS+1, PROCESS+8, PROCESS+10, PROCESS+12, PROCESS+13, PROCESS+21, PROCESS+25
>> BCHRCNT D1+1*
BCHREF XIT+1!, PROCESS+19*, PROCESS+20, PROCESS+21, PROCESS+23*, PROCESS+24, PROCESS+25
>> BCHREG REG+1*, REG+4*, PROCESS+4, PROCESS+5
>> BCHREGN REG+1*, REG+4*
BCHSD ED+4*, XIT+1!, D+1*, D+2
BCHT XIT+1!
BCHTT XIT+1!
BCHX XIT+1!, PROCESS+14*
DA PROG1+1!, CHRT+2!, REG+2!
DD PROG1+1!
DIC PROG1+1!*, CHR1+1!, CHR1+2*
DIC("A" PROG1+1*, CHR1+2*
DIC(0 PROG1+1*, CHR1+2*
DIR BD+1!, ED+1!, PROG+2!, CHRT+2!, REG+2!
DIR("?" PROG+2*
DIR("A" BD+1*, ED+1*, PROG+2*, CHRT+2*, REG+2*
DIR("B" ED+1*, PROG+2*, CHRT+2*, REG+2*
DIR(0 BD+1*, ED+1*, PROG+2*, CHRT+2*, REG+2*
>> DIRUT BD+1*, BD+2, ED+1*, ED+2, PROG+3, CHRT+3, REG+3
DR PROG1+1!
>> DUOUT BD+1, ED+1
DUZ(2 BCHRC2+4
IOF INFORM+1
U D1+1, PROCESS+1, PROCESS+2, PROCESS+8, PROCESS+10, PROCESS+12, PROCESS+13, PROCESS+14, PROCESS+19, PROCESS+21
, PROCESS+23, PROCESS+25
X ED+4, PROG1+1!, XIT+2!, PROC+3*, D+1, PROCESS+18*, PROCESS+19, PROCESS+22*, PROCESS+23
>> X1 ED+4*, D+1*
>> X2 ED+4*, D+1*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y BD+3, ED+1*, ED+3, PROG+4, PROG1+1!, PROG1+2, CHRT+4, CHR1+3, CHR1+4, REG+4
, XIT+2!
Y(0 REG+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All