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

alternate records frominput file


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
i413678
Currently Banned

Active User


Joined: 19 Feb 2005
Posts: 112
Location: chennai

PostPosted: Thu Feb 02, 2006 7:17 pm
Reply with quote

Hi,

I want to split a data set in such a way that one file should contain all even number records and the second file should contain all the odd number records means like below.............

if input file has records like
1 2 3 4 5 6 7 8 9 10 11 12.....................like so on and so forth

I need to split this file as below......

first file should have
1 3 5 7 9 ...................records like

and

second file should have
2 4 6 8 10 12 ....................records like

thx in adv..................

pavan
Back to top
View user's profile Send private message
rajesh_1183

Active User


Joined: 24 Nov 2005
Posts: 121
Location: Tadepalligudem

PostPosted: Thu Feb 02, 2006 7:34 pm
Reply with quote

Quote:
1 2 3 4 5 6 7 8 9 10 11 12.....................like so on and so forth

is this a single record...???? icon_question.gif or ur record organization is
1
2
3
4
5
.
.
.


Rajesh...
Back to top
View user's profile Send private message
rajandhla

Active User


Joined: 18 Oct 2005
Posts: 182
Location: Luton UK

PostPosted: Thu Feb 02, 2006 9:18 pm
Reply with quote

//SYSIN DD *

SORT FIELDS=COPY
OUTFIL FILES=(1,2),SPLIT
/*


After executing this sort job with this sysin, every 1 and 2nd records will go into output files respectively.(there should be two output files specified.

Regards
Jai
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: Thu Feb 02, 2006 10:37 pm
Reply with quote

pavan,

Expanding on jai's response, you can use a DFSORT job like this to do what you asked for:

Code:

//S1    EXEC  PGM=ICEMAN                 
//SYSOUT    DD  SYSOUT=*                 
//SORTIN DD DSN=... input file                             
//ODD DD DSN=...  output file1 (odd records)                         
//EVEN DD DSN=...  output file2 (even records)                       
//SYSIN DD *                             
  SORT FIELDS=COPY                       
  OUTFIL FNAMES=(ODD,EVEN),SPLIT         
/*                                       
Back to top
View user's profile Send private message
i413678
Currently Banned

Active User


Joined: 19 Feb 2005
Posts: 112
Location: chennai

PostPosted: Fri Feb 03, 2006 2:18 pm
Reply with quote

Hi All,

Thank you one and all for promt reply.....

bye 4 now......

pavan
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 1
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
Search our Forums:

Back to Top