PRCHPAM5 ;WISC/DJM-PRINT AMENDMENT,ROUTINE #4 ;11/14/94 3:52 PM
Source file <PRCHPAM5.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| V | ;;5.1;IFCAP;;Oct 20, 2000
 | 
|
| E24 | ;SOURCE CODE Edit PRINT
 | 
|
| E30 | ;F.C.P. Edit PRINT
 | 
|
| E31 | ;Change VENDOR PRINT
 | 
|
| E32 | ;REPLACE P.O. NUMBER PRINT
 | 
|
| LCNT(LCNT) | ;FETCH THE CURRENT LINE COUNT FROM "AMD" ARRAY
 | 
|
| LINE(LCNT,LINES) | ;ADDS A NUMBER OF BLANK "LINES" INTO "AMD" ARRAY
 | 
|
| DATA(LCNT,DATA) | ;PLACES THE AMENDMENT LINE OF TEXT INTO THE "AMD" ARRAY
 | 
|
| LCNT1(LCNT) | ;PUT BACK LCNT INTO "AMD" ARRAY
 | 
|
| OLD | ;GET ALL THE OLD DESCRIPTION FROM 'CHANGES' MULTIPLE AND SET INTO
 | 
|
| NEW | ;GET ALL THE NEW DESCRIPTION FROM THE LINE ITEM MULTIPLE AND SET
 |