home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / dbaseii / checkbk2.lbr / CHANGES.CMD < prev    next >
Encoding:
Text File  |  1986-08-05  |  1.0 KB  |  25 lines
  1. ACCEPT 'PRESS C FOR CHECK,D FOR DEPOSIT' TO TYPE
  2. IF TYPE='C'
  3.   ACCEPT 'ENTER CHECK NUMBER' TO FINDER
  4.   FIND &FINDER
  5.   ERASE
  6.   @ 5,10 SAY '        CHECK NUMBER' GET CHECKNO
  7.   CLEAR GETS
  8.   @ 7,10 SAY 'PAID TO THE ORDER OF' GET PAIDTO
  9.   @ 9,10 SAY 'ENTER AMOUNT OF CHECK' GET AMOUNT
  10.   @ 11,10 SAY 'ENTER DATE (mm-dd-yy)' GET DATE
  11.   @ 13,10 SAY 'IS THIS CHECK DEDUCTIBLE (Y/N)' GET DEDUCT
  12.   READ
  13. ENDIF
  14. IF TYPE='D'
  15.   ACCEPT 'ENTER DATE OF DEPOSIT' TO FINDER
  16.   DISPLAY FOR DEPOSIT.AND.DATE=FINDER
  17.   INPUT 'ENTER RECORD NUMBER TO BE EDITED' TO FINDER
  18.   GOTO FINDER
  19.   ERASE
  20.   @ 9,10 SAY 'ENTER AMOUNT OF DEPOSIT' GET AMOUNT
  21.   @ 11,10 SAY 'ENTER DATE (mm-dd-yy)' GET DATE
  22.   READ
  23. ENDIF
  24. RETURN
  25.           150.00FN 4/10/84     5TEST5                 22.10FY 4/15/84      DEPOSIT             1000.00T  4/5/84         0.00         F     0BANK CHARGE                      25.00Y4-10-84 F     7                                  0.00         F    7                                  0.00         F 2091MONTGOMERY C