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

Package: Remote Order Entry System

Routine: RMPFET82


Information

RMPFET82 ;DDC/KAW-CANCEL A LINE ITEM [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFET82.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Remote Order Entry System 3 (,ARRAY)^RMPFDT2  APPROV1^RMPFEA2  ^RMPFET83  
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: 1

Package Total Caller Graph
Remote Order Entry System 1 RMPFET0  

Entry Points

Name Comments DBIA/ICR reference
START
EXECUTE
EXIT
END
ASK1 ;;Ask to cancel multiple items
ASK11
ASK1E
ASK2 ;;Select items to cancel
ASK21
ASK22
ASK221
ASK2E
APPROV ;;Display and ask if selection correct
APP1
APP11
APPROVE
CANCEL1 ;;Cancel a line item
CANCEL1E
SET ;;Set up array of items to cancel
READ

External References

Name Field # of Occurrence
^%DT CANCEL1+4
^DIE CANCEL1+9
^RMPFDT2 START
ARRAY^RMPFDT2 START+1
APPROV1^RMPFEA2 CANCEL1E+1
^RMPFET83 EXECUTE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?35,"ACTIVE LINE ITEMS",!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !!,"*** NO LINE ITEMS TO CANCEL ***"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,$S(RMPFHAT="C"!(RMPFHAT="I")!(RMPFHAT="X"):"*** ALL LINE ITEMS HAVE ALREADY BEEN CANCELED ***",1:"*** NO ITEMS HAVE BEEN BACKORDERED ***")
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !,"Type <RETURN> to continue."
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!,"Do you wish to cancel the orders for ",CL," line items? NO// "
  • Line Location: ASK1+3
Function Call: WRITE
  • Prompt: !!,"Enter a <Y> to cancel all line items",!?5,"an <N> or <RETURN> to select line items to cancel."
  • Line Location: ASK11+0
Function Call: WRITE
  • Prompt: !!,"Select the Number of the item you wish to cancel: "
  • Line Location: ASK2+3
Function Call: WRITE
  • Prompt: !!,"Enter the number to the left of the item you wish to cancel."
  • Line Location: ASK21+0
Function Call: WRITE
  • Prompt: !!,"*** ITEM ALREADY SELECTED ***"
  • Line Location: ASK21+2
Function Call: WRITE
  • Prompt: !!,"*** ITEM ALREADY CANCELED ***"
  • Line Location: ASK21+3
Function Call: WRITE
  • Prompt: !!,"Select another? NO// "
  • Line Location: ASK22+0
Function Call: WRITE
  • Prompt: !!,"Enter a <Y> to select another item to cancel",!?5,"an <N> or <RETURN> to continue"
  • Line Location: ASK221+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CN
  • Line Location: APPROV+5
Function Call: WRITE
  • Prompt: ?25,RMPFIT," (",RMPFQTY,")"
  • Line Location: APPROV+5
Function Call: WRITE
  • Prompt: !!,"Are you sure you wish to cancel ",$S(CN>1:"these",1:"this")," item",$S(CN>1:"s",1:""),"? NO// "
  • Line Location: APP1+0
Function Call: WRITE
  • Prompt: !!,"Enter a <Y> to cancel ",$S(CN>1:"these",1:"this")," item(s)",$S(CN>1:"s",1:""),"",!?5,"an <N> or <RETURN> to leave the item",$S(CN>1:"s",1:"")," active in the order."
  • Line Location: APP11+0
Function Call: WRITE
  • Prompt: !!,"Item",$S(C=1:"",1:"(s)")," CANCELED",!!
  • Line Location: CANCEL1E+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:
    • CANCEL1+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPF(791810 - [#791810] SET+3
^RMPF(791810.2 - [#791810.2] START+3, ASK11+3, ASK21+3
^RMPF(791811 - [#791811] SET+5

Label References

Name Line Occurrences
APP1 APP11
APPROV EXECUTE
APPROVE APP1+1
ASK1 START+9, ASK11
ASK11 ASK11+1
ASK1E ASK11+2
ASK2 START+10, ASK21ASK21+2, ASK21+3, ASK221+2
ASK21 ASK21+1
ASK22 ASK221
ASK221 ASK221+1
ASK2E ASK21+1
CANCEL1 EXECUTE+2
CANCEL1E CANCEL1+3
END START+9, START+10, EXECUTEEXECUTE+1, EXECUTE+2, ASK1+3, ASK2+4
EXECUTE START+8, START+9
EXIT START+6, START+7
READ EXIT+1, ASK1+3, ASK2+4, ASK22APP1+1, READ+1
SET START+8, ASK11+3, ASK21+4

Naked Globals

Name Field # of Occurrence
^(0 ASK11+3, ASK21+3, SET+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CANCEL1+4*, CANCEL1E+2!
%X CANCEL1E+2!
%Y CANCEL1E+2!
C END!, CANCEL1+3*, CANCEL1+4*, CANCEL1+6, CANCEL1ECANCEL1E+2!
CL START+1*, START+4*, START+5*, START+7, START+8, END!, ASK1+3
CN APPROV+3*, APPROV+5*, APP1APP11, APPROVE!
CX END!
DA CANCEL1+3*, CANCEL1+5, CANCEL1E+2!
DA(1 CANCEL1+7*
DIE CANCEL1+7*, CANCEL1E+2!
DR CANCEL1+8*, CANCEL1E+2!
DTIME READ+1
DUZ CANCEL1+8
>> I EXIT*
IOF START
RMPFCAN START+1!, START+9, START+10, EXECUTE, END!, APP11+1!
RMPFCAN( ASK21+2, APPROV+3, APPROV+4, CANCEL1+3, CANCEL1+5, SET+6*
>> RMPFHAT START+4, START+5, START+7, EXECUTE+1
RMPFIT APPROV+4*, APPROV+5, APPROVE!, CANCEL1+5*, CANCEL1+6, CANCEL1E+2!, SET+4*, SET+5*, SET+6, SET+7!
RMPFMD END!
RMPFMD( ASK21+1, ASK21+2
RMPFO START+6, END!, ASK11+4!
RMPFO( START+2, START+3, ASK11+3, ASK21+3
RMPFOUT START+9, START+10, EXECUTEASK1+3, ASK2+4, ASK22APP1+1, READ!, READ+2*
RMPFQTY APPROV+4*, APPROV+5, APPROVE!, CANCEL1+5*, CANCEL1+6, CANCEL1E+2!, SET+4*, SET+6, SET+7!
RMPFQUT ASK11ASK11+1*, ASK21ASK21+1*, ASK221ASK221+1*, APP11, READ!, READ+3*
RMPFRE START+1!, END!
>> RMPFX RMPFET82+4, CANCEL1+7, SET+3
RMPFY RMPFET82+4!, START+8*, END!, ASK11+2*, ASK11+3*, ASK21+2*, ASK21+3!, APPROV+3*, APPROV+4, SET+3
SET+6
>> RX START+4*, START+5*, START+8
S0 APPROVE!
SL END!
TD CANCEL1+4*, CANCEL1+8, CANCEL1E+2!
U START+3, ASK11+3, ASK21+3, APPROV+4, CANCEL1+5, SET+4, SET+5, SET+6, READ+1
X START+2*, START+3, START+4, START+5, ASK11+3*, ASK21+3*, CANCEL1+4*, CANCEL1E+2!, SET+3*, SET+4
SET+7!
Y START+3*, START+4, START+5, ASK11+1*, ASK11+2, ASK1E!, ASK21+1, ASK21+2, ASK221+1*, ASK221+2
, ASK2E!, APP11+1*, APPROVE!, CANCEL1+4, CANCEL1E+2!, 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