Proc Record

File USER-PL , Record 'CALLOSTSALES'
InsertCommand->001 PQ002 RI003 RO004 O PLEASE ENTER A DATE 005 S1006 IP:007 O PLEASE ENTER A LINE CODE 008 S2009 IP:010 HSELECT INVOICE-HISTORY WITH INV.DATE =011 A"1012 STON013 P014 HSSELECT INVOICE-HISTORY BY-EXP QTY.SHIP = "0" BY-EXP LINE.CODE =015 A"2016 STON017 H<018 P019 HVIEWER SORT INVOICE-HISTORY BY QTY.SHIP PART.NUMBER QTY.SHIP020 H INV.DATE (I021 P-------------------------------- End Of Record -----------------------

(fascinating!)