|
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: 1152 (0x480)
Types: TextFile
Names: »EXMP6A.FNR«
└─⟦dc6c79650⟧ Bits:30004299 FINAR Tutor
└─ ⟦this⟧ »EXMP6A.FNR«
1000 Columns Volume 1010 Columns Buffing: Flashing: Streaking: ; the Processes 1020 Columns :Time :Cost Totcost(Total)(Costs) 1999 ; 2000 Use Rows from "EXMP6" 2010 Rows Allprod(Total) 2999 ; 3000 Consider Knives to Spoons 3010 Ask for Volume in "EXMPL6" ; get forecast volumes 3020 Consider Time 3022 Knives = 1.5 2.4 1.1 ; hours per 1000 3024 Forks = 0.7 1.2 0.5 ; units per process 3026 Spoons = 0.4 0.9 0.3 3030 Time = Volume * Time / 1000 ; time in hours 3035 Cost = Time / 8 + .5 ; round up to whole 3040 Cost = Cost round 0 ; number of 8 hour shifts 3050 Chain "STDCOS" ; gets standard cost of shift per 3055 Ask for Cost in "PROCES" and * ; process into file "PROCES" 3060 Consider all cols 3070 Allprod = sum of Knives to Spoons 3080 Consider all rows 3090 Totcost = sum of Cost 6999 ; 7000 Report 1 "Cluttered Cutlery Inc." 7010 Center "Second half year production" and underline "*" 7020 Show all 7025 Line 7030 Underline Spoons 7032 Underline Allprod "=" 7034 Align "Note : Costs in $000's" 7036 Page width 72 7038 Col wid 8 exc Time 5 7040 DP Volume 0 Time 1 Cost 2 «eof»