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

Package: Referred Care Information System

Routine: BMCFDRA


Information

BMCFDRA ; IHS/PHXAO/TMJ - DRIVER TO PRINT ALT RESOURCE LETTER ;

Source Information

Source file <BMCFDRA.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIWP  
IHS VA Utilities 1 ^XBDBQUE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Referred Care Information System 2 BMC6 PRINT ALT RESOURCE LETTER  BMCFPRNA  

Entry Points

Name Comments DBIA/ICR reference
ZIS ;
CHSSTAT ;EP
COMP ;
GETTYPE ;Select Alternate Resource Contact & set Text Verbiage
AHCCCS ;EP
WPS ;EP
START ;
XIT ;
WP ;EP - Entry point to print wp fields pass node in BMCWP
PRINT ;EP
TYPE ;Get Type of Letter Dissemination
GETREF ;get referral entry

External References

Name Field # of Occurrence
^DIC GETTYPE+2, GETREF+2
^DIE GETREF+8, TYPE+2, TYPE+8, CHSSTAT+6
^DIWP WP+10
^XBDBQUE ZIS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "********** REFERRAL FORM PRINT **********",!!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: "This report will produce a hard copy computer generated Alternate Resource",!,"Application Letter",!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETREF+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+1
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"The CHS Preliminary Review has not been entered. Please enter it now.",!
  • Line Location: CHSSTAT+5
Function Call: WRITE
  • Prompt: !!,"No entry made. Defaulting to 'TO BE DETERMINED'.",!!
  • Line Location: CHSSTAT+7
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"This letter must be printed on a printer capable of 132 character print.",!!
  • Line Location: AHCCCS+1
Routine Call
  • DIE
  • Line Location:
    • GETREF+8
    • TYPE+2
    • TYPE+8
    • CHSSTAT+6
Routine Call
  • DIC
  • Line Location:
    • GETTYPE+2
    • GETREF+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BMCREF - [#90001] Classic Fileman Calls
^BMCALT - [#90001.83] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BMCALT - [#90001.83] GETTYPE+5
^BMCREF - [#90001] CHSSTAT+3, CHSSTAT+4, CHSSTAT+7
^BMCTFORM - [#90001.33] GETREF+5, PRINT+1
^DIC - [#1] WP+6
^UTILITY($J WP+4!, WPS+1, WPS+3!

Label References

Name Line Occurrences
GETREF GETREF+5
XIT GETTYPE+3, GETREF+3
ZIS TYPE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A XIT+3!
BMCAGE XIT+4!
BMCCAP XIT+2!, WP+9, WPS+3!
BMCCHSAS XIT+2!
BMCCHSR XIT+2!, CHSSTAT+4*, CHSSTAT+7*
BMCCOL WPS+3!
>> BMCCPRV GETTYPE+4*, GETTYPE+5
>> BMCCPRVP GETTYPE+5*
BMCDA XIT+2!, WP+6, WPS+3!
BMCDFN XIT+2!
BMCFILE XIT+2!, WP+6, WPS+3!
BMCFIRST XIT+4!
BMCFTYPE GETTYPE+1*, GETREF+5, PRINT+1, XIT+2!, CHSSTAT+1
BMCI XIT+2!
BMCIOM XIT+2!, WP+7
BMCKPDA XIT+2!
BMCLAST XIT+4!
BMCLTYP TYPE+1*, TYPE+4*, TYPE+5, XIT+4!
BMCN XIT+4!
BMCNODE XIT+2!, WP+6, WPS+3!
BMCNUM XIT+4!
BMCPG XIT+2!
BMCPROUT XIT+4!
BMCQUIT START+4*, GETREF+5, XIT+2!
BMCR0 XIT+2!
BMCREF GETREF+1*, GETREF+4*, GETREF+8, TYPE+2, TYPE+8, XIT+2!, CHSSTAT+3, CHSSTAT+4, CHSSTAT+6, CHSSTAT+7
BMCRNS XIT+2!
BMCSIR XIT+4!
BMCV XIT+2!
BMCWP XIT+2!, WP+3!
BMCWP( WPS+1*
BMCX XIT+2!, WP+2~, WP+5*, WP+7*, WP+9
BMCY XIT+2!
C XIT+3!
D XIT+3!
D0 XIT+3!
D1 XIT+3!
DA GETTYPE+2!, GETREF+2!, GETREF+8*!, TYPE+2*!, TYPE+8*!, XIT+3!, CHSSTAT+6*!
DD XIT+3!
DDSFILE XIT+3!
DI XIT+3!
DIADD XIT+3!
DIC GETTYPE+2*!, GETREF+2*!, XIT+3!
DIC("A" GETTYPE+2*, GETREF+2*
DIC(0 GETTYPE+2*, GETREF+2*
DICR XIT+3!
DIE GETREF+8*!, TYPE+2*!, TYPE+8*!, XIT+3!, CHSSTAT+6*!
DIK XIT+3!
DINUM XIT+3!
DIPGM XIT+3!
DIQ XIT+3!
DIR XIT+3!
DIU GETREF+8!, TYPE+2!, TYPE+8!
DIVDR GETREF+8!, TYPE+2!, TYPE+8!
DIWF XIT+3!, WPS+2!
DIWL XIT+3!, WP+7*, WPS+1, WPS+2!
DIWR XIT+3!, WP+7*, WPS+2!
DLAYGO XIT+3!
DO XIT+3!
DQ XIT+3!
DR GETREF+8*, TYPE+2*, TYPE+8*, XIT+3!, CHSSTAT+6*
DTOUT XIT+3!
F XIT+3!
G XIT+3!, WP+2~, WP+6*, WP+7, WP+8, WPS+3!
I XIT+3!
IOF START+1
IOM WP+7
J XIT+3!
N XIT+3!
P XIT+3!, WP+2~, WP+5*, WPS+1*
T XIT+3!
U GETTYPE+5, CHSSTAT+3, CHSSTAT+4, CHSSTAT+7
X TYPE+4, XIT+3!, WP+9*, WP+10*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y GETTYPE+3, GETTYPE+4, GETREF+3, GETREF+4, XIT+3!, WP+8*, WP+10
Z XIT+3!, WPS+1*, WPS+2!
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 |  Local Variables |  All