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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BMCFPRN

Package: Referred Care Information System

Routine: BMCFPRN


Information

BMCFPRN ; IHS/OIT/FCJ - PRINT REFERRAL FORMS ; [ 09/27/2006 1:33 PM ]

Source Information

Source file <BMCFPRN.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Referred Care Information System 5 WP^BMCFDR  PRINT^BMCFDRP  PRINT^BMCFDRS  OTHPAY^BMCFPRN1  $$AVDOS^BMCRLU  
IHS Patient 1 $$HRN^AUPNPAT  
IHS VA Utilities 1 ($$VAL,$$VALI)^XBDIQ1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Referred Care Information System 1 BMCFPRN1  

Entry Points

Name Comments DBIA/ICR reference
DEMO ;Demographic Data
HEAD
GPRINT(BMCREF) ;EP print referral form - GUI
PRINT ;EP print referral form - Roll and Scroll Front End
WP ;
DATE ;
LINE ;CHS Supervisor Signature (if Type=CHS)
PRT ;print referral form
CONSULT ;PRINT CONSULT LETTER
ADDMED ;
C ;
D ;
I ;
L ;
O ;
N ;
REFTO ;
S ;
TEXT ;
W ;Entry Point
REFFROM ;
WPTXT ;
; get site-specific text (if any)
PAYOR ;OTHER PAYOR INFORMATION
HEAD2 ;
HEAD1 ;
PERTMED ;
ROUT ;Print Routing slip
PURPOSE ;

External References

Name Field # of Occurrence
$$HRN^AUPNPAT DEMO+4
WP^BMCFDR WP+1
PRINT^BMCFDRP CONSULT+1
PRINT^BMCFDRS ROUT+1
OTHPAY^BMCFPRN1 PAYOR+1
$$AVDOS^BMCRLU DATE+1
^DIR HEAD+2
$$VAL^XBDIQ1 PRT+9, DEMO+3, DEMO+6, DEMO+7, DEMO+8, DEMO+9, DEMO+10, DEMO+11, REFTO+6, DATE+1
, DATE+3, DATE+5, DATE+6, DATE+8, PURPOSE+1, ADDMED+1, REFFROM+6, REFFROM+11, REFFROM+13, REFFROM+14
, REFFROM+16, REFFROM+18, REFFROM+19, REFFROM+20, REFFROM+21, REFFROM+22, REFFROM+24, REFFROM+26, REFFROM+27, REFFROM+28
, REFFROM+30, REFFROM+33, REFFROM+34, C+3, C+4, C+5, C+6, C+10, C+11, C+13
, C+15, C+16, C+17, I+3, I+4, I+5, I+6, N+2, O+3, O+4
, O+5, O+6, O+7
$$VALI^XBDIQ1 REFTO+4

Interaction Calls

Name Line Occurrences
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: DEMO+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+7
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+8
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+9
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+10
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DEMO+11
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFTO+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: DATE+8
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: PURPOSE+3
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: PURPOSE+4
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: PURPOSE+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: ADDMED+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+1
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+6
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+10
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+11
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+15
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+20
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+23
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+28
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+30
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+32
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: REFFROM+33
Function Call: WRITE
  • Prompt: !
  • Line Location: TEXT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TEXT+6
Function Call: WRITE
  • Prompt: !!!!!
  • Line Location: LINE+2
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LINE+5
Function Call: WRITE
  • Prompt: Q:BMCQUIT
  • Line Location: LINE+6
Function Call: WRITE
  • Prompt: #
  • Line Location: ROUT+1
Function Call: WRITE
  • Prompt: #
  • Line Location: CONSULT+1
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: !
  • Line Location: C+20
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: WP+7
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: WP+12
Function Call: WRITE
  • Prompt: !,?(IOM-20),"Page ",BMCPG
  • Line Location: WP+12
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
  • DIR
  • Line Location:
    • HEAD+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTVNDR - [#9999999.11] C+8, C+9, C+14
^BMCCOM - [#90001.03] PERTMED+3
^BMCCOM("AD" PERTMED+2
^BMCPARM - [#90001.31] DEMO+5, DEMO+6, WPTXT+3, WPTXT+4, WPTXT+5, WPTXT+6
^BMCREF - [#90001] PRT+4, DATE+3, DATE+4, DATE+6, DATE+8, TEXT+3
^BMCTFORM - [#90001.33] PRT+7, PRT+8
^BMCTFORM("B" GPRINT+8
^VA(200 - [#200] REFFROM+8, REFFROM+32

Label References

Name Line Occurrences
@( PRT+5, REFTO+5
HEAD PERTMED+7, TEXT+9, W+4
L REFTO+1, DATE+9
PAYOR REFFROM+5
PRT PRINT+9, GPRINT+14
ROUT LINE+1, LINE+3
S PRT+10, TEXT+1
W PRT+7, PRT+9, DEMO+2, DEMO+3, DEMO+4, DEMO+5, DEMO+6, DEMO+7, DEMO+8, DEMO+9
, DEMO+10, DEMO+11, REFTO+6, DATE+1, DATE+3, DATE+5, DATE+6, DATE+8, PURPOSE+3, PURPOSE+4
, PURPOSE+5, ADDMED+1, REFFROM+1, REFFROM+6, REFFROM+8, REFFROM+10, REFFROM+11, REFFROM+15, REFFROM+20, REFFROM+23
, REFFROM+28, REFFROM+30, REFFROM+32, REFFROM+33, REFFROM+34, LINE+4, LINE+6, C+3, C+4, C+5
, C+6, C+12, C+19, 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
WP PERTMED+5
WPTXT TEXT+4, TEXT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% W+2~, W+3*, W+7*
BMCCHSAS PRT+1~, TEXT+3*, TEXT+4, WPTXT+3, WPTXT+4, WPTXT+5
BMCCMT PRT+1~, PERTMED+1*, PERTMED+2*, PERTMED+3, PERTMED+4
BMCDA PRT+1~, PERTMED+4*, TEXT+4*, TEXT+5*, WPTXT+3*, WPTXT+4*, WPTXT+5*, WPTXT+6*
BMCDFN PRT+1~, PRT+4*
BMCFILE PRT+1~, PERTMED+4*, TEXT+4*, TEXT+5*, WPTXT+3*, WPTXT+4*, WPTXT+5*, WPTXT+6*
BMCFTYP PRT+1~, PRT+8*, REFFROM+30, REFFROM+32, REFFROM+33, LINE+3
BMCFTYPE GPRINT+2~, GPRINT+8*, PRT+7, PRT+8, TEXT+4, TEXT+5
BMCIOM PERTMED+4*, PERTMED+5!
BMCNODE PRT+1~, PERTMED+4*, TEXT+4*, TEXT+5*, WPTXT+3*, WPTXT+4*, WPTXT+5*, WPTXT+6*
BMCPCON PRT+1~, CONSULT+1
BMCPG PRT+1~, PRT+4*, HEAD2+1*, HEAD2+2*
BMCPROUT GPRINT+2~, GPRINT+11*, ROUT+1
BMCQUIT PRT+1~, PRT+6*, DEMO+1, DEMO+2, DEMO+3, DEMO+4, DEMO+5, DEMO+6, DEMO+7, DEMO+8
, DEMO+9, DEMO+10, DEMO+11, REFTO+5, REFTO+6, DATE+1, DATE+3, DATE+5, DATE+6, DATE+8
, PURPOSE+3, PURPOSE+4, PURPOSE+5, PERTMED+6, PERTMED+7, ADDMED+1, REFFROM+1, REFFROM+5, REFFROM+6, REFFROM+10
, REFFROM+11, REFFROM+15, REFFROM+20, REFFROM+23, REFFROM+28, REFFROM+30, REFFROM+32, REFFROM+33, REFFROM+35, PAYOR+2
, TEXT+8, TEXT+9, LINE+4, LINE+6, W+4, C+3, C+4, C+5, C+6, C+8
, C+13, 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 PRT+1~, PRT+4*, DEMO+4, DEMO+6, DEMO+7, DEMO+8, DEMO+9, DEMO+10, DEMO+11, DATE+1
, REFFROM+2, REFFROM+3, REFFROM+8, REFFROM+32, REFFROM+34, TEXT+4, TEXT+5, TEXT+6, LINE+1, C+1
, C+4, I+1, I+4, O+1, O+4, WPTXT+2, WPTXT+6
BMCREF GPRINT~, PRT+4, PRT+9, DEMO+3, REFTO+4, REFTO+6, DATE+1, DATE+3, DATE+4, DATE+5
, DATE+6, DATE+8, PURPOSE+1, PERTMED+2, ADDMED+1, REFFROM+6, REFFROM+11, REFFROM+30, REFFROM+33, TEXT+3
, C+3, C+4, I+3, I+4, N+2, O+3, O+4, O+7
BMCV PRT+1~, REFFROM+2*, REFFROM+13, REFFROM+14, REFFROM+15, REFFROM+16, REFFROM+17, REFFROM+18, REFFROM+19, REFFROM+20
, REFFROM+21, REFFROM+22, REFFROM+23, REFFROM+24, REFFROM+25, REFFROM+26, REFFROM+27, REFFROM+28, C+1*, C+2
, C+3, C+5, C+6, C+8, C+9, C+10, C+11, C+13, C+14, C+15
, C+17, I+1*, I+2, I+3, I+5, I+6, O+1*, O+2, O+3, O+5
, O+6
BMCVIEN PRT+1~, C+9*, C+11, C+14*, C+16
BMCWP TEXT+2!
BMCWP( PERTMED+6, PERTMED+8, TEXT+8, TEXT+10
BMCWP(1 TEXT+6*
BMCX PRT+1~, PURPOSE+3*, PURPOSE+4
BMCY PRT+1~, TEXT+8*, TEXT+10
C PRT+7*, PRT+9*, DEMO+2*, DEMO+3*, DEMO+4*, DEMO+5*, DEMO+6*, DEMO+7*, DEMO+8*, DEMO+9*
, DEMO+10*, DEMO+11*, REFTO+6*, DATE+1*, DATE+3*, DATE+5*, DATE+6*, DATE+8*, PURPOSE+3*, PURPOSE+4*
, PURPOSE+5*, ADDMED+1*, REFFROM+1*, REFFROM+6*, REFFROM+8*, REFFROM+10*, REFFROM+11*, REFFROM+15*, REFFROM+20*, REFFROM+23*
, REFFROM+28*, REFFROM+30*, REFFROM+32*, REFFROM+33*, REFFROM+34*, LINE+4*, LINE+6*, W+6, C+3*, C+4*
, C+5*, C+6*, C+12*, C+19*, 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~
DIR HEAD+2!
DIR(0 HEAD+2*
DTOUT PRT+2~, HEAD+2
DUZ(2 DEMO+4, DEMO+5, DEMO+6, REFFROM+11, WPTXT+3, WPTXT+4, WPTXT+5, WPTXT+6
I PRT+2~, REFFROM+8*, REFFROM+32*, W+5*
IO HEAD+2
IO(0 HEAD+2
IOF HEAD1+1, HEAD2+2
IOM PURPOSE+2, PURPOSE+3, PURPOSE+4, REFFROM+1, W+6, L+1, D+1, S+1, HEAD2+2
IOSL PRINT+6, PERTMED+7, TEXT+9, W+4
IOST PRT+5, HEAD+2
N PRT+7*, PRT+9*, DEMO+2*, DEMO+3*, DEMO+4*, DEMO+5*, DEMO+6*, DEMO+7*, DEMO+8*, DEMO+9*
, DEMO+10*, DEMO+11*, REFTO+6*, DATE+1*, DATE+3*, DATE+5*, DATE+6*, DATE+8*, PURPOSE+3*, PURPOSE+4*
, PURPOSE+5*, ADDMED+1*, REFFROM+1*, REFFROM+6*, REFFROM+8*, REFFROM+10*, REFFROM+11*, REFFROM+15*, REFFROM+20*, REFFROM+23*
, REFFROM+28*, REFFROM+30*, REFFROM+32*, REFFROM+33*, REFFROM+34*, LINE+4*, LINE+6*, W+5, C+3*, C+4*
, C+5*, C+6*, C+12*, C+19*, 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~
PGL PRINT+2~, PRINT+6*, GPRINT+2~, GPRINT+5*, PERTMED+7, TEXT+9, W+4
PRTGUI PRINT+2~, PRINT+3*, GPRINT+2~, GPRINT+3*, HEAD, HEAD+2, HEAD1+1, HEAD2+2
REFTO PRT+1~, REFTO+4*, REFTO+5
T PRT+9*, DEMO+2*, DEMO+3*, DEMO+4*, DEMO+5*, DEMO+6*, DEMO+7*, DEMO+8*, DEMO+9*, DEMO+10*
, DEMO+11*, REFTO+6*, DATE+1*, DATE+3*, DATE+5*, DATE+6*, DATE+8*, PURPOSE+3*, PURPOSE+4*, PURPOSE+5*
, ADDMED+1*, REFFROM+1*, REFFROM+6*, REFFROM+8*, REFFROM+10*, REFFROM+11*, REFFROM+15*, REFFROM+20*, REFFROM+23*, REFFROM+28*
, REFFROM+30*, REFFROM+32*, REFFROM+33*, REFFROM+34*, LINE+4*, LINE+6*, W+7, C+3*, C+4*, C+5*
, C+6*, C+12*, C+19*, 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 PRT+4, PRT+7, PRT+8, DEMO+4, DEMO+5, DEMO+6, DEMO+7, DEMO+8, DEMO+9, DEMO+10
, DEMO+11, DATE+1, DATE+3, DATE+4, DATE+6, DATE+8, PERTMED+3, REFFROM+2, REFFROM+3, REFFROM+8
, REFFROM+32, REFFROM+34, TEXT+3, TEXT+4, TEXT+5, TEXT+6, LINE+1, C+1, C+4, C+9
, C+14, I+1, I+4, O+1, O+4, WPTXT+2, WPTXT+6
X PRT+2~, PRT+7*, PRT+9*, DEMO+2*, DEMO+3*, DEMO+4*, DEMO+5*, DEMO+6*, DEMO+7*, DEMO+8*
, DEMO+9*, DEMO+10*, DEMO+11*, REFTO+6*, DATE+1*, DATE+3*, DATE+5*, DATE+6*, DATE+8*, PURPOSE+1*
, PURPOSE+2, PURPOSE+3*, PURPOSE+4*, ADDMED+1*, REFFROM+1*, REFFROM+6*, REFFROM+8*, REFFROM+10*, REFFROM+11*, REFFROM+14*
, REFFROM+15, REFFROM+16*, REFFROM+17, REFFROM+18*, REFFROM+19*, REFFROM+20*, REFFROM+22*, REFFROM+23, REFFROM+24*, REFFROM+25
, REFFROM+26*, REFFROM+27*, REFFROM+28*, REFFROM+30*, REFFROM+32*, REFFROM+33*, REFFROM+34*, LINE+4*, LINE+6*, W+1
, W+3, W+6, W+7, C+3*, C+4*, C+5*, C+6*, C+10*, C+11*, C+15*
, C+16*, C+17*, C+18*, 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~
Y PERTMED+6*, PERTMED+8, REFFROM+3*, REFFROM+5, HEAD+1~, HEAD+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All