Page 1 of 1

IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 11:10 am
by mainframes_6002
i am trying to create two records in a new pds 'TEST' and inside the member 'M1' using IEBGENER

000001 //MATRB74 JOB (ACCTINFO),'COMMENT',NOTIFY=&SYSUID,
000002 // CLASS=C,MSGCLASS=H,MSGLEVEL=(1,1)
000003 //STEP1 EXEC PGM=IEBGENER
000004 //SYSPRINT DD SYSOUT=*
000005 //SYSUT1 DD *
000006 FIRST RECORD
000007 SECOND RECORD
000008 //SYSUT2 DD DSN=MATRB743.COBOL.TEST(M1),DISP=(NEW,CATLG,CATLG),
000009 // SPACE=(TRK,(3,2,1),RLSE),
000010 // DCB=(LRECL=80,RECFM=FB,BLKSIZE=800),
000011 // UNIT=SYSDA
000012 //*SYSIN DD *
000013 //*

COBRUN:
IEBGENER Utility Version 4.21 Release R9

SYSUT1 and SYSUT2 must be supplied

IEBGENER Return Code : 12

PLZ SUGGEST THE SOLUTION

Re: IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 11:32 am
by dick scherrer
Hello,

What happened when you ran this?

Why is the SYSIN DD * commented out - SYSIN DD DUMMY works for what you want.

Suggest you pre-allocate the PDS and then add the member separately. Your JCL does not define a PDS, but rather a qsam data set. Remember - a PS contains directlry blocks.

Re: IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 11:40 am
by mainframes_6002
000001 //MATRB74 JOB (ACCTINFO),'COMMENT',NOTIFY=&SYSUID,
000002 // CLASS=C,MSGCLASS=H,MSGLEVEL=(1,1)
000003 //STEP1 EXEC PGM=IEBGENER
000004 //SYSPRINT DD SYSOUT=*
000005 //SYSUT1 DD *
000006 FIRST RECORD
000007 SECOND RECORD
000008 //STEP2 EXE PGM=IEFBR14
000009 //SYSUT2 DD DSN=MATRB743.COBOL.TEST(M1),DISP=(NEW,CATLG,CATLG),
000010 // SPACE=(TRK,(3,2,1),RLSE),
000011 // DCB=(LRECL=80,RECFM=FB,BLKSIZE=800),
000012 // UNIT=SYSDA
000013 //SYSIN DD DUMMY

*cobrun******************************** Top of D
IEBGENER Utility Version 4.21 Release R9

SYSUT1 and SYSUT2 must be supplied

IEBGENER Return Code : 12

Re: IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 3:34 pm
by expat
The first JCL posted does not match the second JCL posted.

Suggest you post OUTPUT in addition to input.

Also learn very quickly to use the code tags available on this forum.

Re: IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 3:52 pm
by Akatsukami
mainframes_6002 wrote:
000001 //MATRB74   JOB (ACCTINFO),'COMMENT',NOTIFY=&SYSUID,
000002 //              CLASS=C,MSGCLASS=H,MSGLEVEL=(1,1)
000003 //STEP1      EXEC PGM=IEBGENER
000004 //SYSPRINT   DD SYSOUT=*
000005 //SYSUT1     DD *
000006 FIRST RECORD
000007 SECOND RECORD
000008 //STEP2      EXE PGM=IEFBR14
000009 //SYSUT2     DD DSN=MATRB743.COBOL.TEST(M1),DISP=(NEW,CATLG,CATLG),
000010 //             SPACE=(TRK,(3,2,1),RLSE),
000011 //             DCB=(LRECL=80,RECFM=FB,BLKSIZE=800),
000012 //             UNIT=SYSDA
000013 //SYSIN     DD DUMMY


*cobrun******************************** Top of D
IEBGENER Utility Version 4.21 Release R9

SYSUT1 and SYSUT2 must be supplied

IEBGENER Return Code : 12

Either you re-typed (incorrectly) your JCL instead of copy-and-pasting it, or card 8 is bogus and your alleged output bears no relation to it. Either way, stop providing snippets of misinformation in the wrong format.

Re: IEBGENER USAGE

PostPosted: Mon Dec 05, 2011 11:09 pm
by dick scherrer
Even with help given here TS decided to post in at least one other forum.

This topic is now being locked.

d