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

Copy detailied records from input


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dharmarao.katkuri
Currently Banned

New User


Joined: 11 Dec 2006
Posts: 5
Location: chennai

PostPosted: Thu Nov 20, 2008 6:49 pm
Reply with quote

I have input file as

input file:-
header
1111
2222
3333
4444.

ouput file:
1111
2222
3333
4444.

I want to copy only the records starting from 1111 to 4444 to the ouput file. I have to skip the header record. I dont know how the header record will be.
Back to top
View user's profile Send private message
Skolusu

Senior Member


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

PostPosted: Thu Nov 20, 2008 10:31 pm
Reply with quote

dharmarao.katkuri,

Assuming that your first record is the header record , the following DFSORT JCL will give you the desired results

Code:

//STEP0100 EXEC PGM=ICEMAN   
//SYSOUT   DD SYSOUT=*       
//SORTIN   DD *             
HEADER                       
1111                         
2222                         
3333                         
4444.                       
//SORTOUT  DD SYSOUT=*       
//SYSIN    DD *             
  OPTION COPY,SKIPREC=1     
//*
Back to top
View user's profile Send private message
dharmarao.katkuri
Currently Banned

New User


Joined: 11 Dec 2006
Posts: 5
Location: chennai

PostPosted: Fri Nov 21, 2008 5:12 pm
Reply with quote

Thanks !!!! Kolusu icon_smile.gif
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 Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Pulling a fixed number of records fro... DB2 2
No new posts VB to VB copy - Full length reached SYNCSORT 8
No new posts force tablespace using LISTDEF input DB2 1
Search our Forums:

Back to Top