Columns . . . :                     Edit                         GOLFP/SRCFILE
 SEU==>_______________________________________________________          SPRSNF
 FMT A* .....A*. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 
        *************** Beginning of data *************************************
     A* STOCK NEEDS FILE
     A*.........T.Name++++++RLen++TDpB......Functions++++++++++++++++++
     A          R STNEED                    TEXT('STOCK NEEDS LAYOUT')
     A
     A            VENDOR         4A         TEXT('VENDOR NUMBER')
     A            ITEMNO         5A         TEXT('ITEM NUMBER')
     A            REORDER        6S 0       TEXT('RECC REORDER AMT')
     A            CODE           1A         TEXT('RECORD CODE')
     A*                                           C = CURRENT RECORD
     A*                                           D = DELETED RECORD
     A          K VENDOR
     A          K ITEMNO