View previous topic :: View next topic
|
Author |
Message |
sharad_shanu
New User
Joined: 03 Oct 2006 Posts: 40
|
|
|
|
Can anyone tell me how to write a sort job to insert a sequence number in the Input file in first three positions and your name in the 20th Position.
Sharad Srivastava |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Sharad,
Please show an example of the records in your input file and what you expect for the output records.
Give the RECFM and LRECL of the input file. |
|
Back to top |
|
|
Ganesh.Deokar
New User
Joined: 30 Sep 2005 Posts: 26 Location: Buffalo,NY
|
|
|
|
Try this:
Code: |
//SRT80301 EXEC PGM=SORT
//*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//SORTIN DD DSN=YOUR.INPUT.FILE,DISP=SHR
//SORTOUT DD DSN=YOUR.OUTPUT.FILE,
// DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(1,1),RLSE),
// DCB=*.SORTIN
//*
//SYSIN DD *
OUTREC FIELDS=(1:SEQNUM,3,ZD,
4:4,16,
20:C'your name')
SORT FIELDS=COPY
/* |
I have considered "your name" as the last field in your file and have fixed length. |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Ganesh,
You are overlaying the first three bytes of the record with the sequence number. How do you know that's what the OP wanted? Given that the OP said "insert", I'd assume that the OP doesn't want to overlay the data. But it's not clear exactly what the OP does want. That's why I asked for an example of input and output to clarify what's wanted.
Please don't take wild guesses without explaining your assumptions as it just confuses people. |
|
Back to top |
|
|
|