HP3000-L Archives

November 2000, Week 1

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:
Tracy Pierce <[log in to unmask]>
Reply To:
Tracy Pierce <[log in to unmask]>
Date:
Mon, 6 Nov 2000 08:40:42 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (27 lines)
Well, you can specify any characters you want via any version of HP Cobol,
but afaik you only get you guessed it octal.  I've never tried specifiying a
character greater that octal 177 aka DEL aka "char(127)"(decimal).  Someone
else may come up with hex, but this works fine:
01  record-description.
        05  rl-hex-zero-C       pic xx value %060 %103.
      05  rl-therest...
Other ways to cheat:
01  record-description.
        05  r1-hex-zero-C pic s9(4) comp value 67.

> -----Original Message-----
> From: Palmer, Elmo L [mailto:[log in to unmask]]
> Sent: Monday, November 06, 2000 8:34 AM
> To: [log in to unmask]
> Subject: hexidecimal in cobol
>
>
> I need to generate as the first two characters of a record
> the hexidecimal characters "0C".  Does anyone know how to do
> this in COBOL 85.  I see there is some new features that will
> allow me to do that in COBOL 2000 but I don't have that.
>
> I would appreciate any help you can provide.  Thanks
> LaMont Palmer
>

ATOM RSS1 RSS2