PRCHAMYC ;WISC/DJM-UPDATING THE LINE ITEM DISCOUNTS ON THE AMENDED 442 RECORD ;2/17/95 11:00 AM
Source file <PRCHAMYC.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| V | ;;5.1;IFCAP;**91**;Oct 20, 2000
 | 
|
| LI | ;CREAT THE ENTRY FOR THE 3rd "^" PIECE OF PRCH("AM",PRCHCN) HERE.
 | 
|
| CN | ;CREATE THE 'PRCH("AM",PRCHCN)' ARRAY ELEMENT HERE, ALL THREE PARTS, FOR LINE ITEMS WITH A CONTRACT NUMBER.
 | 
|
| OM | ;CREATE THE 'PRCH("AM",PRCHCN)' ARRAY ELEMENT HERE, ALL THREE PARTS, FOR LINE ITEMS WITHOUT A CONTRACT NUMBER.
 | 
|
| UP | ;NOW LETS DO THE ACTUAL UPDATING OF THE DISCOUNT FOR EACH LINE ITEM.
 | 
|
| SET | ;DECIDE THE LINE ITEM NUMBERS TO DO THE DISCOUNT ADJUSTMENT.
 | 
|
| PCT | ;FOR EACH 'LINE ITEM NUMBER' WITH A DISCOUNT DO IT HERE.
 | 
|
| PCT1 | ||
| PCTQ | ;COME HERE IF THE USER SELECTED A 'QUANTITY' DISCOUNT.
 |