RMPR4E21 ;PHX/HNC - CLOSE OUT PURCHASE CARD TRANSACTION; MAR 1, 1996
Source file <RMPR4E21.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ||
CL | ||
L | ;**** ask for final posting *****************************************
|
|
L1 | ||
IC() | ;DETERMINE NUMBER OF ITEMS FOR PURCHASING AND CLOSE-OUT
|
|
IC1 | ;DISPLAY TEXT FOR DELETE (@) ATTEMPTS FOR MULTIPLES OF ONLY 1 ITEM
|
|
PROC | ||
FILE | ||
ENT | ||
CHK | ;ADD DUPLICATE LINE ITEM
|
|
LKP | ||
DS | ;**** update shipping cost, % discount and bank authorization ********
|
|
CHK1 | ;delete imcomplete items
|
|
POST1 | ;SET AMOUNT FOR IFCAP AMENDMENT.
|
|
EX | ;***reindex record in 664 here
|
|
EX1 | ;
|
|
EXIT | ;KILL VARIABLES AND EXIT ROUTINE
|
|
KTMP | ||
BRK | ||
UNK | ||
M4 | ||
M6 | ||
M442 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^RMPR(660 - [#660] | Classic Fileman Calls |
^RMPR(664 - [#664] | Classic Fileman Calls |