|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 640 (0x280)
Types: TextFile
Names: »SPECIAL.MOD«
└─⟦6ae1c04a5⟧ Bits:30004364 SW1656 IFPS/Personal Version 2.10 release 1.1
└─ ⟦this⟧ »SPECIAL.MOD«
Columns Jan, Feb, Mar, Qtr1, PctSales
Units Sold = 500, 600, 760
Unit Price = 4.00, 4.50, 5.00
Sales Revenue = Units Sold * Unit Price
Ø
Expenses = 1600, Previous * 1.25
Net Profit = Sales Revenue - Expenses
Percent Profit = Net Profit / Sales Revenue * 100
Ø
Redefine Qtr1 Except Percent Profit = Sum(Æ1Å..Æ3Å)
Redefine Qtr1 For Unit Price = Sales Revenue / Units Sold
Redefine PctSales For Units Sold, Unit Price = 0
Redefine PctSales For Sales Revenue thru Net Profit = '
ÆQtr1Å / Previous Sales Revenue * 100
«eof»