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
 

 

Icetool Resize

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

New User


Joined: 11 Jun 2007
Posts: 50
Location: Euro

PostPosted: Mon Jul 23, 2012 6:43 pm    Post subject: Icetool Resize
Reply with quote

Hi,
I am using the below jcl

Code:

//STEP EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=* 
//DFSMSG   DD SYSOUT=* 
//IN   DD *                                 
Data1(contain spaces till 80)
Data2(contain spaces till 80)                           
//OUT  DD DISP=OLD,DSN=file-FB_lrec/80   
//TOOLIN DD *                               
  RESIZE FROM(IN) TO(OUT) TOLEN(50) 
in the output file my records are getting padded with non-printable characters from 50 to 80 position.
I have corrected the problem, but could anyone help me to understand,what may have gone wrong with this one, or this normal.
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Mon Jul 23, 2012 8:03 pm    Post subject:
Reply with quote

One of the first suggestion is - please remove LRECL=80 from the DCB of OUT file, it is there. If it is not, I doubt if you shuould run in to this problem, at first place.

And when you say
Quote:
I have corrected the problem
what exactly do you do?
Back to top
View user's profile Send private message
knickraj
Warnings : 1

New User


Joined: 11 Jun 2007
Posts: 50
Location: Euro

PostPosted: Mon Jul 23, 2012 8:43 pm    Post subject:
Reply with quote

Quote:
One of the first suggestion is - please remove LRECL=80 from the DCB of OUT file, it is there. If it is not, I doubt if you shuould run in to this problem, at first place.


Didnt understand what you meant..
the outfile is already existing file with record length 80 and is FB.


Quote:
what exactly do you do?

used the below control card.
Code:
outfil build=(1,50,30x)



But I wanted to know is this expected, as I was thinking it should be padded with spaces.... icon_rolleyes.gif
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: Mon Jul 23, 2012 8:52 pm    Post subject:
Reply with quote

Hello,

If you do not tell the process to pad with spaces, why would it do so?

Your 30X told the process to pad with 30 spaces.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7308

PostPosted: Mon Jul 23, 2012 9:03 pm    Post subject: Reply to: Icetool Resize
Reply with quote

As has been indicated, if you want to organise your data into chunks of 50 but record them in an 80-byte record, then you should specifically pad with something, like blanks. You could look at the effect of replacing the 30X by 80:X. Let us know what happens, and why.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Mon Jul 23, 2012 9:14 pm    Post subject:
Reply with quote

knickraj wrote:

But I wanted to know is this expected, as I was thinking it should be padded with spaces.... icon_rolleyes.gif


Your RESIZE operator is creating a fix length file of 50 bytes and you want to put that data into 80 byte file. DFSORT pads fixed-length records with binary zeros on the right when the SORTOUT LRECL is larger than the SORTIN LRECL

This is documented here

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ice1ca60/1.8.3.2
Back to top
View user's profile Send private message
knickraj
Warnings : 1

New User


Joined: 11 Jun 2007
Posts: 50
Location: Euro

PostPosted: Tue Jul 24, 2012 4:05 pm    Post subject:
Reply with quote

thanks for your help
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 Converting decimal to numeric using I... Balaryan DFSORT/ICETOOL 4 Thu Feb 02, 2017 11:27 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts ICETOOL/SYNCSORT - SYSPRINT output nartcr DFSORT/ICETOOL 17 Wed Oct 05, 2016 10:46 pm
No new posts Icetool or Joinkeys example to compar... ishant chauhan DFSORT/ICETOOL 21 Sat Aug 20, 2016 2:40 am
No new posts ICETOOL higher option Anshul Das DFSORT/ICETOOL 14 Thu Apr 14, 2016 8:00 am


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