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

Package: Remote Order Entry System

Routine: RMPFET71


Information

RMPFET71 ;DDC/KAW-CONTINUATION OF RMPFT7 [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFET71.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Remote Order Entry System 2 PASTWKDY^RMPFET0  (,PRIOR)^RMPFET61  
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 RMPFET7  RMPFET84  

Entry Points

Name Comments DBIA/ICR reference
SET ;;Set line item issue information
PRIOR
S1
SETE
SUB ;;Check for delay in hearing aid issue
SUBE
READ
AUTH ;;Check user for authorization to certify or issue
AUTHE
IU ;;Check to see if user is an audiologist
IUE
STOCK ;;Check for issue delay in stock hearing aids

External References

Name Field # of Occurrence
^%DT PRIOR+1
^DIE S1+3, S1+8, S1+10, SUB+5, SUB+8, STOCK+6
PASTWKDY^RMPFET0 SUB+4
^RMPFET61 S1+9
PRIOR^RMPFET61 PRIOR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Issue item number ",PT," ? YES// "
  • Line Location: SET+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: $C(7),!!,"*** SERIAL NUMBER REQUIRED ***"
  • Line Location: S1+4
Function Call: WRITE
  • Prompt: $C(7),!!,"*** BATTERY REQUIRED ***"
  • Line Location: S1+5
Function Call: WRITE
  • Prompt: $C(7),!!,"*** VALID ISSUE DATE REQUIRED ***"
  • Line Location: S1+6
Function Call: WRITE
  • Prompt: $C(7),!!,"*** A REASON FOR DELAY MUST BE ENTERED ***"
  • Line Location: SUB+9
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 AUTHORIZED TO ",$S(NB=11:"CERTIFY ORDERS",1:"ISSUE CUSTOM AIDS")," ***"
  • Line Location: AUTH+6
Function Call: WRITE
  • Prompt: $C(7),!!,"*** ISSUING USER MUST BE AN AUDIOLOGIST - SEE YOUR ADPAC ***"
  • Line Location: IU+4
Routine Call
  • DIE
  • Line Location:
    • S1+3
    • S1+8
    • S1+10
    • SUB+5
    • SUB+8
    • STOCK+6

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] PRIOR+2, S1+3, SUB+3, SUB+6, SUB+8, STOCK+4, STOCK+5
^RMPF(791810.1 - [#791810.1] S1+1
^RMPF(791810.6 - [#791810.6] SUB+7
^RMPF(791813 - [#791813] AUTH+4, IU+2
^XUSEC("RMPF SUPERVISOR" AUTH+5, IU+3

Label References

Name Line Occurrences
AUTHE AUTH+3, AUTH+4, AUTH+5
IUE IU+2, IU+3
PRIOR SET+3, SET+6
READ SET+4, READ+1
S1 PRIOR+3, PRIOR+4
SETE SET+5, S1+4, S1+5, S1+6
SUB S1+7, SUBE, STOCK+4
SUBE SUB+4, SUB+5, SUB+7, SUB+8

Naked Globals

Name Field # of Occurrence
^(0 SUB+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SETE!, SUBE!
>> %DT PRIOR+1*
%T SETE!, SUBE!
%Y SUBE!
AP PRIOR+3*, SETE!
>> CK SET+3
D SETE!, SUBE!, STOCK+7!
D0 SETE!, SUBE!, STOCK+7!
DA SET+6*, S1*, S1+7*, S1+10*, SETE!, SUB+5*, SUBE!, STOCK+5*, STOCK+7!
DA(1 S1*, S1+7*, SUB+5*, STOCK+5*
DC STOCK+3~
DI SETE!, SUBE!, STOCK+3~, STOCK+7!
DIC SETE!, SUBE!, STOCK+7!
DIE S1*, S1+7*, S1+10*, SETE!, SUB+5*, SUBE!, STOCK+6*, STOCK+7!
DISYS SUBE!
DIZ SUBE!
DL STOCK+3~
DP STOCK+3~
DQ SETE!, SUBE!, STOCK+3~, STOCK+7!
DR S1+1*, S1+2*, S1+8*, S1+10*, SETE!, SUB+5*, SUB+8*, SUBE!, STOCK+6*, STOCK+7!
DTIME READ+1
DUZ AUTH+4, AUTH+5
LA SETE!
>> NB AUTH+3, AUTH+6
>> PT SET+4, SET+6, S1+9
RD SETE!, SUB+3*, SUB+5, SUB+9!, SUBE!
RMPFLA PRIOR+3*, PRIOR+4*, PRIOR+5*, S1+8, SETE!
>> RMPFMD( SET+6, S1+9!
RMPFOUT SET+5, READ!, READ+2*, AUTH+6*
RMPFQUT SET+5, READ!, READ+3*
>> RMPFSTAN AUTH+4, IU+2
RMPFSTR0 S1+9!
RMPFSTR2 S1+9!
RMPFSTR3 S1+9!
>> RMPFSYS AUTH+3, IU+1, IU+2, IU+3
>> RMPFX PRIOR+2, S1, S1+3, S1+7, S1+10, SUB+3, SUB+5, SUB+6, SUB+8, STOCK+4
, STOCK+5, STOCK+6
RMPFY SET+6*, SET+7!, PRIOR+2, S1, S1+3, S1+7, SETE!, SUB+5, SUB+6, SUB+8
, STOCK+4, STOCK+5
S0 PRIOR+2*, PRIOR+3, PRIOR+4, S1+3*, S1+4, S1+5, S1+6, SETE!, SUB+4, STOCK+4*
, STOCK+7!
TD PRIOR+1*, S1+8, SETE!
U PRIOR+3, PRIOR+4, S1+4, S1+5, S1+6, SUB+3, SUB+4, SUB+6, SUB+7, SUB+8
, READ+1, AUTH+3, IU+1, IU+2, IU+3, STOCK+5
X PRIOR+1*, SETE!, SUB+4*, SUB+7*, SUBE!, AUTH+3*, AUTH+4, AUTHE!, IU+4!, STOCK+5*
, STOCK+6, STOCK+7!
Y SET+6, PRIOR+1, SETE!, SUB+5, SUB+6*, SUB+7, SUB+8, SUBE!, READ+1*, READ+2*
, READ+3*, IU+2, IU+3, IU+4!
Z SETE!, SUB+4*, SUBE!
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