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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BCHRCH

Package: IHS RPMS CHR System

Routine: BCHRCH


Information

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

Source Information

Source file <BCHRCH.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 DD^%DT  C^%DTC  ^DIC  ^DIR  
IHS VA Utilities 1 ^XBDBQUE  

Caller Graph

Caller Graph Total: 2

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

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
PROG1 ;enter program
CHRT ;
CHRS ;EP
ZIS ;CALL TO XBDBQUE
CHR1 ;
ED ;get ending date
ERR
INFORM ;
GETDATES ;
XIT ;
PROG ;
NUM ;get # entries
REG ;

External References

Name Field # of Occurrence
DD^%DT ED+1
C^%DTC ED+4
^DIC PROG1+1, CHR1+2
^DIR BD+1, ED+1, PROG+2, CHRT+3, CHRS+1, NUM+1, 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: BCHRCH+3
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CHRT+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. 13 **********"
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !!?26,"CHR HIGHLIGHTS REPORT",!!,"You must enter the time frame for the report.",!!
  • 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+3
    • CHRS+1
    • NUM+1
    • REG+2

FileMan Files Accessed Via FileMan Db Call

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

Label References

Name Line Occurrences
BD ED+2, PROG+3
CHRS CHRT+6, NUM+2
CHRT PROG+4, CHR1+3, CHRS+2
INFORM BCHRCH+5
NUM REG+3
PROG PROG1+1, CHRT+4
XIT BD+2, ZIS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BCHBD BD+3*, ED+1, ED+4, XIT+1!
BCHBDD XIT+1!
BCHBT XIT+1!
BCHBTH BCHRCH+4*, XIT+1!
BCHC XIT+1!
>> BCHCHR1 CHR1+4*
BCHCHRT CHRS+3*, NUM+1, XIT+1!
BCHDT XIT+1!
BCHED ED+3*, XIT+1!
BCHEDD XIT+1!
BCHET XIT+1!
BCHJOB BCHRCH+4*, XIT+1!
BCHLNO NUM+3*, XIT+1!
BCHODAT XIT+1!
BCHPG XIT+1!
BCHPRG PROG+1*, PROG+4*, PROG1+2*, XIT+1!
BCHPROC XIT+1!
BCHPROG XIT+1!
BCHPROVT CHRT+2!, CHRT+5*, CHRT+6
BCHQUIT XIT+1!
BCHR XIT+1!
BCHR0 XIT+1!
>> BCHREG REG+1*, REG+4*
>> BCHREGN REG+1*, REG+4*
BCHSD ED+4*, XIT+1!
BCHTH XIT+1!
BCHTT XIT+1!
BCHX XIT+1!
BCHY XIT+1!
DA PROG1+1!, CHRT+3!, 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+3!, CHRS+1!, NUM+1!, REG+2!
DIR("?" PROG+2*, NUM+1*
DIR("A" BD+1*, ED+1*, PROG+2*, CHRT+3*, CHRS+1*, NUM+1*, REG+2*
DIR("B" ED+1*, PROG+2*, CHRT+3*, CHRS+1*, NUM+1*, REG+2*
DIR(0 BD+1*, ED+1*, PROG+2*, CHRT+3*, CHRS+1*, NUM+1*, REG+2*
>> DIRUT BD+1*, BD+2, ED+1*, ED+2, PROG+3, CHRT+4, CHRS+1*, CHRS+2, NUM+1*, NUM+2
, REG+3
DR PROG1+1!
>> DUOUT BD+1, ED+1, CHRS+1, NUM+1
DUZ(2 BCHRCH+3
IOF INFORM+1
X ED+4, PROG1+1!
>> X1 ED+4*
>> X2 ED+4*
>> 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+5, CHR1+3, CHR1+4, CHRS+3
, NUM+3, REG+4
Y(0 REG+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All