View previous topic :: View next topic
|
Author |
Message |
adarsh.bhalke
New User
Joined: 06 May 2007 Posts: 16 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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 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: 21 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 Developer
Joined: 15 Feb 2005 Posts: 7129 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 |
|
|
|