Can i create a gdg with IEFBR14 utility

knd_r · New User Joined: 18 Mar 2005 Posts: 48

hi,

can i create a gdg with iefbr14 utility?

bye,
ks reddy.

subhasis_50 · Moderator Joined: 09 Mar 2005 Posts: 363 Location: Earth

Hi,
Yes, you can.
See the following code:
//GDGCRT EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DEFINE GENERATIONDATAGROUP -
(NAME(TEST.GDG.FILE1) -
LIMIT(10))
/*

MGIndaco · Posted: Mon May 23, 2005 2:26 pm

I don't think that you can create a generation data group with IEFBR14. The only utility that can be used, in my opinion and for the IBM Manuals, is the IDCAMS.
IEFBR14 can be used to allocate one new version or delete an existing version but not to define his root.

If you run the sample above you will receive a RC=0 but only for the reason that IEFBR14 allow you to test if your JCL is correct or not.
You can use IEFBR14 also for a SORT or other thing but only for a JCL Test!
But I can be wrong!

subhasis_50 · Moderator Joined: 09 Mar 2005 Posts: 363 Location: Earth

Hi MGIndaco,
We can use IEFBR14 for GDG creation. We are using it, and it is working fine.

MGIndaco · Posted: Mon May 23, 2005 3:50 pm

I don't know why it works...for me is a mystery!
But..this is neither the first nor the last time that I'm wrong...

superk · Posted: Mon May 23, 2005 5:50 pm

MGIndaco, you are not wrong. There is no way the IEFBR14 code given can work, as I have verified with a test at my site. The IEFBR14 program does not perform any file I/O operations, so it can't possibly open and process the commands provided in the SYSIN DD. Also, there can't possibly be any output in the SYSPRINT DD.

subhasis_50, I would like to see a sample of the SYSPRINT output from your job. If any of the messages start with IDC*, then you are executing the IDCAMS program.

subhasis_50 · Moderator Joined: 09 Mar 2005 Posts: 363 Location: Earth

Hi Superk,
I have not got any messages in sysprint. I have got the following messages in JESYSMSG:
DTM1459I 2005.143 02:42:27 JOB DEFGDG REQUEUED TO CLASS=U PRIORITY=7
ICH70001I Z703905 LAST ACCESS AT 02:42:27 ON MONDAY, MAY 23, 2005
IEF236I ALLOC. FOR DEFGDG GDGCRT
IEF237I JES2 ALLOCATED TO SYSPRINT
IEF237I JES2 ALLOCATED TO SYSOUT
IEF237I JES2 ALLOCATED TO SYSIN
IEF142I DEFGDG GDGCRT - STEP WAS EXECUTED - COND CODE 0000
IEF285I Z703905.DEFGDG.JOB11576.D0000102.? SYSOUT
IEF285I Z703905.DEFGDG.JOB11576.D0000103.? SYSOUT
IEF285I Z703905.DEFGDG.JOB11576.D0000101.? SYSIN
* ** STEP STATISTICS **
* PERFORM GROUP 0 SERVICE UNITS 51 TX. TIME 00.00.00.08
* INIT DELAY 00.00.00.03 VIO PAGE IN 0 VIO PAGE OT 0
ACTEX101 JOBNAME STEPNAME PROCSTEP PROGRAM CONDCODE
ACTEX101 DEFGDG GDGCRT IEFBR14 0
* ** EXCP STATISTICS **
* UADR TYPE COUNT UADR TYPE COUNT UADR TYPE COUNT UADR TYPE
IEF373I STEP/GDGCRT /START 2005143.0242
IEF374I STEP/GDGCRT /STOP 2005143.0242 CPU 0MIN 00.00SEC SRB 0MIN 00.00S
* ** STEP STATISTICS **
IEF375I JOB/DEFGDG /START 2005143.0242
IEF376I JOB/DEFGDG /STOP 2005143.0242 CPU 0MIN 00.00SEC SRB 0MIN 00.00S
* ** JOB STATISTICS **
* CPU SERVICE 50 I/O SERVICE 0 MSU SERVICE
* ** NETT INSTALLATION MESSAGES
NET0004D JOB PERFORMANCE NOT UNDER EXIT MODIFICATION

superk · Posted: Mon May 23, 2005 7:25 pm

So ... it appears that your job DTM1459I doesn't do anything, except start and end.

MGIndaco · Posted: Mon May 23, 2005 7:27 pm

You are right Subhasis... but reading your JESYMSGS I can only understand that your DD statement has been allocated but nothing say that your request has been processed!

Only IDCAMS allow you to allocate a gdg's root...(Thank you superk)
What you have done is a simply jcl test that allow you to know that syntax of your stepjcl is correct and as I have told above it is useful to test all the step of your jcl(it's a different way of JSCAN or TYPRUN=SCAN) to be sure that no JCL error will be found!

To be sure of your test I reccomend you to look in ISPF - 3.4 that your entry was correctly definied!

knd_r · New User Joined: 18 Mar 2005 Posts: 48

thanks superk and mgindaco for your information. This is very helpful.

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi Subhasis,

I don't think we've convinced you that you're mistaken on this point. You can try to allocate TEST.GDG.FILE1(+1). I think you'll get an indication that the base doesn't exist.

subhasis_50 · Moderator Joined: 09 Mar 2005 Posts: 363 Location: Earth

Hi,
All of you are correct. I was wrong. That confusion is created as the file which i am going to create is already defined as GDG. Sorry for my previous reply.