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

Package: Remote Order Entry System

Routine: RMPFET9


Information

RMPFET9 ;DDC/KAW-DUPLICATE AN ORDER [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFET9.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 ^%DT  FILE^DICN  ^DIE  
Remote Order Entry System 2 (ARRAY,ARRAY2)^RMPFDT2  COMPON^RMPFET7  

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 RMPFET6  

Entry Points

Name Comments DBIA/ICR reference
TWO
TWO1
COM
COM1
COM2
COM3
EXIT
END
READ

External References

Name Field # of Occurrence
^%DT TWO1+10
FILE^DICN TWO1+13, COM2+6
^DIE TWO1+14
ARRAY^RMPFDT2 RMPFET9+5
ARRAY2^RMPFDT2 TWO1+16
COMPON^RMPFET7 COM3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Will the second model be the same as the first? NO// "
  • Line Location: TWO+0
Function Call: WRITE
  • Prompt: !!,"Enter <Y> to order a second model that is the same as the first,",!,"<N> or <RETURN> to continue."
  • Line Location: TWO1+0
Function Call: WRITE
  • Prompt: $C(7),!!,"*** BAD ORDER INFORMATION ***"
  • Line Location: TWO1+3
Function Call: WRITE
  • Prompt: !!,"Adding second model ..."
  • Line Location: TWO1+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: TWO1+10
Function Call: WRITE
  • Prompt: $C(7),!!,"*** MODEL NOT ADDED ***"
  • Line Location: TWO1+13
Function Call: WRITE
  • Prompt: "."
  • Line Location: TWO1+14
Function Call: WRITE
  • Prompt: !!,"*** MODEL ADDED ***"
  • Line Location: TWO1+15
Function Call: WRITE
  • Prompt: !!,"The following components were ordered with the first model: ",CM
  • Line Location: COM+0
Function Call: WRITE
  • Prompt: !!,"Do you wish to order the same components with the second model? NO// "
  • Line Location: COM+1
Function Call: WRITE
  • Prompt: !!,"Enter <Y> to order the same components for the second model",!,"<N> or <RETURN> to continue."
  • Line Location: COM1+0
Function Call: WRITE
  • Prompt: !!,"Adding component(s) ..."
  • Line Location: COM1+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: COM2+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: COM2+5
Function Call: WRITE
  • Prompt: $C(7),!!,"*** COMPONENT NOT ADDED ***"
  • Line Location: COM2+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: COM2+7
Function Call: WRITE
  • Prompt: !!,"*** COMPONENT"
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: "S"
  • Condition for execution: CT>1
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: " ADDED ***"
  • Line Location: EXIT+0
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Routine Call
  • DIE
  • Line Location:
    • TWO1+14

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] RMPFET9+4, TWO1+3, TWO1+5, TWO1+8*, COM2, COM2+2*, COM2+7*
^RMPF(791811.2 - [#791811.2] TWO1+16

Label References

Name Line Occurrences
COM COM1
COM1 COM1+1
COM2 COM2+8
COM3 COM1+1, COM1+2
END RMPFET9+7, TWO+1, TWO1+1, TWO1+2, TWO1+3, TWO1+13, TWO1+17, COM+2, COM2+6, COM3
EXIT COM2
READ TWO+1, COM+2, READ+1
TWO TWO1
TWO1 TWO1+1

Naked Globals

Name Field # of Occurrence
^( COM2
^(0 TWO1+16
^(11 RMPFET9+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END!
%DT TWO1+10*, END!
%Y END+2!
C TWO1+16*, END!
CM TWO1+16*, COM, END!
CT COM1+2*, COM2+7*, EXIT, END!
CX RMPFET9+6*, RMPFET9+7, TWO1+16*, TWO1+17, END!
D0 END!
DA TWO1+14*, END!
DA(1 TWO1+9*, COM2+4*
DA(2 COM2+4*
DD TWO1+13!, COM2+6!
DI END!
DIC TWO1+9*, TWO1+14, COM2+3*, END!
DIC("DR" TWO1+11*, TWO1+12*, COM2+5*
DIC(0 TWO1+9*, COM2+4*
DIE TWO1+14*, END!
DLAYGO TWO1+9*, COM2+4*, END!
DO TWO1+13!, COM2+6!
DQ END!
DR TWO1+14*, END!
DTIME READ+1
DUZ COM2+5
I RMPFET9+6*, TWO1+16*, END!, END+2!
M END+2!
RMPFBAT TWO1+7*, TWO1+12, END+2!
RMPFC END!
RMPFC( TWO1+16
RMPFCOM COM2+1*, COM2+4, END+1!
RMPFCS TWO1+6*, TWO1+11, END+1!
RMPFCX COM2+1*, END+1!
>> RMPFHAT TWO1+12
RMPFID TWO1+7*, TWO1+12, END+1!
RMPFIT TWO1+6*, TWO1+11, END+1!
RMPFLR TWO1+6*, TWO1+11, END+1!
RMPFO END+1!, END+2!
RMPFO( RMPFET9+6
RMPFO(0 TWO1+2
RMPFOUT TWO+1, COM+2, END+2!, READ!, READ+2*
RMPFQUT TWO1, TWO1+1*, COM1, COM1+1*, END+2!, READ!, READ+3*
RMPFRE END+2!
RMPFTF RMPFET9+4*, END+1!, END+2!
>> RMPFX RMPFET9+4, TWO1+3, TWO1+5, TWO1+8, TWO1+9, COM2, COM2+2, COM2+3, COM2+4, COM2+7
RMPFY RMPFET9+5~, TWO1+2*, TWO1+3, TWO1+5, COM2, COM3*
RMPFY1 RMPFET9+7!, TWO1+14*, COM2+2, COM2+3, COM2+4, COM2+7, COM3
RMPFZ COM1+2*, COM2*, END+1!
S0 TWO1+5*, TWO1+6, TWO1+7, COM2*, COM2+1, END!
TD TWO1+10*, TWO1+14, COM2+5, END!
U RMPFET9+4, TWO1+6, TWO1+7, TWO1+16, COM2+1, COM2+7, READ+1
X RMPFET9+6*, TWO1+10*, TWO1+11*, TWO1+16*, COM2+4*, END!, END+2!
Y TWO1+1*, TWO1+2, TWO1+10, TWO1+13, TWO1+14, COM1+1*, COM1+2, COM2+6, COM2+7, END!
, READ+1*, READ+2*, READ+3*
ZY END+2!
ZZ END!
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