HP3000-L Archives

August 2002, Week 2

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:
Re: COBYLIB vs ADAGER
From:
Tom Brandt <[log in to unmask]>
Reply To:
Tom Brandt <[log in to unmask]>
Date:
Wed, 14 Aug 2002 15:44:59 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (29 lines) 
At 12:42 PM 8/14/2002 -0700, Michael Berkowitz wrote:
>Tom Brandt writes
>
>
>
>An IMAGE type designator of J is the same as I - a halfword signed binary
>integer. An item defined as I2 should be defined as a PIC S9(4) COMP in the
>COBOL copylib. A COBOL definition is S9(6)V99 COMP is used to define a J4
>data item.
>---------------------------------------------------
>Not quite.
>
>The COBOL equivalent to an Image I1/J1 is PIC S9(1 to 4) COMP.
>                            Image I2/J2 is PIC S9(5 to 9) COMP.
>                            Image I4/J4 is PIC S9(10 to 18) COMP.

You are right, and if I bothered to proofread what I type instead of
hitting SEND immediately, I wouldn't look like an idiot.

--------------------------------
Tom Brandt
Northtech Systems, Inc.
313 N. 1st Street
Ann Arbor, MI 48103
http://www.northtech.com/

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2