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 |  Marked Items |  All
Print Page as PDF
Routine: BMCFDRS

Package: Referred Care Information System

Routine: BMCFDRS


Information

BMCFDRS ; IHS/PHXAO/TMJ - DRIVER TO PRINT ROUTING SLIP ;

Source Information

Source file <BMCFDRS.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS VA Utilities 2 ^XBDBQUE  ($$VAL,$$VALI,@(,ENP)^XBDIQ1  
VA Fileman 2 ^DIC  ^DIR  
IHS Patient 1 $$HRN^AUPNPAT  
Referred Care Information System 1 $$AVDOS^BMCRLU  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Referred Care Information System 4 BMC PRINT ROUTING SLIP  BMCFPRN  BMCFPRNC  BMCFUTL  

Entry Points

Name Comments DBIA/ICR reference
DEMO ;Demographic Data
HEAD ;
PRINT ;EP - PRINT ROUTING SLIP
DATE ;
D ;
C ;
ZIS ;
I ;
COMP ;
L ;
O ;
N ;
REFTO ;
S ;
XIT ;
W ;
DOCLIST ;
PRTDISP ; bottom of routing slip - include space to write in disposition
HEAD2 ;
HEAD1 ;
START ;EP - ENTRY POINT FROM OPTION LIST
ADDLDOC ; get any additional documents
GETREF ;

External References

Name Field # of Occurrence
$$HRN^AUPNPAT DEMO+2
$$AVDOS^BMCRLU DATE+1
^DIC GETREF+2
^DIR HEAD+2
^XBDBQUE ZIS+2
$$VAL^XBDIQ1 DEMO+1, DEMO+3, DEMO+4, C+3, C+4, C+5, C+6, I+3, I+4, I+5
, I+6, N+2, O+3, O+4, O+5, O+6, O+7
$$VALI^XBDIQ1 REFTO+7
@(^XBDIQ1 REFTO+1
ENP^XBDIQ1 ADDLDOC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "********** ROUTING SLIP PRINT **********",!!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: "This report will produce a hard copy computer-generated routing slip.",!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETREF+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+2
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+3
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !!,"Additional Documentation:"
  • Line Location: ADDLDOC+2
Function Call: WRITE
  • Prompt: !!,"Disposition: "
  • Line Location: PRTDISP+1
Function Call: WRITE
  • Prompt: "_"
  • Line Location: PRTDISP+1
Function Call: WRITE
  • Prompt: !!," "
  • Line Location: PRTDISP+2
Function Call: WRITE
  • Prompt: "_"
  • Line Location: PRTDISP+2
Function Call: WRITE
  • Prompt: !!," "
  • Line Location: PRTDISP+3
Function Call: WRITE
  • Prompt: "_"
  • Line Location: PRTDISP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: W+5
Function Call: WRITE
  • Prompt: ?(IOM-$L(X)/2),X
  • Line Location: W+6
Function Call: WRITE
  • Prompt: ?%,X
  • Line Location: W+7
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: C+3
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: C+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: C+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: C+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: I+3
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: I+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: I+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: I+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: N+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: N+2
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: O+3
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: O+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: O+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: O+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: O+7
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: L+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: D+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: S+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HEAD2+2
Function Call: WRITE
  • Prompt: !,?(IOM-20),"Page ",BMCPG
  • Line Location: HEAD2+2
Routine Call
  • DIC
  • Line Location:
    • GETREF+2
Routine Call
  • DIR
  • Line Location:
    • HEAD+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BMCREF - [#90001] PRINT+1, DEMO+3

Label References

Name Line Occurrences
$$VALI REFTO+1
@( PRINT+2
HEAD REFTO+6, ADDLDOC+4, W+4
L REFTO+2
S PRINT+5
W PRINT+4, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DATE+1, C+3, C+4, C+5, C+6
, I+3, I+4, I+5, I+6, N+1, N+2, O+3, O+4, O+5, O+6
, O+7, L+1, D+1, S+1
XIT GETREF+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% W+2~, W+3*, W+7*
A XIT+2!
BMCAR XIT+1!, ADDLDOC+1!
BMCAR(501 ADDLDOC+3, ADDLDOC+5
BMCCAP XIT+1!
BMCCHSAP XIT+1!
BMCCHSAS XIT+1!
BMCCHSR XIT+1!
BMCDA XIT+1!
BMCDFN XIT+1!, PRINT+1*
BMCFILE XIT+1!
BMCFTYPE XIT+1!
BMCI XIT+1!
BMCIOM XIT+1!
BMCKPDA XIT+1!
BMCNODE XIT+1!
BMCPG XIT+1!, PRINT+1*, HEAD2+1*, HEAD2+2*
BMCQUIT START+4*, XIT+1!, PRINT+3*, PRINT+4, PRINT+6, DEMO+1, DEMO+2, DEMO+3, DATE+1, REFTO+1
, REFTO+2, REFTO+5, REFTO+6, ADDLDOC+3, ADDLDOC+4, W+4, C+3, C+4, C+5, C+6
, I+3, I+4, I+5, I+6, N+1, N+2, O+3, O+4, O+5, O+6
, O+7, L+1, D+1, S+1, HEAD+2*
BMCR0 XIT+1!, PRINT+1*, DEMO+2, C+1, C+4, I+1, I+4, O+1, O+4
BMCREF GETREF+1*, GETREF+4*, XIT+1!, PRINT+1, DEMO+1, DEMO+3, DEMO+4, DATE+1, REFTO+1, REFTO+7
, ADDLDOC+1, C+3, C+4, I+3, I+4, N+2, O+3, O+4, O+7
BMCRNS XIT+1!
BMCV XIT+1!, C+1*, C+2, C+3, C+5, C+6, I+1*, I+2, I+3, I+5
, I+6, O+1*, O+2, O+3, O+5, O+6
BMCX XIT+1!
BMCY XIT+1!, REFTO+5*, REFTO+7, ADDLDOC+3*, ADDLDOC+5
C XIT+2!, PRINT+4*, DEMO+1*, DEMO+2*, DEMO+3*, DEMO+4*, DATE+1*, W+6, C+3*, C+4*
, C+5*, C+6*, I+3*, I+4*, I+5*, I+6*, N+1*, N+2*, O+3*, O+4*
, O+5*, O+6*, O+7*, L+1*, D+1*, S+1*, HEAD+1~
D XIT+2!
D0 XIT+2!
D1 XIT+2!
DA GETREF+2!, XIT+2!
DD XIT+2!
DDSFILE XIT+2!
DI XIT+2!
DIADD XIT+2!
DIC GETREF+2*!, XIT+2!
DIC("A" GETREF+2*
DIC(0 GETREF+2*
DICR XIT+2!
DIE XIT+2!
DIK XIT+2!
DINUM XIT+2!
DIPGM XIT+2!
DIQ XIT+2!
DIR XIT+2!, HEAD+2!
DIR(0 HEAD+2*
DIWF XIT+2!
DIWL XIT+2!
DIWR XIT+2!
DLAYGO XIT+2!
DO XIT+2!
DQ XIT+2!
DR XIT+2!
DTOUT XIT+2!, HEAD+2
DUZ(2 DEMO+2
F XIT+2!
G XIT+2!
I XIT+2!, W+5*
IO HEAD+2
IO(0 HEAD+2
IOF START+1, HEAD1+1, HEAD2+2
IOM W+6, L+1, D+1, S+1, HEAD2+2
IOSL REFTO+6, ADDLDOC+4, W+4
IOST PRINT+2, HEAD+2
IX PRTDISP+1~*, PRTDISP+2*, PRTDISP+3*, PRTDISP+4!
J XIT+2!
N XIT+2!, PRINT+4*, DEMO+1*, DEMO+2*, DEMO+3*, DEMO+4*, DATE+1*, W+5, C+3*, C+4*
, C+5*, C+6*, I+3*, I+4*, I+5*, I+6*, N+1*, N+2*, O+3*, O+4*
, O+5*, O+6*, O+7*, L+1*, D+1*, S+1*, HEAD+1~
P XIT+2!
T XIT+2!, PRINT+4*, DEMO+1*, DEMO+2*, DEMO+3*, DEMO+4*, DATE+1*, W+7, C+3*, C+4*
, C+5*, C+6*, I+3*, I+4*, I+5*, I+6*, N+1*, N+2*, O+3*, O+4*
, O+5*, O+6*, O+7*, L+1*, D+1*, S+1*, HEAD+1~
U PRINT+1, DEMO+2, DEMO+3, C+1, C+4, I+1, I+4, O+1, O+4
X XIT+2!, PRINT+4*, DEMO+1*, DEMO+2*, DEMO+3*, DEMO+4*, DATE+1*, W+1, W+3, W+6
, W+7, C+3*, C+4*, C+5*, C+6*, I+3*, I+4*, I+5*, I+6*, N+1*
, N+2*, O+3*, O+4*, O+5*, O+6*, O+7*, L+1*, D+1*, S+1*, HEAD+1~
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y GETREF+3, GETREF+4, XIT+2!, HEAD+1~, HEAD+2
Z XIT+2!

Marked Items

Name Field # of Occurrence
$T(DOCLIST+(3) REFTO+7
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 |  Marked Items |  All