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
 

 

Sort Card for sorting a file of length 766

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

New User


Joined: 10 Oct 2006
Posts: 29

PostPosted: Thu May 08, 2008 11:59 am    Post subject: Sort Card for sorting a file of length 766
Reply with quote

Hi,

Could you please help me in sorting a file with length 766 and put filler to make the LRECL as 1190.I wrote a sort card as below

Code:

   SORT FIELDS=COPY
   OUTREC FIELDS=(2,13,737,2,1175x)


The above SORT CARD made the LRECL as 1190 but did not copy the contents of the record.Only data in first 15 columns got written to a new sorted file.
Could anyone help to copy the entire content of file1 to file2 with the above requirement.
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu May 08, 2008 12:10 pm    Post subject:
Reply with quote

What does the fine manual say about the OUTREC statement.

You are taking 13 bytes from pos 2 and two bytes from pos 737 of the input, and then filling with blanks. Your output is what I would expect from that statement.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu May 08, 2008 12:14 pm    Post subject:
Reply with quote

Hi,
the outrec fields say

copy 13 bytes from pos 2
copy 02 bytes from pos 737
followed by 1175 spaces

hence the results are correct.


Gerry
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu May 08, 2008 12:17 pm    Post subject:
Reply with quote

Hi Expat,
I didn't try to steal your thunder, your answer wasn't posted when I replied.

Gerry
Back to top
View user's profile Send private message
ajay_udl

New User


Joined: 10 Oct 2006
Posts: 29

PostPosted: Thu May 08, 2008 12:17 pm    Post subject:
Reply with quote

Thanks expat,I got it
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu May 08, 2008 12:19 pm    Post subject:
Reply with quote

gcicchet wrote:
Hi Expat,
I didn't try to steal your thunder, your answer wasn't posted when I replied.
Gerry

No probs,
I have also fallen foul of the time delayed already responded response syndrome anomily icon_eek.gif
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 May 08, 2008 8:42 pm    Post subject:
Reply with quote

ajay_udl,

Well, people told you what was wrong with the control statements you used, but they didn't tell you the best way to do what you want to do which would be:

Code:

   OPTION COPY
   INREC OVERLAY=(1190:X)


If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:

www.ibm.com/servers/storage/support/software/sort/mvs/srtmpub.html
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 Sorting group data rajella DFSORT/ICETOOL 3 Sun Jan 22, 2017 11:32 pm
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm


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