I'm compiling an HP COBOL II program (ANSI85) and I'm getting the error
COMPOSITE OF OPERANDS TOO BIG when I multiply the two variables below.
VAR-A PIC S9(4) COMP.
VAR-B PIC S9(9) COMP.
Here's the multiply statement I'm using:
IF VAR-A < 0 THEN
MULTIPLY VAR-A BY VAR-B
END-IF.
The compiler directives I'm using are:
$CONTROL LIST,SOURCE,NOCODE,NOCROSSREF,ERRORS=100,NOVERBS,WARN
$CONTROL LINES=60,NOMAP,MIXED,QUOTE=",NOSTDWARN,SYNC32,INDEX32
$CONTROL NOVALIDATE,OPTIMIZE=0
$CONTROL USLINIT, SUBPROGRAM, SOURCE
From the HP COBOL II manual, p. 8-45, it says that the composite of the
operands cannot be more than 18 digits. If that's the case, then I don't
understand why I'm getting this error. Multiplying a 9 digit number by a 4
digit number results in a 13 digit number - which is less than 18 digits.
We are running an HP3000/N4000-100-33 with MPE/iX 7.0.
Thanks,
Jim.
---------------------------------
James English
Financial Systems Analyst
MIS Department
TB Wood's Incorporated
440 N Fifth Avenue
Chambersburg, PA 17201
Phone: (717) 264-7161 x2119
Fax: (717) 264-0890
[log in to unmask]
http://www.tbwoods.com
---------------------------------
This e-mail is intended solely for the person or entity to which it is addressed and may contain confidential and/or privileged information. Any review, dissemination, copying, printing, forwarding or other use of this e-mail by persons or entities other than the addressee is prohibited. If you have received this e-mail in error, please contact the sender immediately and delete the material from your computer. Opinions, conclusions and other information in this message that do not relate to the official business of TB Woods Incorporated shall be understood as neither given or endorsed by it.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|