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
 

 

Problem encountered in Comp values

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
amitc23

New User


Joined: 05 Nov 2014
Posts: 79
Location: India

PostPosted: Tue Aug 04, 2015 1:23 pm    Post subject: Problem encountered in Comp values
Reply with quote

Hi
I am getting some problem in dealing with Hex values in a file. I have a file with two data elements Date and Volume stored as
20150003
051C0014

Here first four bytes is date x'2005115C' and last four is volume x'00000134'. When I read them into a program working storage, what picture clause shall I give. For date it is ok. I specify 9(7) comp-3 and it reads fine, but for volume when I specify

9(7) comp-3 it reads only x'0000013'
9(8) comp-3 it givers s0c7
9(9) comp-3 it gives x'0000013400' - takes x'00' from next field.

Please suggest.
Regards
Amit
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7307

PostPosted: Tue Aug 04, 2015 1:38 pm    Post subject: Reply to: Problem encountered in Comp values
Reply with quote

You've already asked and got answers elsewhere. If you can't take note of those, what would be the point of asking again here?

Topic locked.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 Check Binary Values for symbols gandikk CA Products 3 Tue Mar 21, 2017 5:11 am
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts To display values of multiple rows in... vinu78 DB2 2 Thu Mar 09, 2017 1:20 pm
No new posts Replacing same string with different ... vickey_dw DFSORT/ICETOOL 6 Wed Feb 22, 2017 10:44 pm
No new posts setting new limit Key values for inde... srilata83 DB2 1 Fri Feb 10, 2017 9:24 pm


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