home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug106.arc
/
CHECKS.LBR
/
$CHK-DAT.MNU
< prev
next >
Wrap
Text File
|
1979-12-31
|
3KB
|
45 lines
* * * * * $CHK-DAT.MNU * * * * * 6/30/84
*
* This is the user modifiable form used when entering checks
* into the $CHECKS.DBF. You should only change the lower half
* of this form starting at "@ 10,03 ..." to conform to your purpose
* codes. This is set up for an 80 column screen which may require
* modification if your screen is a different width.
*
SET INTENSITY OFF
? ' CHECK ENTRY FORM - CURRENT ACCOUNT BALANCE = $', mbalance
@ 3,2 SAY 'CHECK NUMBER (00 for cash withdrawl) ' GET m:no PICTURE '9999'
@ 4,2 SAY 'PAY TO THE ORDER OF ' GET m:payee
@ 5,2 SAY 'AMOUNT OF CHECK ' GET m:amt
@ 6,2 SAY 'DATE WRITTEN ' GET ch:dat PICTURE '99/99/99'
@ 7,2 SAY 'ENTER PURPOSE LETTER ' GET ch:memo
SET INTENSITY ON
@ 9,25 SAY 'PURPOSE LETTER CODES'
@ 10,03 SAY 'A - CASH H - HOUSE O - DENTIST'
@ 11,03 SAY 'B - BOOKS HI - IMPROVEMENTS P - PHONE'
@ 12,03 SAY ' BL - LAW HM - MORTGAGE PC - 992'
@ 13,03 SAY ' BB - BUSINESS I - INSURANCE PW - 982'
@ 14,03 SAY ' BC - COMPUTER J - PS - SBS'
@ 15,03 SAY 'C - CARS K - CREDIT CARDS Q - COMPUTER SUPPY'
@ 16,03 SAY ' CT - TOYOTA KC - CHOICE R - REAL ESTATE'
@ 17,03 SAY ' CO - OLDS KS - SEARS S - STOCK'
@ 18,03 SAY ' CS - SUBARU KV - VISA T - TAX DEDUCTIONS'
@ 19,03 SAY 'D - DONATIONS L - LAW PRACTICE U - UTILITIES'
@ 20,03 SAY 'E - EASTERN M - MEDICAL V - SITTERS'
@ 21,03 SAY 'F - FOOD N - NEWSPAPERS W - UNION EXPENSES'
@ 22,03 SAY 'G - CLOTHING NP - WASH POST X - MISCELLANEOUS' F - REPORTS'
?
? ' V - VOID A CHECK or DEPOSIT PREVIOUSLY ENTERED'
?
?
? ' Please entero PICTURE '9999'
@ 4,2 SAY 'PAY TO THE ORDER OF ' GET m:payee
@ 5,2 SAY 'AMOUNT OF CHECK ' GET m:amt
@ 6,2 SAY 'DATE WRITTEN ' GET ch:dat PICTURE '99/99/99'
@ 7,2 SAY 'ENTER PURPOSE LETTER ' GET ch:memo
@ 9,25 SAY 'PURPOSE LETTER CODES'
SET INTENSITY ON
@ 10,03 SAY 'A - CASH H - HOUSE O - DENTIST'
@ 11,03 SAY 'B - BOOKS HI - IMPROVEMENTS P - PHONE'
@ 12,03 SAY ' BL - LAW HM - MORTGAGE SIT PREVIOUSLY ENTERED'