En esta ocasión vamos a incluir cuatro ejemplos para tratar GDGs. Son los siguientes:
- Crear un GDG Base y una nueva generación.
- Copiar un fichero secuencial en una nueva generación usando IEBGENER.
- Modificar el límite de generaciones del GDG creado.
- Borrar las generaciones que existen y el GDG Base.
Para tres ejemplos vamos a utilizar la utilidad IDCAMS modificando la SYSIN.
En el primer ejemplo, al crear el GDG Base, deberemos especificar los parámetros:
NAME. Nombre del GDG
LIMIT. Número de generaciones que tendrá el GDG. El máximo son 255.
EMPTY/NOEMPTY. Con “empty” se borrarán todas las generaciones cuando se llegue al límite. Con “noempty” sólo borrará la generación más antigua cuando se llegue al límite.
SCRATCH/NOSCRATCH. Cuando un dataset es descatalogado porque se ha llegado al límite, con la opción “scratch” se borrará de todos los discos. Con la opción “noscratch” se mantendrá.
El JCL se puede descargar al principio de la entrada.
Comprobamos en la opción 3.4 de ISPF que se ha creado el GDG Base y una generación vacía.
El segundo ejemplo tiene dos pasos:
- El primer paso copia un fichero secuencial en una nueva generación del GDG (+1).
- El segundo paso muestra el contenido de la nueva versión creada. Como la ejecución del JCL aún no ha terminado, sigue siendo la versión (+1), aunque el primer paso haya terminado bien. Los jobs posteriores a este que quieran acceder a ese dataset, si usarán la versión (0).
El JCL se puede descargar al principio de la entrada.
En las últimas líneas vemos el contenido del dataset IBMUSER.PRUEBA.GDG.G0002V00.
En la opción 3.4 de ISPF vemos el nuevo dataset.
Vemos que el contenido es el mismo que el mostrado en la salida del job.
En el tercer ejemplo vamos a cambiar el límite de generaciones pasando de 10 a 15. También se pueden modificar las opciones EMPTY/NOEMPTY y SCRATCH/NOSCRATCH.
El JCL se puede descargar al principio de la entrada.
Comprobamos el mensaje “ALTER IBMUSER.PRUEBA.GDG ALTERED”.
En el último ejemplo vamos a borras las generaciones existentes y el GDG Base. Antes de borrar el GDG Base, hay que borrar las generaciones. Se pueden borrar a mano o añadiendo la opción "FORCE". De esta forma borraremos el GDG Base y sus generaciones.
El JCL se puede descargar al principio de la entrada.
Comprobamos los ficheros que han sido eliminados.