Rdb: Ruby-Nachbau der MWC /rdb-Werkzeuge
This commit is contained in:
@@ -0,0 +1,16 @@
|
||||
income tax percent
|
||||
------ --- -------
|
||||
2300 0 11
|
||||
3400 121 12
|
||||
4400 251 15
|
||||
6500 566 15
|
||||
8500 866 17
|
||||
10800 1257 19
|
||||
12900 1656 21
|
||||
15000 2097 24
|
||||
18200 2865 28
|
||||
23500 4349 32
|
||||
28800 6045 36
|
||||
34100 7953 40
|
||||
41500 10913 45
|
||||
55300 17123 50
|
||||
@@ -0,0 +1,7 @@
|
||||
Item# Onhand Cost Value Description
|
||||
----- ------ ---- ----- -----------
|
||||
1 3 50 150 rubber gloves
|
||||
2 100 X 500 test tubes
|
||||
3 -5 80 -400 clamps
|
||||
4 23 19 437 plates
|
||||
5 -99 24 -2376 cleaning cloth
|
||||
@@ -0,0 +1,5 @@
|
||||
Date Amount Account Ref Description
|
||||
---- ------ ------- --- -----------
|
||||
820113 101.62 car v car repairs
|
||||
820114 81.80 insur c car insurance allstate
|
||||
820114 93.00 car c car registration dmv
|
||||
@@ -0,0 +1,6 @@
|
||||
Date Amount Balance Description
|
||||
---- ------ ------- -----------
|
||||
890101 512 current balance
|
||||
890101 -450 rent check
|
||||
890101 1000 pay check
|
||||
890115 -300 estimated tax payment
|
||||
+10
@@ -0,0 +1,10 @@
|
||||
Colors
|
||||
------
|
||||
black
|
||||
blue
|
||||
carmel
|
||||
green
|
||||
purple
|
||||
red
|
||||
silver
|
||||
white
|
||||
@@ -0,0 +1,6 @@
|
||||
English Deutch
|
||||
------- ------
|
||||
I Ich
|
||||
love liebe
|
||||
you dich
|
||||
widgit
|
||||
@@ -0,0 +1,5 @@
|
||||
Date Amount Account Ref Description
|
||||
---- ------ ------- --- -----------
|
||||
820107 14.00 meal v meal with jones
|
||||
820113 101.62 car v car repairs
|
||||
820114 81.80 insur c car insurance allstate
|
||||
@@ -0,0 +1,4 @@
|
||||
Name
|
||||
----
|
||||
Jane
|
||||
Sally
|
||||
@@ -0,0 +1,6 @@
|
||||
<Name>
|
||||
<Company>
|
||||
<Street>
|
||||
< City >, <State> <ZIP>
|
||||
Hi < Name >:
|
||||
|
||||
@@ -0,0 +1,9 @@
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
1 3 5.00 15.00 rubber gloves
|
||||
2 100 0.50 50.00 test tubes
|
||||
3 5 8.00 40.00 clamps
|
||||
4 23 1.98 45.54 plates
|
||||
5 99 2.45 242.55 cleaning cloth
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
7 5 175.00 875.00 scales
|
||||
@@ -0,0 +1,10 @@
|
||||
Date Account Debit Credit Description
|
||||
---- ------- ----- ------ -----------
|
||||
861222 101 25000 cash from loan
|
||||
861222 211.1 25000 loan number #378-14 Bank Amerigold
|
||||
861223 150.1 10000 test equipment from Zarkoff
|
||||
861223 101 5000 cash payment
|
||||
861223 211.2 5000 note payable to Zarkoff Equipment
|
||||
861224 130 30000 inventory - parts from CCPSC
|
||||
861224 201.1 15000 accounts payable to CCPSC
|
||||
861224 101 15000 cash payment to CCPSC for parts
|
||||
@@ -0,0 +1,19 @@
|
||||
|
||||
Number 1
|
||||
Name Ronald McDonald
|
||||
Company McDonalds
|
||||
Street 123 Mac Attack
|
||||
City Memphis
|
||||
State TENN
|
||||
ZIP 30000
|
||||
Phone (111) 222-3333
|
||||
|
||||
Number 2
|
||||
Name Chiquita Banana
|
||||
Company United Brands
|
||||
Street Uno Avenido de la Reforma
|
||||
City San Jose
|
||||
State Costa Rica
|
||||
ZIP 123456789
|
||||
Phone 1234
|
||||
|
||||
@@ -0,0 +1,10 @@
|
||||
Name
|
||||
----
|
||||
Abraham
|
||||
Abraham
|
||||
Adams
|
||||
Ackerman
|
||||
Manis
|
||||
Mann
|
||||
Miller
|
||||
Moon
|
||||
@@ -0,0 +1,7 @@
|
||||
Qty Model Colors Options
|
||||
--- ----- ------ -------
|
||||
1 sedan black 3
|
||||
1 sedan green 1
|
||||
1 sedan farble 4
|
||||
3 sedan red 5
|
||||
1 sedan yellow 4
|
||||
@@ -0,0 +1,5 @@
|
||||
Item Owner
|
||||
---- -----
|
||||
1 ann
|
||||
3 bob
|
||||
6 cy
|
||||
@@ -0,0 +1,5 @@
|
||||
Parent Child
|
||||
------ -----
|
||||
Sally Fred
|
||||
Mike Fred
|
||||
Fred Jane
|
||||
@@ -0,0 +1,6 @@
|
||||
Part Subpart Count
|
||||
---- ------- -----
|
||||
10001 10010 3
|
||||
10001 10020 4
|
||||
10010 10100 2
|
||||
10020 10100 5
|
||||
@@ -0,0 +1,3 @@
|
||||
True If
|
||||
---- --
|
||||
mother(X,Y) female(X), parent(X,Y)
|
||||
@@ -0,0 +1,14 @@
|
||||
# One command per line; testall runs them in demo/ and prints the output.
|
||||
# Save a known-good run: testall > testall.old ; later: testall | diff testall.old -
|
||||
row 'Cost > 5' < inventory
|
||||
column Cost Amount Description < inventory
|
||||
sorttable -nr Cost < inventory
|
||||
compute 'Value = sprintf("%5.2f", Cost * Amount)' < inventory
|
||||
total Amount Value < inventory
|
||||
datatype -l < inventory
|
||||
subtotal Date Debit Credit < journal
|
||||
jointable parent female
|
||||
union expense carexpense
|
||||
justify < inventory
|
||||
tabletolist < inventory
|
||||
julian Date < journal
|
||||
@@ -0,0 +1,136 @@
|
||||
$ row 'Cost > 5' < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
3 5 8.00 40.00 clamps
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
7 5 175.00 875.00 scales
|
||||
$ column Cost Amount Description < inventory
|
||||
Cost Amount Description
|
||||
---- ------ -----------
|
||||
5.00 3 rubber gloves
|
||||
0.50 100 test tubes
|
||||
8.00 5 clamps
|
||||
1.98 23 plates
|
||||
2.45 99 cleaning cloth
|
||||
14.75 89 bunsen burners
|
||||
175.00 5 scales
|
||||
$ sorttable -nr Cost < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
7 5 175.00 875.00 scales
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
3 5 8.00 40.00 clamps
|
||||
1 3 5.00 15.00 rubber gloves
|
||||
5 99 2.45 242.55 cleaning cloth
|
||||
4 23 1.98 45.54 plates
|
||||
2 100 0.50 50.00 test tubes
|
||||
$ compute 'Value = sprintf("%5.2f", Cost * Amount)' < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
1 3 5.00 15.00 rubber gloves
|
||||
2 100 0.50 50.00 test tubes
|
||||
3 5 8.00 40.00 clamps
|
||||
4 23 1.98 45.54 plates
|
||||
5 99 2.45 242.55 cleaning cloth
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
7 5 175.00 875.00 scales
|
||||
$ total Amount Value < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
324 2580.84
|
||||
$ datatype -l < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ---- ----- -----------
|
||||
1 3 5.00 15.00 rubber gloves
|
||||
2 100 0.50 50.00 test tubes
|
||||
3 5 8.00 40.00 clamps
|
||||
4 23 1.98 45.54 plates
|
||||
5 99 2.45 242.55 cleaning cloth
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
7 5 175.00 875.00 scales
|
||||
---- ------ ---- ----- -----------
|
||||
0 0 2 2 -1
|
||||
$ subtotal Date Debit Credit < journal
|
||||
Date Account Debit Credit Description
|
||||
---- ------- ----- ------ -----------
|
||||
861222 25000 25000
|
||||
861223 10000 10000
|
||||
861224 30000 30000
|
||||
$ jointable parent female
|
||||
Parent Child
|
||||
------ -----
|
||||
Sally Fred
|
||||
$ union expense carexpense
|
||||
Date Amount Account Ref Description
|
||||
---- ------ ------- --- -----------
|
||||
820107 14.00 meal v meal with jones
|
||||
820113 101.62 car v car repairs
|
||||
820114 81.80 insur c car insurance allstate
|
||||
820113 101.62 car v car repairs
|
||||
820114 81.80 insur c car insurance allstate
|
||||
820114 93.00 car c car registration dmv
|
||||
$ justify < inventory
|
||||
Item Amount Cost Value Description
|
||||
---- ------ ------ ------- --------------
|
||||
1 3 5.00 15.00 rubber gloves
|
||||
2 100 0.50 50.00 test tubes
|
||||
3 5 8.00 40.00 clamps
|
||||
4 23 1.98 45.54 plates
|
||||
5 99 2.45 242.55 cleaning cloth
|
||||
6 89 14.75 1312.75 bunsen burners
|
||||
7 5 175.00 875.00 scales
|
||||
$ tabletolist < inventory
|
||||
|
||||
Item 1
|
||||
Amount 3
|
||||
Cost 5.00
|
||||
Value 15.00
|
||||
Description rubber gloves
|
||||
|
||||
Item 2
|
||||
Amount 100
|
||||
Cost 0.50
|
||||
Value 50.00
|
||||
Description test tubes
|
||||
|
||||
Item 3
|
||||
Amount 5
|
||||
Cost 8.00
|
||||
Value 40.00
|
||||
Description clamps
|
||||
|
||||
Item 4
|
||||
Amount 23
|
||||
Cost 1.98
|
||||
Value 45.54
|
||||
Description plates
|
||||
|
||||
Item 5
|
||||
Amount 99
|
||||
Cost 2.45
|
||||
Value 242.55
|
||||
Description cleaning cloth
|
||||
|
||||
Item 6
|
||||
Amount 89
|
||||
Cost 14.75
|
||||
Value 1312.75
|
||||
Description bunsen burners
|
||||
|
||||
Item 7
|
||||
Amount 5
|
||||
Cost 175.00
|
||||
Value 875.00
|
||||
Description scales
|
||||
|
||||
$ julian Date < journal
|
||||
Date Account Debit Credit Description
|
||||
---- ------- ----- ------ -----------
|
||||
1752827 101 25000 cash from loan
|
||||
1752827 211.1 25000 loan number #378-14 Bank Amerigold
|
||||
1752828 150.1 10000 test equipment from Zarkoff
|
||||
1752828 101 5000 cash payment
|
||||
1752828 211.2 5000 note payable to Zarkoff Equipment
|
||||
1752829 130 30000 inventory - parts from CCPSC
|
||||
1752829 201.1 15000 accounts payable to CCPSC
|
||||
1752829 101 15000 cash payment to CCPSC for parts
|
||||
Reference in New Issue
Block a user