home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / MBUG / MBUG102.ARC / CHECKCHQ.CMD < prev    next >
OS/2 REXX Batch file  |  1979-12-31  |  512b  |  19 lines
  1. *CHECKCHQ.PRG
  2. *PROGRAM TO TICK OFF CHEQUES AS PRESENTED TO BANK FOR RECONCILIATION
  3. *PURPOSES
  4. USE GENLED
  5. ERASE
  6. DO WHILE T
  7. IF .NOT. PRESENTED
  8. STORE ' ' TO QUI
  9. STORE PRESENTED TO PRESENT  
  10. @ 15,0 SAY CHQNUM
  11. @ 15,12 SAY PAYEE
  12. @ 15,50 SAY DATECHQ
  13. @ 15,60 SAY 'PRESENTED' GET PRESENT   
  14. @ 16,0 SAY 'IF CHEQUE HAS BEEN PRESENTED SET TO TRUE "T"'
  15. @ 17,0 SAY 'PRESS "/" TO QUIT ELSE ANY OTHER KEY TO CONTINUE' GET QUI
  16. READ
  17. REPLACE PRESENTED WITH PRESENT
  18. ENDIF
  19. ENDDO