GDG Using IEBGENER utility



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

GDG Using IEBGENER utility

Postby saurabh khare » Wed Dec 28, 2016 11:14 pm

Hi ,
I created a GDG base IK5991A.MYLIB1.TEST
[
gdg1.PNG



My aim is to check that if we are passing same generations of the GDG base more than once then what will be the count of the GDG generations i.e will it take the generation only once and give the count as 1 or will it consider all the same generations and give the count as the number of times I have passed the generations.

Using IEBGENER utility I am copying a PS file to the same generation and want to see the result but it is showing something like this
gdg2.PNG

gdg3.PNG


Pls Help me on this :-)
You do not have the required permissions to view the files attached to this post.
saurabh khare
 
Posts: 3
Joined: Mon Dec 26, 2016 2:58 pm
Has thanked: 0 time
Been thanked: 0 time

Re: GDG Using IEBGENER utility

 

Re: GDG

Postby Robert Sample » Wed Dec 28, 2016 11:23 pm

Have you read the JCL User's Guide manual in the MVS bookshelf for your release of z/OS, and specifically Appendix A GDG ? If you do, you will find
For example, if you create a generation data set with a relative generation number
of (+1), the system recognizes any subsequent reference to (+1) throughout the job
as having the same absolute generation number.
Robert Sample
Global moderator
 
Posts: 3326
Joined: Sat Dec 19, 2009 8:32 pm
Location: East Dubuque, Illinois
Has thanked: 1 time
Been thanked: 218 times

Re: GDG

Postby steve-myers » Thu Dec 29, 2016 4:11 am

Look at this JCL -
//F       EXEC PGM=UCHECK
//STEPLIB  DD  DISP=SHR,DSN=XXXXXX.UCHECK.LOAD
//SYSPRINT DD  DISP=(,CATLG),UNIT=SYSDA,SPACE=(TRK,(1,1)),
//             DSN=XXXXXX.UCHECK.SYSPRINT(+1)
//LU       DD  DISP=SHR,DSN=XXXXXX.SCANLU.INPUT
//DB       DD  DISP=OLD,DSN=XXXXXX.UCHECK.DB
//FLIST   EXEC PGM=IEBGENER
//SYSPRINT DD  DUMMY
//SYSIN    DD  DUMMY
//SYSUT1   DD  DISP=OLD,DSN=XXXXXX.UCHECK.SYSPRINT(+1)
//SYSUT2   DD  SYSOUT=*,DCB=(RECFM=VA,LRECL=125,BLKSIZE=129)

Step F creates new generation in the GDG base XXXXXX.UCHECK.SYSPRINT, step FLIST "prints" prints the data set. Here is an extract from from the JESYSMSG data set -
IEF236I ALLOC. FOR XXXXXXU F                                                    
IGD103I SMS ALLOCATED TO DDNAME STEPLIB                                        
IGD101I SMS ALLOCATED TO DDNAME (SYSPRINT)                                      
        DSN (XXXXXX.UCHECK.SYSPRINT.G0603V00             )                      
        STORCLAS (USER) MGMTCLAS (        ) DATACLAS (        )                
        VOL SER NOS= VVVV34                                                    
IGD103I SMS ALLOCATED TO DDNAME LU                                              
IGD103I SMS ALLOCATED TO DDNAME DB                                              
IEF142I XXXXXXU F - STEP WAS EXECUTED - COND CODE 0000                          
IGD104I XXXXXX.UCHECK.LOAD                           RETAINED,  DDNAME=STEPLIB  
IGD107I XXXXXX.UCHECK.SYSPRINT.G0603V00              ROLLED IN, DDNAME=SYSPRINT
IGD104I XXXXXX.SCANLU.INPUT                          RETAINED,  DDNAME=LU      
IGD104I XXXXXX.UCHECK.DB                             RETAINED,  DDNAME=DB      
IEF373I STEP/F       /START 2016363.1055                                        
IEF374I STEP/F       /STOP  2016363.1055 CPU    0MIN 00.21SEC SRB    0MIN 00.00S
IEF236I ALLOC. FOR XXXXXXU FLIST                                                
IEF237I DMY  ALLOCATED TO SYSPRINT                                              
IEF237I DMY  ALLOCATED TO SYSIN                                                
IGD103I SMS ALLOCATED TO DDNAME SYSUT1                                          
IEF237I JES2 ALLOCATED TO SYSUT2                                                
IEF142I XXXXXXU FLIST - STEP WAS EXECUTED - COND CODE 0000                      
IGD104I XXXXXX.UCHECK.SYSPRINT.G0603V00              RETAINED,  DDNAME=SYSUT1  
IEF285I   XXXXXX.XXXXXXU.JOB99472.D0000105.?           SYSOUT                  
IEF373I STEP/FLIST   /START 2016363.1055                                        
IEF374I STEP/FLIST   /STOP  2016363.1055 CPU    0MIN 00.04SEC SRB    0MIN 00.00S

The IGD101I message tells us it created a new data set XXXXXX.UCHECK.SYSPRINT.G0603V00 for the generation data group. It does not also say it also deleted G0683V00 because the GDG is full at 20 data sets.

The IGD107I message is telling us, basically, that the catalog has actually been updated.
steve-myers
Global moderator
 
Posts: 1856
Joined: Thu Jun 03, 2010 6:21 pm
Has thanked: 4 times
Been thanked: 188 times

Re: GDG Using IEBGENER utility

Postby saurabh khare » Fri Dec 30, 2016 10:42 pm

Thanks :-)
saurabh khare
 
Posts: 3
Joined: Mon Dec 26, 2016 2:58 pm
Has thanked: 0 time
Been thanked: 0 time


Return to JCL

 


  • Related topics
    Replies
    Views
    Last post