home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / MSWBASE4.ZIP / TRADING / AUDIT.SBD < prev    next >
Encoding:
Text File  |  1989-09-24  |  730 b   |  13 lines
  1. Client         ;TXT VAL REQ IXD ;8                     ;0  ;0  ;>
  2. LOOKUP (Client.AUDIT,Customer_Ref.CLIENTS) ELSE REQUEST "Client reference not found","Select one of the following",20,,Client.AUDIT,60,Customer_Ref.CLIENTS,Client.CLIENTS,Location.CLIENTS
  3. Trans_Date     ;DAT CON         ;mmm dd,yy             ;1  ;0  ;>
  4. TODAY 
  5. Reference      ;TXT             ;12                    ;2  ;0  ;
  6. Amount         ;NUM             ;-9999999.00           ;3  ;0  ;
  7. Printed_yn     ;LOG             ;1                     ;4  ;0  ;
  8. Serial         ;NUM CLC RDO IXD ;00000.                ;5  ;0  ;>
  9. SER ("AUDIT")
  10. Trans_Type     ;TXT VAL         ;1                     ;6  ;0  ;>
  11. Trans_Type.AUDIT = "r" OR Trans_Type.AUDIT = "p"
  12.  
  13.