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

Package: IHS RPMS CHR System

Routine: BCHRC6


Information

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

Source Information

Source file <BCHRC6.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 6  BCH P CHRIS II REPORT 6  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
PROG1 ;enter program
ZIS ;CALL TO XBDBQUE
ERR
PROCESS ;
ED ;get ending date
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
^DIR BD+1, ED+1, PROG+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: BCHRC6+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. 6 **********"
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !!?33,"PROVIDER DATA",!!,"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
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • PROG+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
^BCHR("B" D+2, D1+1
^BCHRPROB - [#90002.01] PROCESS+13, PROCESS+15, PROCESS+16, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+20
^BCHRPROB("AD" PROCESS+12
^BCHTSERV - [#90002.54] PROCESS+14
^DPT - [#2] PROCESS+7
^VA(200 - [#200] PROCESS+10
^XTMP("BCHRC6" PROC+3*, PROCESS+11*, PROCESS+15*, PROCESS+16*, PROCESS+17*, PROCESS+18*, PROCESS+19*, PROCESS+20*, PROCESS+22*, PROCESS+23*
, PROCESS+24*, PROCESS+25*, PROCESS+27*, PROCESS+28*, PROCESS+29*

Label References

Name Line Occurrences
BD ED+2, PROG+3
D PROC+4
D1 D+2
EOJ PROC+4
INFORM BCHRC6+6
PROCESS D1+1
PROG PROG1+1, REG+3
REG PROG+4
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+2!, D+1
BCHBDD XIT+2!
>> BCHBT PROC+2*, PROC+3, PROCESS+11, PROCESS+15, PROCESS+16, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+20, PROCESS+22
, PROCESS+23, PROCESS+24, PROCESS+25, PROCESS+27, PROCESS+28, PROCESS+29
BCHBTH BCHRC6+5*, XIT+2!, PROC+2*
BCHDT XIT+2!
BCHED ED+3*, XIT+2!, D+2
BCHEDD XIT+2!
>> BCHET EOJ+1*
>> BCHJOB BCHRC6+5*, PROC+2*, PROC+3, PROCESS+11, PROCESS+15, PROCESS+16, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+20
, PROCESS+22, PROCESS+23, PROCESS+24, PROCESS+25, PROCESS+27, PROCESS+28, PROCESS+29
BCHNAME XIT+2!, PROCESS+10*, PROCESS+11, PROCESS+15, PROCESS+17, PROCESS+19, PROCESS+22, PROCESS+23, PROCESS+27, PROCESS+28
, PROCESS+29
>> BCHNRPAT PROCESS+2*, PROCESS+5, PROCESS+6*
BCHODAT XIT+2!, D+2*, D1+1
>> BCHPAT PROCESS+1*, PROCESS+4, PROCESS+6, PROCESS+7
BCHPRG PROG+1*, PROG+4*, PROG1+2*, XIT+2!, PROCESS+9
>> BCHPROG PROCESS+8*, PROCESS+9
BCHQUIT XIT+2!
BCHR XIT+2!, D1+1*, PROCESS+2, PROCESS+12
BCHR0 XIT+2!, D1+1*, PROCESS+1, PROCESS+8, PROCESS+10, PROCESS+22, PROCESS+23, PROCESS+24, PROCESS+25, PROCESS+26
>> BCHRCNT D1+1*
>> BCHREG REG+1*, REG+4*, PROCESS+4, PROCESS+5
>> BCHREGN REG+1*, REG+4*
BCHSD ED+4*, XIT+2!, D+1*, D+2
BCHX XIT+2!
>> C PROCESS+10*
DA PROG1+1!, REG+2!
DD PROG1+1!
DIC PROG1+1!*
DIC("A" PROG1+1*
DIC(0 PROG1+1*
DIR BD+1!, ED+1!, PROG+2!, REG+2!
DIR("?" PROG+2*
DIR("A" BD+1*, ED+1*, PROG+2*, REG+2*
DIR("B" ED+1*, PROG+2*, REG+2*
DIR(0 BD+1*, ED+1*, PROG+2*, REG+2*
>> DIRUT BD+1*, BD+2, ED+1*, ED+2, PROG+3, REG+3
DR PROG1+1!
>> DUOUT BD+1, ED+1
DUZ(2 BCHRC6+4
IOF INFORM+1
N XIT+2!, PROCESS+26*, PROCESS+28, PROCESS+29
P XIT+2!, PROCESS+26*, PROCESS+27
S XIT+2!, PROCESS+13*, PROCESS+14
U D1+1, PROCESS+1, PROCESS+2, PROCESS+8, PROCESS+10, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+16, PROCESS+17
, PROCESS+18, PROCESS+19, PROCESS+20, PROCESS+22, PROCESS+23, PROCESS+24, PROCESS+25, PROCESS+26, PROCESS+27, PROCESS+28
, PROCESS+29
V XIT+1*, XIT+2!
X ED+4, PROG1+1!, XIT+1*, XIT+2!, XIT+3!, D+1, PROCESS+12*, PROCESS+13, PROCESS+15, PROCESS+16
, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+20
>> 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, REG+4, XIT+3!
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