IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to read HEX data from a dataset?


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sandy_mcs

New User


Joined: 01 Apr 2006
Posts: 17
Location: Pune

PostPosted: Tue Nov 14, 2006 5:29 pm
Reply with quote

How to read HEX data from a dataset?

options available are 1) SET HEX ON
2) HEX ON
3) ...
Back to top
View user's profile Send private message
aavugari mayuri

New User


Joined: 15 Aug 2006
Posts: 10

PostPosted: Fri Nov 17, 2006 7:20 pm
Reply with quote

i think you can just say HEX ON in the command line..
Back to top
View user's profile Send private message
Gautam512

Active User


Joined: 05 Oct 2005
Posts: 308
Location: Vizag / US

PostPosted: Fri Nov 17, 2006 7:36 pm
Reply with quote

a small request: did u search the forum before posting the query....

just

HEX

is enough........

if u want to close....

HEX OFF
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 459
Location: Belgium

PostPosted: Fri Nov 17, 2006 10:54 pm
Reply with quote

3) HEX DATA
4) ...
Back to top
View user's profile Send private message
vijay_bn79

New User


Joined: 20 Nov 2006
Posts: 48
Location: Hyderabad

PostPosted: Mon Nov 20, 2006 4:22 pm
Reply with quote

Hi..,

This example may helps you to understand clearly

WORKING-STORAGE SECTION.

05 CURR-BILL-DTE PIC S9(6) COMP-3.

PROCEDURE DIVISION.

MOVE 051505 TO CURR-BILL-DTE.


In the Data set it looks as follows

when HEX is OFF

---
***
&*



When HEX is ON

----
&*
0555
010C

you should read in zig zag manner
like top bottom top bottem....... as 051505C


Thanks
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 771
Location: Germany

PostPosted: Mon Nov 20, 2006 4:39 pm
Reply with quote

Hi !

@vijay_bn79

You can define the hex-value directly in a Cobol-programm as a constant.
FIELD PIC X(04) VALUE X'A49485A8'.

@sandy_mcs
In which environment would you do that. In TSO editor or in a Cobol-programm. Here in the COBOL-Section you posted your question.

Regards, UmeySan
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Store the data for fixed length COBOL Programming 1
No new posts Error to read log with rexx CLIST & REXX 11
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
Search our Forums:

Back to Top