HP3000-L Archives

August 2005, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
James English <[log in to unmask]>
Reply To:
James English <[log in to unmask]>
Date:
Tue, 23 Aug 2005 15:01:57 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (49 lines)
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 *

ATOM RSS1 RSS2