|
View previous topic :: View next topic
|
| Author |
Message |
sudhirk63
New User
Joined: 08 Oct 2006
Posts: 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 2005
Posts: 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 |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
