HP3000-L Archives

April 2001, 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:
Re: Displaying an x(10) character field as HEX via COBOL display command
From:
Tom Brandt <[log in to unmask]>
Reply To:
Tom Brandt <[log in to unmask]>
Date:
Fri, 27 Apr 2001 14:26:09 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (27 lines) 
One way to do it is to redirect the $STDLIST to a file, and then do a hex
dump of the file using FCOPY.

!BUILD TEMP;REC=-10,,F,ASCII
!FILE TEMP=TEMP,OLD;DEV=DISC
!RUN <program>;STDLIST=*TEMP

!FCOPY FROM=TEMP;TO=;CHAR;HEX


(Hi Jim!)

At 11:21 AM 4/27/2001 -0700, Jim Chance wrote:
>Does anyone know how to display a character X(10) field
>within a COBOL program using the display command to force
>the resulting value in HEX?

--------------------------------
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