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
 

 

ZD to PD conversion

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Prajesh_v_p

Active User


Joined: 24 May 2006
Posts: 133
Location: India

PostPosted: Tue Feb 09, 2010 5:14 am    Post subject: ZD to PD conversion
Reply with quote

Hi all,

I have a file which has the input data as below:

+000002368+01
+000034630+01

I need to convert this data into packed decimel format. I used the below sort card and the results I am getting is as below:
1,10,ZD,TO=PD,LENGTH=5,11,3,ZD,TO=PD,LENGTH=2

output data in hex on format(last nibble is coming as F, but expected to be C for postitive numbers and also an E is coming at the start of 01)
....±\.
00038E1
0026F0F
-------
...Ä.\.
00360E1
0043F0F

Any issues wity my sort card?

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

Frank Yaeger

DFSORT Moderator


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

PostPosted: Tue Feb 09, 2010 5:22 am    Post subject:
Reply with quote

Those are NOT ZD values. They are FS values.

With DFSORT, the correct control statements would be:

Code:

  OPTION COPY                                               
  INREC BUILD=(1,10,FS,TO=PD,LENGTH=5,11,3,FS,TO=PD,LENGTH=2)


This would give you the following output (in hex):

Code:

000002368C001C    <--- first record

000034630C001C    <--- second record 


If you're getting an F sign, then you must be using Syncsort, not DFSORT. DFSORT gives a C sign for TO=PD automatically. Syncsort gives an F sign.
Back to top
View user's profile Send private message
Prajesh_v_p

Active User


Joined: 24 May 2006
Posts: 133
Location: India

PostPosted: Tue Feb 09, 2010 9:00 am    Post subject:
Reply with quote

Hi Frank,

As you said, we have Synsort. sorry for that confusion.

But even with FS, I am getting the result as below:

Code:
--------
....±.."
00038017
0026F0FF
--------
...Ä...?
00360016
0043F0FF


Any hints?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Feb 09, 2010 9:41 am    Post subject:
Reply with quote

Hello,

Suggest you look at this previous topic:
http://ibmmainframes.com/viewtopic.php?t=44194

or this one:
http://ibmmainframes.com/viewtopic.php?t=44520

You want PDC rather than PD.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts Conversion of a VB file to FB. isssal DFSORT/ICETOOL 1 Mon Oct 31, 2016 10:23 pm
No new posts EBCDIC to ASCII conversion using OCOPY mistah kurtz All Other Mainframe Topics 5 Tue Sep 06, 2016 2:26 pm
No new posts Comparex utility to Syncsort conversion mistah kurtz SYNCSORT 11 Fri Jul 22, 2016 1:53 pm
No new posts changing z/os unicode conversion service meykh2014 All Other Mainframe Topics 0 Tue Jul 12, 2016 10:49 am


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