View previous topic :: View next topic
Author
Message
sudhirk63 New User Joined: 08 Oct 2006Posts: 19 Location: Bangalore
Hi,
I am trying to execute the below JCL , but I get the following error.
Code:
IEF142I E03123D COPY - STEP WAS EXECUTED - COND CODE 0012
IEF285I E03123.E03123D.JOB04932.D0000102.? SYSOUT
IEF285I E03123.E03123D.JOB04932.D0000101.? SYSIN
IGD104I E03123.DMASK.COPYLIB RETAINED, DDNAME=SYSUT2
IEF373I STEP/COPY /START 2006301.1504
IEF374I STEP/COPY /STOP 2006301.1504 CPU 0MIN 00.05SEC SRB 0MIN 00.00S
IEF375I JOB/E03123D /START 2006301.1504
IEF376I JOB/E03123D /STOP 2006301.1504 CPU 0MIN 00.05SEC SRB 0MIN 00.00S
DATA SET UTILITY - GENERATE
IEB311I CONFLICTING DCB PARAMETERS
The JCL is :
Code:
//E03123D JOB NOTIFY=&SYSUID
//COPY EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD *
FILENAME
/*
//SYSUT2 DD DSN=E03123.DMASK.COPYLIB(LX308T02),
// DISP=(SHR),
// SPACE=(TRK,(2,1),RLSE),
// DCB=(LRECL=44,BLKSIZE=440,RECFM=FB)
//SYSIN DD DUMMY
I want the literal 'FILENAME' to be written into the member LX308T02.
Can any one suggest, what I am doing wrong.
Thanks.
Sudhir
Back to top
Frank Yaeger DFSORT Developer Joined: 15 Feb 2005Posts: 7129 Location: San Jose, CA
Did you bother to look up the IEB311I message? Here's a link to it:
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2M751/SPTM008141
Bullet 3 is your problem. Your input has LRECL=80, but your output has LRECL=44. I believe IEBGENER has control statements that would allow you to truncate the records. Or you could just use this DFSORT job:
Code:
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
FILENAME
/*
//SORTOUT DD DSN=E03123.DMASK.COPYLIB(LX308T02),
// DISP=(SHR),
// SPACE=(TRK,(2,1),RLSE),
// DCB=(LRECL=44,BLKSIZE=440,RECFM=FB)
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,44)
/*
Back to top
Please enable JavaScript!