Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 757
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 Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm
No new posts File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am
No new posts Extract record for change in combinat... Trinadh DFSORT/ICETOOL 6 Thu Nov 23, 2017 3:32 pm
No new posts Fetching data from JHS as per the cur... arunsoods All Other Mainframe Topics 4 Wed Nov 22, 2017 1:54 pm
No new posts Extract Record using range of Data scorp_rahul23 DFSORT/ICETOOL 3 Wed Nov 15, 2017 11:54 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us