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

Package: IHS RPMS CHR System

Routine: BCHRC9


Information

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

Source Information

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

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 ;IHS/CMI/LAB - added program screen
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: BCHRC9+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. 9 **********"
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !!?28,"DATA SUMMARY BY PROVIDER",!!,"You must enter the time frame for the report.",!
  • 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+17, PROCESS+21
^BCHRPROB("AD" PROCESS+12
^BCHTSERV - [#90002.54] PROCESS+15
^DPT - [#2] PROCESS+7
^VA(200 - [#200] PROCESS+10
^XTMP("BCHRC9" PROC+3*, PROCESS+11*, PROCESS+14*, PROCESS+17*, PROCESS+19*, PROCESS+21*, PROCESS+23*, PROCESS+25*, PROCESS+26*, PROCESS+28*

Label References

Name Line Occurrences
BD ED+2, PROG+3
D PROC+4
D1 D+2
EOJ PROC+4
INFORM BCHRC9+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+1!, D+1
BCHBDD XIT+1!
BCHBT XIT+1!, PROC+2*, PROC+3, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23, PROCESS+25
, PROCESS+26, PROCESS+28
BCHBTH BCHRC9+5*, XIT+1!, PROC+2*
BCHDT XIT+1!
BCHED ED+3*, XIT+1!, D+2
BCHEDD XIT+1!
>> BCHET EOJ+1*
BCHJOB BCHRC9+5*, XIT+1!, PROC+2*, PROC+3, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23
, PROCESS+25, PROCESS+26, PROCESS+28
BCHNAME XIT+1!, PROCESS+10*, PROCESS+11, PROCESS+14, PROCESS+17, PROCESS+19, PROCESS+21, PROCESS+23, PROCESS+25, PROCESS+28
>> BCHNRPAT PROCESS+2*, PROCESS+5, PROCESS+6*
BCHODAT XIT+1!, D+2*, D1+1
>> BCHPAT PROCESS+1*, PROCESS+4, PROCESS+6, PROCESS+7
BCHPRG PROG+1*, PROG+4*, PROG1+2*, XIT+1!, PROCESS+9
>> BCHPROG PROCESS+8*, PROCESS+9
BCHQUIT XIT+1!
BCHR XIT+1!, D1+1*, PROCESS+2, PROCESS+12
BCHR0 XIT+1!, D1+1*, PROCESS+1, PROCESS+8, PROCESS+10, PROCESS+19, PROCESS+23, PROCESS+25, PROCESS+26, PROCESS+27
>> BCHRCNT D1+1*
>> BCHREG REG+1*, REG+4*, PROCESS+4, PROCESS+5
>> BCHREGN REG+1*, REG+4*
BCHSD ED+4*, XIT+1!, D+1*, D+2
>> C PROCESS+10*, PROCESS+12*, PROCESS+19, PROCESS+23
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 BCHRC9+4
IOF INFORM+1
N XIT+1!, PROCESS+27*, PROCESS+28
P XIT+1!
S XIT+1!, PROCESS+15*
U D1+1, PROCESS+1, PROCESS+2, PROCESS+8, PROCESS+10, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+19
, PROCESS+21, PROCESS+23, PROCESS+25, PROCESS+26, PROCESS+27, PROCESS+28
V XIT+1!
X ED+4, PROG1+1!, XIT+1!, XIT+2!, D+1, PROCESS+12*, PROCESS+13, PROCESS+15, PROCESS+17, PROCESS+21
>> 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+2!, PROCESS+15*, PROCESS+16
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