home *** CD-ROM | disk | FTP | other *** search
-
- LIST OF UNPRESENTED CHEQUES
-
- Y
- N
- 8,DATECHQ
- DATE
- 30,PAYEE
- PAYEE
- 30,COMM
- COMMMENT
- 10,CHQNUM
- NUMBER
- N
- 8,AMTCHQ
- $
- Y
- DEC='5'
- DO SALES
- CASE DEC='2'
- DO PRICE
- CASE DEC='3'
- DO DEBTORS
- CASE DEC='4'
- DO SUMMARY
- CASE DEC='R'
- RETURN
- OTHERWISE
- LOOP
- ENDCASE
- ENDDO
- *********************************************;
- **********'
- ? invert
- @ 11,0 SAY 'ENTRIES FROM THE 'GET REMARK
- ? invert
- @ 12,