View previous topic :: View next topic
|
Author |
Message |
itzphaniz
New User
Joined: 02 Sep 2005 Posts: 39
|
|
|
|
My Input file is
Code: |
VOLSER------------PQP202 DEVTYPE------X'3010200F' |
This is VBA file with LRECL = 125
My output file should be a FB with LRECL 80.
Code: |
VOLSER------------PQP202 |
I'm trying to use this the below JCL.
Code: |
//STEPSR EXEC PGM=SYNCSORT
//SORTIN DD DSN=Input File,DISP=SHR
//SORTOUT DD DSN=OUTPUT File,
// DISP=(NEW,CATLG,DELETE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=8000),
// SPACE=(TRK,(10,10),RLSE),
// UNIT=SYSDA
//SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:1,4,12:5,24,45C' ')
/*
|
These are the WER messages that I'm getting.
Code: |
WER108I SORTIN : RECFM=VBA ; LRECL= 125; BLKSIZE= 27998
WER237I OUTREC RECORD LENGTH = 80
WER202A SORTOUT RECFM INCOMPATIBLE
WER110I SORTOUT : RECFM=FB ; LRECL= ; BLKSIZE=
WER462I OUTPUT LRECL DIFFERS FROM SORTOUT LRECL
WER247A SORTOUT HAS INCOMPATIBLE LRECL |
SORTOUT length is 80, so is OUTREC record length? Then why is OUTREC LRECL different from SORTOUT LRECL.
Any help would be deeply appreciated. |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
There's a similar topic here. |
|
Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007 Posts: 496 Location: USA
|
|
|
|
Try this:
Code: |
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=INPUT.FILE
//SORTOUT DD DSN=OUTPUT.FILE,DISP=(NEW,CATLG),
// UNIT=SYSDA, SPACE=(CYL,1),DCB=(RECFM=FB)
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(5,24,56X),CONVERT
/*
|
|
|
Back to top |
|
|
|
|