Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RMPFER

Package: Remote Order Entry System

Routine: RMPFER


Information

RMPFER ;DDC/KAW-REMOVE ORDER FROM A BATCH; [ 04/04/97 8:35 AM ]

Source Information

Source file <RMPFER.m>

Entry Points

Name Comments DBIA/ICR reference
RMPFSET
A0
A1
A2
A3
A4
A41
A42
END
READ
DELETE ;;input: RMPFB
DELE
DEL
DEL0
DEL1
DEL2
DEL3
DELETEE

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,!,"REMOVE ORDER FROM A BATCH"
  • Line Location: RMPFSET+2
Function Call: WRITE
  • Prompt: $C(7),!!,"*** NO BATCHES CURRENTLY OPEN ***"
  • Line Location: RMPFSET+3
Function Call: WRITE
  • Prompt: !!,"Currently Open Batch:",!
  • Line Location: RMPFSET+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: RMPFSET+4
Function Call: WRITE
  • Prompt: !!,"Date/Time Opened: ",D
  • Line Location: A1+4
Function Call: WRITE
  • Prompt: !?1,"Number in Batch: ",N
  • Line Location: A1+5
Function Call: WRITE
  • Prompt: !!,"*** NO OPEN BATCH ***"
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: A2+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: A2+5
Function Call: WRITE
  • Prompt: !!,"Display batch entries? YES// "
  • Line Location: A4+0
Function Call: WRITE
  • Prompt: !!,"Type <Y> or <RETURN> to display entries in the batch or <N> to continue."
  • Line Location: A41+0
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: !!,"Enter Order Numbers Separated by Commas: "
  • Line Location: DELETE+3
Function Call: WRITE
  • Prompt: !!,"Select the number(s) to the left of the orders you wish to delete.",!,"Separate numbers with commas."
  • Line Location: DELE+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: DELE+3
Function Call: WRITE
  • Prompt: !!?25,$C(7),"*** ORDER DOES NOT EXIST *** "
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !!,"Order: "
  • Line Location: DEL0+0
Function Call: WRITE
  • Prompt: Y
  • Line Location: DEL0+0
Function Call: WRITE
  • Prompt: Y
  • Line Location: DEL0+0
Function Call: WRITE
  • Prompt: !!,"Are you sure you want to delete this order from the batch? NO// "
  • Line Location: DEL0+1
Function Call: WRITE
  • Prompt: !!,"Enter <N> or <RETURN> to continue or <Y> to delete the order."
  • Line Location: DEL1+0
Function Call: WRITE
  • Prompt: !!,"Enter reason for deletion: "
  • Line Location: DEL2+0
Function Call: WRITE
  • Prompt: !!,"You must enter a reason for the deletion (3 to 30 characters)."
  • Line Location: DEL3+0
Function Call: WRITE
  • Prompt: !!?20,"*** ORDER DELETED FROM BATCH ***"
  • Line Location: DEL3+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPF(791810 - [#791810] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call