View previous topic :: View next topic
|
Author |
Message |
skrishnavijay
New User
Joined: 26 Sep 2007 Posts: 25 Location: chennai
|
|
|
|
Hi,
My file format is as follows.
RECFM=VB,LRECL=3000
09949493940.............NHDFJFK0916000098EPT4949489349.......
I want to copy the above file by changing EPT4(comes at position 580) to EPT2. Else is same.
Could anybody help me in this regard ? |
|
Back to top |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007 Posts: 1287 Location: Chennai, India
|
|
|
|
Krishna,
Quote: |
I want to copy the above file by changing EPT4(comes at position 580) to EPT2. Else is same. |
Use INREC and BUILD/OVERLAY for your requirement. As it is VB make sure to include 4 bytes for RDW. |
|
Back to top |
|
|
acevedo
Active User
Joined: 11 May 2005 Posts: 344 Location: Spain
|
|
|
|
or use the CHANGE option in OUTREC. |
|
Back to top |
|
|
skrishnavijay
New User
Joined: 26 Sep 2007 Posts: 25 Location: chennai
|
|
|
|
Hi,
I have the following problem
my SYSIN card
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,583,584,4,CHANGE=(4,C'EPT4',C'EPT2'),588,2413)
/*
I am getting error as
SORTIN : RECFM=VB ; LRECL= 3000; BLKSIZE= 27988
OUTREC RECORD LENGTH = 3000
SORTOUT : RECFM=VB ; LRECL= 3000; BLKSIZE= 27998
OUTREC - SHORT RECORD |
|
Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007 Posts: 496 Location: USA
|
|
|
|
skrishnavijay,
If you do not have any records shorter than 588, then you can use the following:
Code: |
OUTREC FIELDS=(1,583,584,4,CHANGE=(4,C'EPT4',C'EPT2'),588)
|
However, if you do not know the length of your shortest record, you can use HISTOGRM to determine this. |
|
Back to top |
|
|
|