|
View previous topic :: View next topic
|
| Author |
Message |
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Hi All,
I'm Using Syncsort 1.3.1.
Requirement is to fetch the records without any '-' or ',' or')'.
I tried using this with SYNCSORT---->
| Code: |
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL OUTREC=(21,1,CHANGE=(1,C',',C' ',
C')',C' ',
C'-',C' ')) |
But got an error---------->
| Code: |
SYSIN :
SORT FIELDS=COPY
OUTFIL OUTREC=(21,1,CHANGE=(1,C',',C'R '))
WER276B SYSDIAG= 2930, 179177, 179177, 1064317
WER164B 6,916K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1M BYTES USED
WER108I SORTIN : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER110I SORTOUT : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER247A SORTOUT HAS INCOMPATIBLE LRECL
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE |
INPUT
BL7314.TEST.VBMF.SE.BEFORE
BL7314.TEST.VTCX.SE)
BL7314.TEST.VBMF.SE.BEFORE
BL7314.TEST.VTCX.SE
BL7314.TEST1.*.KE)) -
BL7314.TEST1.AM*.KE) -
BL7314.TEST1.AMHS.KE)) -
BL7314.TEST1.AMHS.KE)) -
BL7314.TEST1.*.KE)
BL7314.TEST1.*.KE.DDDMMYY)
BL7314.TEST1.*.S1.KE)
BL7314.TEST1.*.S1.KE.DDDMMYY)
BL7314.TEST1.*.S2.KE)
BL7314.TEST1.*.S2.KE.DDDMMYY)
BL7314.TEST1.AMHS.KE)) -
BL7314.TEST1.AMHS.KE,
BL7314.TEST1.AM4A.DWH.KE))
BL7314.TEST2.AM*.KE)) -
BL7314.TEST2.**) -
BL7314.TEST2.AM*.SA.KE)
BL7314.TEST2.AMSS.SA.KE,
OUTPUT
BL7314.TEST.VBMF.SE.BEFORE
BL7314.TEST.VTCX.SE
BL7314.TEST.VBMF.SE.BEFORE
BL7314.TEST.VTCX.SE
BL7314.TEST1.*.KE
BL7314.TEST1.AM*.KE
BL7314.TEST1.AMHS.KE
BL7314.TEST1.AMHS.KE
BL7314.TEST1.*.KE
BL7314.TEST1.*.KE.DDDMMYY
BL7314.TEST1.*.S1.KE
BL7314.TEST1.*.S1.KE.DDDMMYY
BL7314.TEST1.*.S2.KE
BL7314.TEST1.*.S2.KE.DDDMMYY
BL7314.TEST1.AMHS.KE
BL7314.TEST1.AMHS.KE
BL7314.TEST1.AM4A.DWH.KE
BL7314.TEST2.AM*.KE
BL7314.TEST2.**
BL7314.TEST2.AM*.SA.KE
BL7314.TEST2.AMSS.SA.KE
The LRECL of both the files are same.
What could be the possibility of this error?
. |
|
| Back to top |
|
 |
superk
Global Moderator

Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
What does the manual say about the message:
WER247A SORTOUT HAS INCOMPATIBLE LRECL |
|
| Back to top |
|
 |
bipinpeter
Active User
.jpg)
Joined: 18 Jun 2007 Posts: 213 Location: Cochin/Kerala/India
|
|
|
|
Hi himanshu7,
i think Problem is that in outfile outrec ,you didnt mention the complete 64 byte data.
Try the below code
SORT FIELDS=COPY
OUTFIL OUTREC=(1,20,21,1,CHANGE=(1,C',',C' ',
C')',C' ',
C'-',C' '),22,43)
Bipin |
|
| Back to top |
|
 |
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Hi Bipin,
I tried the above mentioned solution but its not working...  |
|
| Back to top |
|
 |
shankar.v
Active User
Joined: 25 Jun 2007 Posts: 196 Location: Bangalore
|
|
|
|
Hi himanshu7,
Please check with the following code for your requirement.
| Code: |
//SYSIN DD *
OPTION COPY
ALTSEQ CODE=(5D40,6040,6B40)
INREC FIELDS=(1,64,TRAN=ALTSEQ) |
Thanks,
Shankar |
|
| Back to top |
|
 |
shankar.v
Active User
Joined: 25 Jun 2007 Posts: 196 Location: Bangalore
|
|
|
|
Hi,
| Quote: |
What does the manual say about the message:
WER247A SORTOUT HAS INCOMPATIBLE LRECL |
Explanation for WER247A from SYNCSORT documentation:
| Quote: |
WER247A ddname HAS INCOMPATIBLE LRECL
EXPLANATION: The ddname will be SORTOUT, SORTOFxx, SORTOFx
or the ddname provided by an OUTFIL FNAMES parameter. There is a
conflict between the LRECL specification for the indicated output
file and either the post-OUTFIL or post-OUTREC record length.
Padding of records is not permitted after OUTFIL processing, so
the LRECL may not be greater than the post-OUTFIL record length.
Alter- nately, truncation of records is not permitted after the
OUTREC state- ment or the OUTFIL OUTREC processing, so the LRECL
may not be less than the post-OUTREC record length. |
Thanks,
Shankar |
|
| Back to top |
|
 |
bipinpeter
Active User
.jpg)
Joined: 18 Jun 2007 Posts: 213 Location: Cochin/Kerala/India
|
|
|
|
Hi himanshu7,
Please check the LREL given in the JCL
Bipin Peter |
|
| Back to top |
|
 |
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Thanks Shankar,
Bipin the error is not because of the LRECL.Please check the log posted. |
|
| Back to top |
|
 |
bipinpeter
Active User
.jpg)
Joined: 18 Jun 2007 Posts: 213 Location: Cochin/Kerala/India
|
|
|
|
Is it because of mismatch in record lengthgs between JCL and SORT card?
Bipin |
|
| Back to top |
|
 |
expat
Global Moderator

Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
| himanshu7 wrote: |
Thanks Shankar,
Bipin the error is not because of the LRECL.Please check the log posted. |
If that really were the case then maybe SYNCSORT might have issued a different message.
All the evidence points to this being the problem, however there appears to be the second problem of you not believing what SYNCSORT and everyone else is telling you.
So is it SYNCSORT that is wrong, or perhaps ........ is it YOU
Please demonstrate the proof of your statement |
|
| Back to top |
|
 |
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
| Quote: |
So is it SYNCSORT that is wrong, or perhaps ........ is it YOU
Please demonstrate the proof of your statement |
Please check with the same LRECL the code with little alteration worked fine.
| Code: |
SYSIN :
OPTION COPY
INREC FIELDS=(28,1,CHANGE=(13,C'-',C' '),
NOMATCH=(C'NOT SUPPORTED'),8X)
WER108I SORTIN : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER257I INREC RECORD LENGTH = 21
WER110I SORTOUT : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER462I OUTPUT LRECL DIFFERS FROM SORTOUT LRECL
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER054I RCD IN 4, OUT 4
WER169I RELEASE 1.3 BATCH 0488 TPF LEVEL 1.0
WER052I END SYNCSORT -
SEARCH1,STEP003,,DIAG=A800,7384,8004,004C,E0FA,4C8B,02 |
Hi Bipin,
| Quote: |
OUTFIL OUTREC=(1,20,21,1,CHANGE=(1,C',',C' ',
C')',C' ',
C'-',C' '),22,43) |
Is this code working on your machine? |
|
| Back to top |
|
 |
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007 Posts: 496 Location: USA
|
|
|
|
| himanshu7 wrote: |
Hi All,
I'm Using Syncsort 1.3.1.
Requirement is to fetch the records without any '-' or ',' or')'.
I tried using this with SYNCSORT---->
| Code: |
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL OUTREC=(21,1,CHANGE=(1,C',',C' ',
C')',C' ',
C'-',C' ')) |
But got an error---------->
| Code: |
SYSIN :
SORT FIELDS=COPY
OUTFIL OUTREC=(21,1,CHANGE=(1,C',',C'R '))
WER276B SYSDIAG= 2930, 179177, 179177, 1064317
WER164B 6,916K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1M BYTES USED
WER108I SORTIN : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER110I SORTOUT : RECFM=FBA ; LRECL= 64; BLKSIZE= 27968
WER247A SORTOUT HAS INCOMPATIBLE LRECL
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE |
The LRECL of both the files are same.
What could be the possibility of this error?
|
First of all, the control cards originally posted do not match the SyncSort message output. These are not from the same execution of the job.
Second, there is an error in the following statement:
| Code: |
| OUTFIL OUTREC=(21,1,CHANGE=(1,C',',C'R ')) |
You cannot have a length of 1 for the CHANGE field if you specify the replacement as 'R ' which has a length of 2.
If you are still encountering difficulties with this application, please contact me offline at [email protected] with the complete job listing as a text attachment and I would be happy to assist you further. |
|
| Back to top |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|