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

Convert the packed data to COMP-3


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
coria

New User


Joined: 09 Oct 2006
Posts: 36

PostPosted: Tue Nov 06, 2007 12:09 pm
Reply with quote

Hi All, I need a help from you,
here is the hex data:
Code:
-------
..../i?
0000686
0000195

the value should be 618.950, it is packed data, but not COM-3 (no 'D' or 'C' ended)

how to convert this data to S9(9)V9(3) COMP-3 by using a sort step?

Thanks!
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Tue Nov 06, 2007 9:30 pm
Reply with quote

Quote:
the value should be 618.950


Wouldn't the value be 618.965 rather than 618.950? If not, where did the 50 come from?

Ok, so the value is X'00000000618965'. You're correct that it's a packed data value without a sign (it's NOT binary and it's NOT PD) - it has 14 digits. DFSORT doesn't have a built-in format for a PD value without a sign.

Quote:
how to convert this data to S9(9)V9(3) COMP-3


That would be a 12 digit PD value. Note that PD values do not actually have the decimal point - it's implied. So the conversion you asked for would be from X'00000000618965' to X'000000618965C'.

To do that conversion, you need to remove the first 2 digits on the left and add a sign at the end. I assume the sign would always be positive (C) - right?

Do I understand correctly what you want?
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts How to save SYSLOG as text data via P... All Other Mainframe Topics 1
No new posts Store the data for fixed length COBOL Programming 1
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts SCOPE PENDING option -check data DB2 2
No new posts Need to convert date format DFSORT/ICETOOL 20
Search our Forums:

Back to Top