Download PROMULA - Great Migrations

Promula Application Development System User's Manual
(Million Dollars)
Net Sales
Costs and Expenses:
Employment Costs
Materials and Service
Depreciation
Income Taxes
Operating Income
Other Income (Expense):
Interest, Dividends and Other Income
Interest and Other Debt Charges
Estimated Plant Closedown Costs
Other Expenses
Income (Loss) Before Income Taxes
Income Taxes
Net Income (Loss)
1978-82
========
1983-87
========
1978-87
========
18,334.7
28,795.2
47,129.9
7,864.1
7,740.1
902.1
298.6
-------16,804.9
-------1,529.8
12,208.4
13,476.9
1,483.1
371.7
-------27,540.1
-------1,255.1
20,072.5
21,217.0
2,385.2
670.3
-------44,345.0
-------2,784.9
195.9
(199.0)
---------1,526.7
630.8
-------895.9
========
276.4
(389.0)
(650.0)
(51.0)
-------441.5
(86.2)
-------527.7
========
472.3
(588.0)
(650.0)
(51.0)
-------1,968.2
544.6
-------1,423.6
========
See the WRITE table, BROWSE table, and EDIT table statements for more details on the use of multi-variable reports.
3.7.37 DEFINE VARIABLE
Purpose:
Defines a local variable.
Syntax
DEFINE VARIABLE [SCRATCH] [file]
var[(sets)][,"desc"][,TYPE=type] [values] [diskrel]
...
END
Remarks:
var
is the identifier of the variable. This is the name by which you refer to the variable in your programs. var may
contain letters and numbers, but the first character must be a letter. Each variable identifier must be different
from all other identifiers in a given program segment. Only the first six characters of the identifier are
significant. If the identifier is followed by an asterisk (*), the variable may be used as an indirect for general
purpose input/output operations.
SCRATCH
is a keyword indicating that the variable is to reside in scratch storage.
174