IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

SORT file containing header records


 
IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
shanudarling
Warnings : 1

New User


Joined: 20 Dec 2006
Posts: 55
Location: noida

PostPosted: Thu Apr 03, 2014 5:03 am
Reply with quote

Hi,

I have an input file

Code:
     FILE1       
RECORDS NUMBER      
1111        ABC   
1110        LMN   
1121        PQR
1123        XYZ


My requirement is to sort this file on the basis of 1st four bytes after skipping the first 2 header records. After sort, the output file should look like -

The header records should also be written to the output file.

Code:
     FILE1       
RECORDS NUMBER      
1110        LMN   
1111        ABC   
1121        PQR
1123        XYZ


Please help.

Thanks.
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1566
Location: Andromeda Galaxy

PostPosted: Thu Apr 03, 2014 12:05 pm
Reply with quote

Try DATASORT

Code:
//STEP0100  EXEC  PGM=ICETOOL
//TOOLMSG   DD SYSOUT=*
//DFSMSG    DD SYSOUT=*
//IN        DD *
     FILE1
RECORDS NUMBER
1111        ABC
1110        LMN
1121        PQR
1123        XYZ
//OUT      DD  SYSOUT=*
//TOOLIN    DD *
  DATASORT FROM(IN) TO(OUT) HEADER(2) USING(CTL1)
//CTL1CNTL  DD *
  SORT FIELDS=(1,4,CH,A)
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 2507
Location: NY,USA

PostPosted: Fri Apr 04, 2014 6:42 am
Reply with quote

Hello,

As Pandora suggested the DATASORT , you can find more on such tricks by just clicking to the below link.

Use [URL] BBCode for Links

For your question please see chapter "Sort detail records between headers and trailers" in detail with examples and explaination as to how this works.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts Inserting records into the empty segm... IMS DB/DC 0
No new posts COBOL VS SORT Utility for file format... COBOL Programming 6
No new posts How to find which file contains my se... DFSORT/ICETOOL 6
No new posts IGZ0035S THERE WAS AN UNSUCCESSFUL OP... COBOL Programming 3
No new posts Hex Value - vb file replace old date ... DFSORT/ICETOOL 14

Back to Top