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
 
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: 83
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: 7314

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 CICS startup problem John Poulakos CICS 3 Tue Jun 12, 2018 9:08 pm
No new posts LOW VALUES as a KEY juares castro DB2 10 Sat Apr 07, 2018 1:06 am
No new posts Query to compare 2 values of 1 column... Poha Eater DB2 13 Fri Mar 09, 2018 10:45 am
No new posts attchmvs from rexx subroutine that re... harisukumaran CLIST & REXX 1 Fri Jan 19, 2018 5:29 am
No new posts COMP Variables Mismatch gayu7 COBOL Programming 5 Wed Dec 20, 2017 5:06 pm

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