|
|
| Author |
Message |
adarsh.bhalke
New User
Joined: 06 May 2007
Posts: 17
Location: pune
|
|
|
|
I have two files, the input file is of 2000 LRECL and the output is of 2100 LRECL.
I want to copy the first 1000 bytes from the input file to the output, next 100 bytes of the output file should be spaces (I don't want to write anything) and the remaining 1000 bytes should contain the last 1000 bytes from the input file. |
|
| Back to top |
|
 |
References
|
 Posted: Fri May 16, 2008 5:34 pm Post subject: Re: Reformating of the input file |
|
|
|
|
enrico-sorichetti
Global Moderator
Joined: 14 Mar 2007
Posts: 2655
Location: italy
|
|
|
|
did You try searching the forums for "dfsort record reformatting",
there are lots of threads on the topic  |
|
| Back to top |
|
|
Sachinrethin
New User
Joined: 12 Oct 2007
Posts: 1
Location: Chennai
|
|
|
|
Hi,
The below sort card will solve your requirement,
| Code: |
SORT FIELDS=COPY
OUTREC FIELDS=(1,1000,100X,1001,1000)
|
I hope it helps! |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005
Posts: 4391
Location: San Jose, CA
|
|
|
|
adarsh.bhalke,
Here's a DFSORT job that will do what you asked for:
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=.... input file (FB/2000)
//SORTOUT DD DSN=... output file (FB/2100)
//SYSIN DD *
OPTION COPY
OUTREC BUILD=(1,1000,1101:1001,1000)
/*
|
|
|
| Back to top |
|
|
|
|
