• principal_3

    Desde 2015, enseñando sobre el sistema operativo z/OS de IBM en esta web. z/OS se utiliza en máquinas llamadas Mainframe.

  • principal_1

    Para realizar el contenido, utilizo el producto de IBM llamado z/Development and Test Environtment Personal Edition. Este software permite emular un Mainframe y así poder utilizar z/OS para aprender.

  • principal_2

    Es utilizado por grandes empresas (bancos, aseguradoras...). Aquí aprenderás a instalar y configurar productos relacionados con z/OS.

  • principal_4

    ADCD es una distribución de z/OS que contiene productos de IBM como IMS, DB2, CICS, ZOWE, TWS, NetView, System Automation, etc.

JCL - IDCAMS - Creando, Copiando, Modificando y Borrando GDGs

Adjuntos:
Descargar este archivo (GDGBORRA.txt)GDGBORRA[Borra el GDG Base y las generaciones]0.5 kB
Descargar este archivo (GDGCOPIA.txt)GDGCOPIA[Copia secuencial en nueva generación y lo muestra]1 kB
Descargar este archivo (GDGCREA.txt)GDGCREA[Crea GDG Base y una generación vacía]1 kB
Descargar este archivo (GDGMODIF.txt)GDGMODIF[Modifica el límite de generaciones de un GDG]0.4 kB

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. 

 

 

Publish modules to the "offcanvs" position.