Multiply - Control Data Corporation 3300 Reference Manual

Computer systems usasi cobol/ master
Table of Contents

Advertisement

4.7.14
MULTIPLY
The MULTIPLY statement causes numeric data items to be multiplied and
sets the value of a data item or items equal to the results.
Format 1:
MULTIPLY
1
identifier-
1
l
BY identifier-m [ROUNDED]
,[identifier-n
literal-l
~
[ROUNDED]] ... [; ON SIZE ERROR imperative-statement]
Format 2:
MULTIPLY
1
i~entifier-li
BY
1
identifier- 2
1
hteral-1
\ -
literal-2
\
,
,
GIVING identifier-m [ROUNDED] ,[identifier-n [ROUNDED]] ...
[; ON SIZE ERROR imperative-statement]
In format 1, each identifier must refer to a numeric elementary item. In
format 2, an identifier to the right of the word GIVING may refer to a data
item that contains editing symbols. Each literal must be a numeric literal.
The maximum size of each operand is 18 decimal digits. The initial value of
identifier-lor literal-1 is multiplied by the initial values of identifier-m,
identifier-n, . .. The resulting products replace the values 'of identifier-m,
identifier-n, ... respectively.
In format 2, the initial value of identifier-lor literal-l is multiplied by
identifier-2 or literal-2 and the result is stored in identifier-m,
identifier-n, . .. respectively.
Examples:
1.
MULTIPLY 1. 05 BY MONTHLY-EARNINGS, OVERTIME-RATE,
SOC-SEC, FEDERAL-TAX.
2.
MULTIPLY ALPHA BY BETA GIVING CHI ROUNDED DELTA
ROUNDED ON SIZE ERROR PERFORM ERROR-ROUTINE.
60229400
4-39

Advertisement

Table of Contents
loading
Need help?

Need help?

Do you have a question about the 3300 and is the answer not in the manual?

Subscribe to Our Youtube Channel

This manual is also suitable for:

3500

Table of Contents