Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to read HEX data from a dataset?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
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    Post subject: How to read HEX data from a dataset?
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    Post subject: Re: How to read HEX data from a dataset?
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: 309
Location: Vizag / US

PostPosted: Fri Nov 17, 2006 7:36 pm    Post subject: Re: How to read HEX data from a dataset?
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: 456
Location: Belgium

PostPosted: Fri Nov 17, 2006 10:54 pm    Post subject:
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    Post subject: How to read HEX data from a dataset?
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: 755
Location: Germany

PostPosted: Mon Nov 20, 2006 4:39 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Fileaid 2 commands instream work. In ... descann Compuware & Other Tools 2 Tue May 16, 2017 3:31 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Group Data based on a key Arun Raj DFSORT/ICETOOL 7 Thu Apr 27, 2017 11:29 pm
No new posts To find out size allocated to a seque... ashek15 JCL & VSAM 15 Thu Apr 27, 2017 9:42 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us