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

Package: Remote Order Entry System

Routine: RMPFETL


Information

RMPFETL ;DDC/KAW-ENTER/EDIT VETERAN ELIGIBILITY [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFETL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Remote Order Entry System 2 ^RMPFETL1  PAT^RMPFUTL  
VA FileMan 2 ^DIC  ^DIE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Remote Order Entry System 1 RMPFET1  

Entry Points

Name Comments DBIA/ICR reference
ADD ;; input: DFN,RMPFTE,RMPFX
ADD0
ADD1
ADD2
EDIT ;; input: RMPFX,DFN,RMPFTE
EDIT1
EDIT2
END
SUB
SUB1
E1
HEAD
READ
WARN

External References

Name Field # of Occurrence
^DIC E1+1
^DIE EDIT2+4
^RMPFETL1 ADD+3
PAT^RMPFUTL HEAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** ROES ELIGIBILITY CANNOT BE DETERMINED FROM THE DATABASE FOR THIS PATIENT ***"
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !!,"Eligibility determined from the DHCP database: ",$P(RMPFTE,U,1)
  • Line Location: ADD1+1
Function Call: WRITE
  • Prompt: !!,"Eligibility for ROES orders cannot be determined from the DHCP database."
  • Line Location: ADD2+1
Function Call: WRITE
  • Prompt: !!,"Eligibility associated with this order: ",$P(RMPFTE,U,1)
  • Line Location: EDIT1+1
Function Call: WRITE
  • Prompt: !?13,"Eligibility determined by: ",X
  • Line Location: EDIT2+0
Function Call: WRITE
  • Prompt: !!,"Do you wish to ",AC," the eligibility? NO// "
  • Line Location: SUB+0
Function Call: WRITE
  • Prompt: !!,"Enter a <Y> if you wish to select an eligibility",!?5,"an <N> or <RETURN> if you wish to continue."
  • Line Location: SUB1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: @IOF,!?29,"ENTER/EDIT ELIGIBILITY"
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!,"Patient: ",RMPFNAM,?40,"SSN: ",RMPFSSN,?63,"DOB: ",RMPFDOB,!
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEAD+3
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Function Call: WRITE
  • Prompt: !!?11,"*** DO NOT EDIT UNLESS YOU ARE SURE YOU WANT TO SEND ***",!?11,"*** ANOTHER ELIGIBILITY TO THE DDC ***"
  • Line Location: WARN+0
Routine Call
  • DIC
  • Line Location:
    • E1+1
Routine Call
  • DIE
  • Line Location:
    • EDIT2+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPF(791810 - [#791810] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPF(791810 - [#791810] EDIT+2
^RMPF(791810.4 - [#791810.4] EDIT1
^VA(200 - [#200] EDIT1+3
^XUSEC("RMPF SUPERVISOR" ADD0+1, EDIT+4
^XUSEC("RMPF SYSTEM MANAGER" ADD0+1, EDIT+4

Label References

Name Line Occurrences
ADD0 ADD+2
ADD1 ADD0
ADD2 ADD1
EDIT1 EDIT+3, EDIT+4
EDIT2 EDIT1+2
END ADD+4, ADD0+1, ADD1+2, ADD2+2, EDIT+3, EDIT+4, EDIT2+2
HEAD ADD1, ADD2, EDIT1+1
READ SUB+1, READ+1
SUB ADD1+2, ADD2+2, EDIT2+2, SUB1
SUB1 SUB1+1
WARN ADD1+2, EDIT2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END+1!
AC ADD1*, ADD2*, EDIT1*, END!, END+1!, SUB
D0 END!
DA EDIT2+4*, END!
DI END!
DIC END!, E1*
DIC("B" E1+1*
DIC(0 E1*
DIE EDIT2+4*, END!
DISYS END+1!
DQ END!
DR EDIT2+3*, END!
DT EDIT2+3
DTIME READ+1
DUZ ADD0+1, EDIT+4, EDIT2+3
I END!, HEAD+3*
IOF HEAD+1
P ADD+2*, ADD0, EDIT+3*, END+1!
RMPFDOB END!, HEAD+2
RMPFDOD END!
RMPFNAM END!, HEAD+2
RMPFOUT EDIT2+2, SUB+1, READ!, READ+2*
RMPFQUT SUB1, SUB1+1*, READ!, READ+3*
RMPFSSN END!, HEAD+2
>> RMPFSYS ADD+2, EDIT+3
>> RMPFTE ADD+3, ADD0+1, ADD1, ADD1+1, EDIT1*, EDIT1+1, EDIT2+2, EDIT2+3, E1+1, E1+2*
>> RMPFX EDIT+2, EDIT2+4
S2 EDIT+2*, EDIT1+3, END!
SV EDIT1*, EDIT2+2, END!
U ADD+2, ADD1+1, EDIT+2, EDIT+3, EDIT1, EDIT1+1, EDIT1+3, EDIT2+3, E1+1, E1+2
, READ+1
X EDIT1+2*, EDIT1+3*, EDIT2, EDIT2+1, END+1!
XX EDIT+2*, EDIT1, END+1!
Y END+1!, SUB1+1*, SUB1+2, E1+1, E1+2, READ+1*, READ+2*, READ+3*
YY EDIT+2*, EDIT+3, EDIT1+2, END+1!
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