View previous topic :: View next topic
Author
Message
sudheer_kumar New User Joined: 27 Dec 2005Posts: 16
I want to convert a sequential data set to PDS. I am using IEBGENER utility....
Code:
//STEP050 EXEC PGM=IEBGENER
//SYSUT1 DD DSN=XX2.INPUT.FILE.DT1227,DISP=SHR
//SYSUT2 DD DSN=XX2.OUTOUTI.FILE1.DT1227,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(2,2),RLSE),
// DCB=(LRECL=80,BLKSIZE=0,RECFM=FB,DSORG=PS)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
GENERATE MAXNAME=1,MAXGPS=1
MEMBER NAME=MEMBER1
GROUP1 RECORD IDENT=(8,'FIRSTMEM',1)
//
XX2.INPUT.FILE.DT1227 is the input file. The file contents are shown below
===============================================
FIRSTMEM
FIRSTMEM
FIRSTMEM
FIRSTMEM
FIRSTMEM
FIRSTMEM
FIRSTMEM
FIRSTMEM
When I run this Job. I will get an error(MAXCC=12 CN(INTERNAL)). Why this error occurs?
Is there any error in the input file layout or JCL ?
Back to top
Gautam512 Active User Joined: 05 Oct 2005Posts: 308 Location: Vizag / US
try giving the member name in braces where you're creating the output dataset.
Not sure but try this once........
thanx,
Gau
Back to top
jon_s_rice Active User Joined: 24 Mar 2005Posts: 102 Location: Douglasville, GA USA
Back to top
bhaskar_157 New User Joined: 27 Dec 2005Posts: 3
Code:
//STEP050 EXEC PGM=IEBGENER
//SYSUT1 DD DSN=H0019AJ.SEQ.DATA,DISP=SHR
//SYSUT2 DD DSN=H0019AJ.SEQ.OUTDATA2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SMS,
// SPACE=(CYL,(2,2,5),RLSE),
// DCB=(LRECL=80,BLKSIZE=800,RECFM=FB)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
GEN1 GENERATE MAXNAME=1,MAXGPS=1
MEM1 MEMBER NAME=MEMBER1
GRP1 RECORD IDENT=(8,'FIRSTMEM',1)
/*
//*1 GENERATE MAXNAME=1,MAXGPS=1
//*1 MEMBER NAME=MEMBER1
//*1 GROUP1 RECORD IDENT=(8,'FIRSTMEM',1)
//
Back to top
Please enable JavaScript!