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

Package: Referred Care Information System

Routine: BMCFDRC


Information

BMCFDRC ; IHS/PHXAO/TMJ - CHS DRIVER TO PRINT REFERRAL FORM ; [ 09/26/2006 4:01 PM ]

Source Information

Source file <BMCFDRC.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^DIC  ^DIE  ^DIR  ^DIWP  
IHS VA Utilities 2 ^XBDBQUE  $$EXTSET^XBFUNC  
Referred Care Information System 1 ASKCON^BMCFDR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Referred Care Information System 2 BMC PRINT REFERRAL FORMS - CHS  BMCFDR2  

Entry Points

Name Comments DBIA/ICR reference
ASKCON ;ASK TO PRINT CONSULT LETTER ;BMC*4.0*2 IHS/OIT/FCJ
ZIS ;
CHSSTAT ;EP
COMP ;
GETTYPE ;
CHSASK ;Ask if Edit CHS Approval Status
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
ASKCON^BMCFDR ASKCON+1
^DIC GETTYPE+2, GETREF+4
^DIE CHSSTAT+5
^DIR CHSASK+2
^DIWP WP+10
^XBDBQUE ZIS+2
$$EXTSET^XBFUNC GETREF+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "********** REFERRAL FORM PRINT **********",!!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: "This report will produce a hard copy computer generated referral letter.",!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETREF+1
Function Call: WRITE
  • Prompt: !!,?10,"**CHS APPROVAL STATUS**: ",BMCCHSAP
  • Line Location: GETREF+17
Function Call: WRITE
  • Prompt: !!
  • Line Location: CHSASK+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CHSSTAT+1
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"The CHS Approval Status has not been entered. Please enter it now.",!
  • Line Location: CHSSTAT+4
Function Call: WRITE
  • Prompt: !!,"No entry made. Defaulting to 'PENDING Status for verbiage on Referral Letter'.",!!
  • Line Location: CHSSTAT+6
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:
    • CHSSTAT+5
Routine Call
  • DIC
  • Line Location:
    • GETTYPE+2
    • GETREF+4
Routine Call
  • DIR
  • Line Location:
    • CHSASK+2

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)
^BMCREF - [#90001] GETREF+12, GETREF+14, CHSSTAT+3, CHSSTAT+4, CHSSTAT+6
^BMCTFORM - [#90001.33] GETREF+7, PRINT+1
^DIC - [#1] WP+6
^UTILITY($J WP+4!, WPS+1, WPS+3!

Label References

Name Line Occurrences
ASKCON GETREF+11, GETREF+12, CHSASK+4
CHSSTAT CHSASK+5
GETREF GETREF+7
XIT GETTYPE+3, GETREF+5, CHSASK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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