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

Package: Referred Care Information System

Routine: BMCFDR


Information

BMCFDR ; IHS/PHXAO/TMJ - DRIVER TO PRINT REFERRAL FORM ; [ 09/26/2006 3:57 PM ]

Source Information

Source file <BMCFDR.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIR  ^DIWP  
IHS VA Utilities 1 ^XBDBQUE  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 19

Package Total Caller Graph
Referred Care Information System 19 BMC PRINT REFERRAL FORMS  BMCFAHC1  BMCFAHC2  BMCFAHC3  BMCFDR2  BMCFDRC  BMCFPIN  BMCFPRN  
BMCFPRN2  BMCFPRN3  BMCFPRNC  BMCFPRNP  BMCFUTL  BMCOUTRP  BMCRCRVP  BMCRR18P  
BMCRR20P  BMCRRSPP  BMCRUTL  

Entry Points

Name Comments DBIA/ICR reference
ASKCON ;EP;Ask to print consult
ZIS ;
ASKROUT ;Ask if Want to Print Routing Slip if Exists
CHSSTAT ;
COMP ;
GETTYPE ;Get Type of Referral-Screen Out Secondary Provider Letter
AHCCCS ;EP
WPS ;EP
START ;
XIT ;
WP ;EP - Entry point to print wp fields pass node in BMCWP
PRINT ;EP
GETREF ;get referral entry

External References

Name Field # of Occurrence
^%ZIS XIT+6
^DIC GETTYPE+2, GETREF+5
^DIR ASKROUT+8, ASKCON+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 referral letter.",!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETREF+1
Function Call: WRITE
  • Prompt: !!,?10,"**ROUTING SLIP INFORMATION IS ATTACHED TO THIS REFERRAL**"
  • Line Location: ASKROUT+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASKROUT+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+1
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
  • DIC
  • Line Location:
    • GETTYPE+2
    • GETREF+5
Routine Call
  • DIR
  • Line Location:
    • ASKROUT+8
    • ASKCON+6
Routine Call
  • %ZIS
  • Line Location:
    • XIT+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BMCREF - [#90001] Classic Fileman Calls
^BMCTFORM - [#90001.33] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BMCPARM - [#90001.31] ASKCON+2
^BMCREF - [#90001] ASKROUT+4
^BMCTFORM - [#90001.33] GETREF+8, PRINT+1
^DIC - [#1] WP+6
^UTILITY($J WP+4!, WPS+1, WPS+3!

Label References

Name Line Occurrences
ASKCON ASKROUT+4, ASKROUT+12
GETREF GETREF+8
XIT GETTYPE+3, GETREF+6, ASKROUT+9
ZIS ASKROUT+4, ASKROUT+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A XIT+2!
BMCCAP XIT+1!, WP+9, WPS+3!
BMCCHSAS XIT+1!
BMCCHSCT XIT+5!
BMCCHSR XIT+1!
BMCCMT XIT+5!
BMCCOL WPS+3!
BMCDA XIT+1!, WP+6, WPS+3!
BMCDFN XIT+1!
BMCFILE XIT+1!, WP+6, WPS+3!
BMCFTYPE GETTYPE+1*, GETTYPE+4*, GETREF+8, PRINT+1, XIT+1!
BMCI XIT+1!
BMCIOM XIT+1!, WP+7
BMCKPDA XIT+1!
BMCN XIT+4!
BMCNI XIT+4!
BMCNODE XIT+1!, WP+6, WPS+3!
BMCNUM XIT+4!
BMCPCON START+4*, GETTYPE+5*, ASKCON+1, ASKCON+2*, ASKCON+7*, XIT+4!
BMCPG XIT+1!
BMCPROUT ASKROUT+1*, ASKROUT+12*, XIT+4!
BMCQUIT START+4*, GETREF+8, XIT+1!
BMCR0 XIT+1!
BMCRDATE XIT+5!
BMCREC XIT+5!
BMCREF GETREF+1*, GETREF+7*, ASKROUT+4, XIT+1!
BMCRIEN XIT+5!
BMCRIO XIT+5!
BMCRNS XIT+1!
BMCRNUMB XIT+5!
BMCRSTAT XIT+5!
BMCRTYPE XIT+5!
BMCV XIT+1!
BMCVIEN XIT+4!
BMCVST XIT+5!
BMCVSTP XIT+5!
BMCWP XIT+1!, WP+3!
BMCWP( WPS+1*
BMCX XIT+1!, WP+2~, WP+5*, WP+7*, WP+9
BMCY XIT+1!
C XIT+2!
D XIT+2!
D0 XIT+2!
D1 XIT+2!
DA GETTYPE+2!, GETREF+5!, XIT+2!
DD XIT+2!
DDSFILE XIT+2!
DI XIT+2!
DIADD XIT+2!
DIC GETTYPE+2*!, GETREF+2*, GETREF+5!, XIT+2!
DIC("A" GETTYPE+2*, GETREF+2*
DIC("S" GETTYPE+2*, GETREF+4*
DIC(0 GETTYPE+2*, GETREF+2*
DICR XIT+2!
DIE XIT+2!
DIK XIT+2!
DINUM XIT+2!
DIPGM XIT+2!
DIQ XIT+2!
DIR ASKROUT+8!, ASKCON+6!, XIT+2!
DIR("?" ASKROUT+8*
DIR("A" ASKROUT+8*, ASKCON+5*
DIR("B" ASKROUT+8*, ASKCON+4*
DIR(0 ASKROUT+8*, ASKCON+4*
>> DIRUT ASKROUT+8*, ASKROUT+9, ASKCON+6*
DIW XIT+2!
DIWF XIT+2!, WPS+2!
DIWI XIT+2!
DIWL XIT+2!, WP+7*, WPS+1, WPS+2!
DIWR XIT+2!, WP+7*, WPS+2!
DIWT XIT+2!
DIWTC XIT+2!
DIWX XIT+2!
DLAYGO XIT+2!
DO XIT+2!
DQ XIT+2!
DR XIT+2!
DTOUT XIT+2!
>> DUOUT ASKROUT+8, ASKCON+6
DUZ(2 ASKCON+2
F XIT+3!
G XIT+3!, WP+2~, WP+6*, WP+7, WP+8, WPS+3!
I XIT+3!
IO("S" XIT+6
IOF START+1
IOM WP+7
>> IOP XIT+6*
>> IOS XIT+6
J XIT+3!
N XIT+3!
P XIT+3!, WP+2~, WP+5*, WPS+1*
T XIT+3!
U GETTYPE+5, ASKCON+2
X XIT+3!, WP+9*, WP+10*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y GETTYPE+3, GETTYPE+4, GETTYPE+5, GETREF+6, GETREF+7, ASKROUT+12, ASKCON+7, 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