|
|
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 - metrics - download
Length: 2304 (0x900)
Types: TextFile
Names: »CASHMN.MOD«
└─⟦6ae1c04a5⟧ Bits:30004364 SW1656 IFPS/Personal Version 2.10 release 1.1
└─⟦this⟧ »CASHMN.MOD«
COLUMNS 1..12
PERIODS 12
ØØ
ØØ This model analyzes the cash management options available
ØØ based on marketing and production plans in place. A set of
ØØ policies exist for managing cash, debt and investments.
ØØ
ØØ * Cash levels must be between $10000 and $20000.
ØØ * An investment portfolio of at least $50000 must be maintained.
ØØ * If Cash is deficient, the manager must first sell off
ØØ any extra investments, then borrow funds.
ØØ * If Cash is in excesss of $20000, the manager must first
ØØ pay off debt, then buy more investments.
ØØ
ØØ This model adjusts the cash levels each month according to
ØØ these priorities. The final results are fed to the next month
ØØ and combined with operations to help plan investment schedules.
ØØ
ØØ MARKETING INPUT:
PROJECTED NET INCOME=DATA
INVEST IN NEW PRODUCT=DATA
INCOME SMOOTHING FACTOR=DATA
TIMING OF INVEST=DATA
ØØ
ØØ CASH MANAGEMENT POLICIES
MIN CASH=DATA
MAX CASH=DATA
MIN INVEST=DATA
INCREMENT=DATA
ØØ
ØØ CASH MANAGEMENT:
CASH FLOW FROM OPERATIONS=(PROJECTED NET INCOME * INCOME SMOOTHING FACTOR)
TOTAL INVEST IN PRODUCT=INVEST IN NEW PRODUCT*TIMING OF INVEST
BEG CASH=INITIAL CASH,PREVIOUS ENDING CASH
ENDING CASH=BEG CASH + CASH FLOW FROM OPERATIONS + NEW LOANS + '
INVEST SOLD - INVEST BOUGHT - DEBT PAYOFF
ØØ
CASH AVAILABLE=BEG CASH + CASH FLOW FROM OPERATIONS - '
TOTAL INVEST IN PRODUCT
EXCESS CASH=IF CASH AVAILABLE .GT. MAX CASH '
THEN TRUNCATE((CASH AVAILABLE - MIN CASH) / INCREMENT) * '
INCREMENT ELSE 0
CASH NEEDED=IF CASH AVAILABLE .LT. MIN CASH '
THEN ROUNDUP((MIN CASH - CASH AVAILABLE) / INCREMENT) * '
INCREMENT ELSE 0
AVAILABLE INVEST=MAXIMUM(0,INVEST-MIN INVEST)
INVEST SOLD=MINIMUM(CASH NEEDED,AVAILABLE INVEST)
INVEST BOUGHT=EXCESS CASH - DEBT PAYOFF
ENDING INVEST=INVEST + INVEST BOUGHT - INVEST SOLD
NEW LOANS=CASH NEEDED - INVEST SOLD
DEBT PAYOFF=MINIMUM(EXCESS CASH,DEBT)
DEBT=INITIAL DEBT,PREVIOUS ENDING DEBT
ENDING DEBT=DEBT + NEW LOANS - DEBT PAYOFF
ØØ
ØØ DATA AND FUNCTION CALLS:
INITIAL DEBT=DATA
INITIAL CASH=DATA
INVEST=DATA
«eof»