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

Limit the number of registers copied in my sort


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

New User


Joined: 23 Feb 2007
Posts: 3
Location: S?o Paulo - Brazil

PostPosted: Tue Mar 27, 2007 11:19 pm
Reply with quote

Hi,

This is my first post in here!

I want to limit the number of registers copied in my sort!
For Example: The archive in (Sortin) has 50 registers and my archive out (sortout) must have the fisrt 20.

Thanks.
I'm Brazilian Guy! Sorry for english!
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 Mar 27, 2007 11:29 pm
Reply with quote

Paulo,

If you want to sort the records and output the first 20 sorted records, you can use this DFSORT job:

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file
//SORTOUT DD DSN=...  output file
//SYSIN    DD    *
  SORT FIELDS=(p,m,f,s)
  OUTFIL ENDREC=20
/*


p,m,f,s is the starting position, length, format and sequence, e.g. 1,10,CH,A

If you just want to get the first 20 records in the input file, you can use this DFSORT job:

Code:

//S2    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file
//SORTOUT DD DSN=...  output file
//SYSIN    DD    *
  OPTION COPY,STOPAFT=20
/*


If you want to do something else, please explain in more detail what you want to do and show an example of your input records and expected output records.

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:

Use [URL] BBCode for External Links
Back to top
View user's profile Send private message
Paulo Roberto Schiavon

New User


Joined: 23 Feb 2007
Posts: 3
Location: S?o Paulo - Brazil

PostPosted: Tue Mar 27, 2007 11:39 pm
Reply with quote

Frank Yaeger, thanks!
Your suggest is very good.
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 convert and use 1 bit hex-numb... COBOL Programming 10
This topic is locked: you cannot edit posts or make replies. Sort to include records of file 2 int... Java & MQSeries 1
No new posts Converting unpacked fields to pack us... SYNCSORT 4
No new posts SORT for dynamic trailer record + CSV... DFSORT/ICETOOL 14
No new posts Merge a variable number of records fr... DFSORT/ICETOOL 5
Search our Forums:

Back to Top