home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Oakland CPM Archive
/
oakcpm.iso
/
cpm
/
database
/
scrivner.lbr
/
PETTY.SCR
< prev
next >
Wrap
Text File
|
1986-12-13
|
2KB
|
35 lines
#announce ^j^j Petty Cash book
#input _TODAY_,,Enter Today's date
#input _REC_NUM_,,^jHow many receipts do you wish to enter
#input _PAY_NUM_,,^jHow many payments do you wish to enter
[[ef 7.2t]]
__________________________________________________________________________________________________________________
| | | |Voucher| | | | |Total |
|Receipts |Date | Details |Number |Fares |Postage |Clean |Sundries |Payments |
------------------------------------------------------------------------------------------------------------------
#repeat #include petty1.inc,,_REC_NUM_
#repeat #include petty2.inc,,_PAY_NUM_
| | | | | | | | |
==================================================================================================================
| | Totals | |[[t ftot]] |[[t ptot]] |[[t ctot]] |[[t stot]] | [[t ttot]] |
#input _BAL_,,Enter the balance
| | Balance | | | | | | [[ b=_BAL_]]|
==================================================================================================================
| | | | | | | | |
| | | | | | | | |
[[t rtot]] | | | | | | | | [[ ttot+b]] |
#overtype
[[ _BAL_]] |_TODAY_ | Balance | | | | | | |
[[ ttot ]] |_TODAY_ | Cash | | | | | | |
------------------------------------------------------------------------------------------------------------------
#insert
[[dm post.out]]
[[dp ^j^mPetty cash for _TODAY_]]
[[dp ^j^mpostage ,,ptot,,]]
[[dp ^j^mfares ,,ftot,,]]
[[dp ^j^mcleaning ,,ctot,,]]
[[dp ^j^msundries ,,stot,,]]
[[dp ^j^mtotals ,,ttot,,]]
[[dp ^j^m]]