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

Package: Remote Order Entry System

Routine: RMPFEU


Information

RMPFEU ;DDC/KAW-AUDIOLOGIST APPROVAL PRIVILEGES; [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFEU.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIE  
Remote Order Entry System 1 (,MENU)^RMPFUTL  

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 RMPFEU  

Entry Points

Name Comments DBIA/ICR reference
RMPFSET
A1
SUP
SUP1
A2
A21
END
READ

External References

Name Field # of Occurrence
^DIC A1+1
^DIE SUP1+3
^RMPFUTL RMPFSET+1
MENU^RMPFUTL RMPFSET

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: @IOF,!!,"AUDIOLOGIST APPROVAL PRIVILEGES"
  • Line Location: RMPFSET+2
Function Call: WRITE
  • Prompt: !
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !!,RMPFURP," already has Audiologist approval privileges."
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: !!,"Do you wish to delete the privileges? NO// "
  • Line Location: SUP+0
Function Call: WRITE
  • Prompt: !!,"If a <Y>es is entered, Audiologist approval privileges will be deleted.",!,"If <N>o or <RETURN> is entered, privileges will be retained."
  • Line Location: SUP1+0
Function Call: WRITE
  • Prompt: !!,"*** AUDIOLOGIST APPROVAL PRIVILEGES DELETED ***"
  • Line Location: SUP1+4
Function Call: WRITE
  • Prompt: !!,"Add Audiologist approval privileges for ",RMPFURP,"? NO// "
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !!,"Enter <Y> to give this user Audiologist approval privileges",!?6,"<N> or <RETURN> to continue."
  • Line Location: A21+0
Function Call: WRITE
  • Prompt: !!,"*** AUDIOLOGIST APPROVAL PRIVILEGES ADDED ***"
  • Line Location: A21+6
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Routine Call
  • DIC
  • Line Location:
    • A1+1
Routine Call
  • DIE
  • Line Location:
    • SUP1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPF(791813 - [#791813] A1+2, A21+3*, A21+4*, A21+5*

Label References

Name Line Occurrences
A1 SUP1+2, SUP1+4, A21+2, A21+6
A2 A1+2, A21
A21 A21+1
END A1+1, SUP+1, A2+1
READ SUP+1, A2+1, READ+1
SUP SUP1
SUP1 SUP1+1

Naked Globals

Name Field # of Occurrence
^(0 A1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 END+1!
DA SUP1+3*, END+1!
DA(1 SUP1+3*
DI END+1!
DIC A1*, END!
DIC("A" A1*
DIC(0 A1*
DIE SUP1+2*, END+1!
DISYS END+1!
DLAYGO END!
DQ END+1!
DR SUP1+3*, END+1!
DTIME READ+1
IOF RMPFSET+2
RMPFAUD END!
>> RMPFDAT RMPFSET+1
>> RMPFMENU RMPFSET
RMPFOUT SUP+1, A2+1, END!, READ!, READ+2*
RMPFQUT SUP1, SUP1+1*, A21, A21+1*, END!, READ!, READ+3*
>> RMPFSTAN RMPFSET+1, A1+2, SUP1+2, SUP1+3, A21+3, A21+4, A21+5
>> RMPFSYS RMPFSET+1
RMPFUR A1+1*, A1+2, SUP1+3, A21+4, A21+5, END!
RMPFURP A1+1*, A1+3, A2, END!
U A1+1, A1+2, A21+5, READ+1
X END+1!
Y A1+1, SUP1+1*, SUP1+2, A21+1*, A21+2, END+1!, READ+1*, READ+2*, READ+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All