View previous topic :: View next topic
|
Author |
Message |
revdpoel
New User
Joined: 01 Nov 2006 Posts: 56
|
|
|
|
Hai
I have a file with 4 recordcodes (first position), FB 80
recordcode 0 = header-record
recordcode 1 = data-record
recordcode 2 = data-record
recordcode 9 = trailer-record
recordcode 2 must be converted to recordcode 1
So input
0200901
1bbaa
1ccdd
2eerr
900005
output
0200901
1bbaa
1ccdd
1eerr
900005
How do I do that?
thanx |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Here's a DFSORT job that will do what you asked for:
Code: |
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (FB/80)
//SORTOUT DD DSN=... output file (FB/80)
//SYSIN DD *
OPTION COPY
INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'2'),OVERLAY=(1:C'1'))
/*
|
|
|
Back to top |
|
|
revdpoel
New User
Joined: 01 Nov 2006 Posts: 56
|
|
|
|
it works
thanx |
|
Back to top |
|
|
|