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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RMPFEA

Package: Remote Order Entry System

Routine: RMPFEA


Information

RMPFEA ;DDC/KAW-APPROVE/DISAPPROVE ORDERS; [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFEA.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Remote Order Entry System 6 ^RMPFDS1  ^RMPFDT1  ^RMPFDT7  (MULTI,SEL)^RMPFEA1  SET^RMPFEA2  (,MENU,PAT)^RMPFUTL  
VA FileMan 2 ^%DT  ^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: 2

Package Total Caller Graph
Remote Order Entry System 2 RMPFEA  RMPFEA1  

Entry Points

Name Comments DBIA/ICR reference
RMPFSET
WRITE
START
ST1
APP
APP1
END
DIS ;; input: RMPFX
DIS1
APRV
APRVE
READ
MSG
CONT

External References

Name Field # of Occurrence
^%DT APP1+4, DIS1+2
^DIE DIS1+3, DIS1+5
^RMPFDS1 START
^RMPFDT1 ST1
^RMPFDT7 APP1+2
MULTI^RMPFEA1 START+2
SEL^RMPFEA1 START+1
SET^RMPFEA2 APP1+4
^RMPFUTL RMPFSET+1
MENU^RMPFUTL RMPFSET
PAT^RMPFUTL START+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"*** A MENU SELECTION MUST BE MADE ***"
  • Line Location: RMPFSET+0
Function Call: WRITE
  • Prompt: !!,"APPROVAL",?13,"will place an order in the open transmission batch",!?13,"with the status APPROVED"
  • Line Location: WRITE+0
Function Call: WRITE
  • Prompt: !!,"DISAPPROVAL",?13,"of an order will terminate that order with a status",!?13,"of DISAPPROVED."
  • Line Location: WRITE+1
Function Call: WRITE
  • Prompt: !!,"Enter <A>pprove, <D>isapprove"
  • Line Location: APP+0
Function Call: WRITE
  • Prompt: ", <H>istory"
  • Line Location: APP+1
Function Call: WRITE
  • Prompt: " or <^> to exit: A// "
  • Line Location: APP+2
Function Call: WRITE
  • Prompt: !!,"Enter an <A> if you wish to approve this order,",!?7,"a <D> if you wish to disapprove this order"
  • Line Location: APP1+0
Function Call: WRITE
  • Prompt: !?6,"an <H> to view the history of the order"
  • Condition for execution: FX["H"
  • Line Location: APP1+0
Function Call: WRITE
  • Prompt: !?6,"an <^> to exit."
  • Line Location: APP1+0
Function Call: WRITE
  • Prompt: !!,"Reason for Disapproval: "
  • Line Location: DIS+2
Function Call: WRITE
  • Prompt: !!,"Enter the reason for disapproving this order in 3 to 30 characters."
  • Line Location: DIS1+0
Function Call: WRITE
  • Prompt: $C(7),!!,"*** APPROVAL PROCESS OCCURS AUTOMATICALLY WHEN ORDER IS PLACED ***"
  • Line Location: APRV+1
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: $C(7),!!,"*** YOU HAVE NOT BEEN DESIGNATED AS ",$S($P(RMPFSYS,U,7)="A":"AN AUDIOLOGIST OR SUPERVISOR",1:"A SUPERVISOR")," ***"
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+0
Function Call: WRITE
  • Prompt: !!,"Enter <RETURN> to continue."
  • Line Location: CONT+1
Routine Call
  • DIE
  • Line Location:
    • DIS1+3
    • DIS1+5

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] START+4, START+5, ST1DIS1+5
^RMPF(791810.1 - [#791810.1] START+6, START+7, ST1+1
^RMPF(791813 - [#791813] APRV+4
^XUSEC("RMPF SUPERVISOR" APRV+3

Label References

Name Line Occurrences
APP APP1
APP1 APP1+1
APRV RMPFSET+2
APRVE APRV+1, APRV+2, APRV+3, APRV+4
CONT WRITE+2, APRV+1, APRV+5
DIS APP1+3, DIS1DIS1+1
END RMPFSET+2, WRITE+2, START+1, START+2, START+3, START+5, START+6, APP+2, APP1+2, APP1+3
DIS+2
MSG START+5, START+6, APRV+5
READ APP+2, DIS+2, READ+1, CONT+1
RMPFSET WRITE+2
ST1 APP1+2
START START+2, APP1+3, APP1+4

Naked Globals

Name Field # of Occurrence
^(0 ST1+1, APRV+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END+2!
%DT APP1+4*, END+2!, DIS1+2*
%Y END+2!
AP RMPFSET+2, END+2!, APRV*, APRV+2*, APRV+3*, APRV+4*
CM END+1!
D END+2!
D0 END+2!
DA END+2!, DIS1+3*, DIS1+5*, DIS1+6!
DA(1 DIS1+4*
DFN START+4*, END!
DI END+2!
DIC END+2!
DIE END+2!, DIS1+3*, DIS1+4*, DIS1+6!
DISYS END+1!
DQ END+2!
DR END+2!, DIS1+3*, DIS1+4*, DIS1+6!
DT DIS1+3
DTIME READ+1
DUZ DIS1+3, APRV+3, APRV+4
FX APP*, APP+1*, APP1APP1+1, END+1!
FY END+2!
I END+2!, CONT*
IOF RMPFSET+2
J END+1!
L END+1!
PJ END+2!
PR END+2!
RMPFCX END+2!
>> RMPFDAT RMPFSET+1
RMPFDOB END!
RMPFDOD END+1!
RMPFDR DIS1+2*, DIS1+3, DIS1+6!
>> RMPFHAT ST1*, ST1+1*, APP+1
RMPFM START+2, END!
>> RMPFMENU RMPFSETAPRV+2
RMPFNAM END!
RMPFO END+1!
RMPFORD START*, END!
RMPFOUT WRITE+2, START+1, START+2, APP+2, APP1+2, APP1+3, END+1!, DIS+2, READ!, READ+2*
RMPFP START!, END!
RMPFP(2 START*
RMPFQUT WRITE+2, APP1APP1+1*, END+1!, DIS1DIS1+1*, READ!, READ+3*
RMPFS END!
RMPFSSN END!
>> RMPFSTAN RMPFSET+1, APRV+4
>> RMPFSYS RMPFSET+1, APRVMSG
RMPFTP START*, END!
RMPFTYP START+5*, START+6, START+7, END+1!
>> RMPFX START+3, START+4, START+5, ST1DIS1+3, DIS1+4, DIS1+5
S0 START+5*, END!
SP END+2!
SS END+1!
T END+1!
TD DIS1+2*, DIS1+3, DIS1+4, DIS1+6!
TP START+7*, END+1!
U START+4, START+5, START+7, ST1ST1+1, APRVAPRV+4, READ+1, MSG
X ST1*, ST1+1, APP1+4*, END+2!, DIS1+2*, APRV*, APRV+1, APRV+2, APRV+4
Y WRITE+2, APP1+1*, APP1+2, APP1+3, END+1!, DIS1+1, DIS1+2, DIS1+6!, READ+1*, READ+2*
READ+3*
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 |  Naked Globals |  Local Variables  | All