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
 

 

PD TO ZD CONVERSION WITHOUT SIGN BIT

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
lanand_hps

New User


Joined: 05 Dec 2007
Posts: 82
Location: chennai

PostPosted: Thu Sep 24, 2009 9:06 pm    Post subject: PD TO ZD CONVERSION WITHOUT SIGN BIT
Reply with quote

Hi,
My requirement is to convert Packed decimal format to Zoned decimal format without sign. Im using the sort card-

OUTFIL FILES=01,REMOVECC,
HEADER1=(‘ XXXXXXXX ‘),
HEADER2=(02:C'DIV-ID',
08:C' BENANO',
17:C' ALRVL-SW',
29:C' ALRVL-OR',
41:C' PCS-SW',
53:C' PCS-OR',
65:C' PCH-SW',
77:C' PCH-OR',
89:C' PHRS-SW',
101:C' PHR-OR',
113:C' PHR-SW',
125:C' PHR-OR'),
OUTREC=(4:1,03,PD,TO=ZD,LENGTH=4,
09:05,05,PD,TO=ZD,LENGTH=9,
28:9,1,
40:10,1,
52:11,1,
62:12,02,PD,TO=ZD,LENGTH=3,
76:14,1,
86:15,02,PD,TO=ZD,LENGTH=3,
100:17,1,
112:18,1,
124:19,1,
136:20,1)
SORT FIELDS=COPY

I'm getting zoned decimal fields in signed format (123A instead of 1231).
I did read other forums regarding this and tried using EDIT, SFF but it did not work. Please advise.

Thanks,
Anand
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: Thu Sep 24, 2009 9:13 pm    Post subject:
Reply with quote

If you are getting a C sign for Zd instead of an F sign, then you're using Syncsort, not DFSORT. DFSORT gives an F sign for TO=ZD. Try using TO=ZDF. And since you're using Syncsort, please post in the JCL Forum, not in the DFSORT Forum.
Back to top
View user's profile Send private message
lanand_hps

New User


Joined: 05 Dec 2007
Posts: 82
Location: chennai

PostPosted: Thu Sep 24, 2009 9:27 pm    Post subject:
Reply with quote

Yeah.. Thanks Frank. It is SYNCSORT. Posted in JCL forum.
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: Thu Sep 24, 2009 9:33 pm    Post subject:
Reply with quote

Interesting. Even though you are using Syncsort, I gave you the solution (use TO=ZDF), but you ignored it.
Back to top
View user's profile Send private message
lanand_hps

New User


Joined: 05 Dec 2007
Posts: 82
Location: chennai

PostPosted: Fri Sep 25, 2009 9:45 am    Post subject:
Reply with quote

It is working.. Thanks Frank..
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 -> DFSORT/ICETOOL 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