vin12pr Warnings : 1 New User
Joined: 14 Jun 2006 Posts: 56
|
|
|
|
Hi,
I have a VB file if LreCL 656 and i want to generate one more VB file by copying in the data from 56th position onwards from the input file.My o/p VB file is if Lrecl 604.When i try to do the same using OUTREC i am getting some problem or the other like RDW error or record length out of range.etc.
Kindly advise me on how to acheive this as I am stucked up in this.
Thanks in advance
Regards,
Vin12pr |
|
vin12pr Warnings : 1 New User
Joined: 14 Jun 2006 Posts: 56
|
|
|
|
jcl :
Code: |
// job
//SORT2 EXEC PGM=SORT,PARM='SIZE(MAX)'
//SORTLIST DD SYSOUT=Y
//SYSOUT DD SYSOUT=Y
//SORTIN DD DISP=SHR,DSN=IVPS.TEST.DATA
//SORTOUT DD DSN=COM.NM.IVPS.HIST.BKUP1,
// DISP=(NEW,CATLG,DELETE),
// DCB=(LRECL=604,RECFM=VB,BLKSIZE=27998)
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:1,4,C'RDW=',
56:5,550)
/* |
Error:
Code: |
SYSIN :
SORT FIELDS=COPY 0027000
OUTREC FIELDS=(1:1,4,C'RDW=', 0027100
56:5,549)
WER276B SYSDIAG= 1139318, 5931281, 5931281, 7665703
WER164B 7,408K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 2,310,800 BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 656; BLKSIZE= 27998
WER237I OUTREC RECORD LENGTH = 604
WER110I SORTOUT : RECFM=VB ; LRECL= 604; BLKSIZE= 27998
WER410B 5,868K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 2,163,344 BYTES USED
WER244A OUTREC - SHORT RECORD
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000 |
Thanks.
Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj |
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Code: |
WER244A OUTREC - SHORT RECORD |
This means, a variable length record was too short to contain all the fields specified on the control statement -- you need to check on OUTREC statements if you really want "those" records in output. Otherwise show us sample input and expected output from that. |
|