create GDG Base

范例一枚

建个七代的GDG Base

//WAEY0AXA JOB'ALS',CLASS=U,MSGCLASS=X,MSGLEVEL=(1,1)          
//STEP010 EXECPGM=IDCAMS                                       
//SYSPRINT DDSYSOUT=*                                          
//SYSIN DD*                                                    
  DEFINE GDG(NAME(VCHXQS2.GWAE.AM.AM.C3)-                      
          LIMIT(7))         

参数

EMPTY

remove all GDS entries from GDG base when a new GDS iscreated
that causes the GDG LIMIT to be exceeded.

NOEMPTY

remove only the oldest GDS entry when a new GDS is createdthat
causes GDG LIMIT to be exceeded.

SCRATCH|NOSCRATCH

Specifies what action is to be taken for a generation data setlocated
on disk volumes when the data set is uncataloged from the GDG baseas
a result of EMPTY/NOEMPTY processing. For generation data setslocated
on tape, this parameter has noeffect.