May 22

IDCAMS (Programas del MVS)

compártelo en Facebook!

IDCAMS: esta utilidad realiza varias funciones

* Definir y borrar un fichero VSAM.
* Copiar un fichero en otro.
* Construir índices alternativos.
* Listar catálogos.
* Imprimir ficheros.
* Transferir ficheros de un sistema a otro.

Vamos a ver unos ejemplos (Definición, Borrado y Copia) para poder especificar cuáles son las sentencias control para la utilidad IDCAMS.

Definición:

01             1         2         3         4         5         6         7
02    ----+----0----+----0----+----0----+----0----+----0----+----0----+----0--
03    //PRUEBJOB JOB
04    //DEFINIR  EXEC PGM=IDCAMS
05    //SYSPRINT DD   SYSOUT=*
06    //SYSIN    DD   *
07           DEFINE CLUSTER(NAME(TUTORIAL.PRUEBA)      -
08                          RECORDS (500 50)           -
09                          RECSZ   (25  25)           -
10                          KEYS    (10   0)           -
11                          VOLUME  (DIR003)           -
12                          SHR     (2    3)           -
13                          INDEXED)                   -
14                  DATA (NAME(TUTORIAL.PRUEBA.DATA))  -
15                  INDEX(NAME(TUTORIAL.PRUEBA.INDEX))

* CLUSTER: como se define un fichero VSAM en su creación
o NAME: identifica el fichero dentro del catálogo. Posteriormente se identificará en una DSN.
o RECORDS: el espacio requerido se puede indicar en registros, pistas (TRAKS) o cilindros (CYLINDERS).
o RECSZ: el tamaño del registro consta de dos parámetros, el primero indica el tamaño medio en bytes de los registros que se van a almacenar en el fichero; el segundo indica el tamaño máximo en bytes de dichos registros. Si son iguales indica que los registros son de longitud fija.
o KEYS: define la clave. Consta de dos subparámetros, el primero indica el tamaño en bytes de la clave, y el segundo indica la posición desde el comienzo del registro. Generalmente, la clave comienza en la primera posición del registro.
o VOL: indica el nombre del disco en el que el fichero va a grabarse.
o SHR: indica el grado de compartición del fichero. Consta de dos subparámetros:
o El primero indica la compartición en distintos trabajos. El segundo indica la compartición en distintos sistemas. INDEXED: indica que el fichero es del tipo KSDS. NONINDEXED indica que el fichero es del tipo ESDS y NUMBERED con un fichero RRDS.
* DATA: se utiliza para definir los datos del fichero VSAM.
* INDEX: se utiliza para definir el índice del fichero VSAM. Sólo se codifica cuando el fichero es KSDS.

Borrado:

1             1         2         3         4         5         6         7
2    ----+----0----+----0----+----0----+----0----+----0----+----0----+----0--
3    //PRUEBJOB JOB
4    //BORRADO  EXEC PGM=IDCAMS
5    //SYSPRINT DD SYSOUT=*
6    //SYSIN    DD   *
7           DELETE TUTORIAL.PRUEBA CLUSTER -
8
9    PURGE

* CLUSTER: indica que se tiene que borrar un fichero VSAM. Cuando se elimina el CLUSTER, se borran también los DATA e INDEX asociados al fichero.
* PURGE: permite borrar un fichero aunque no haya llegado su fecha de caducidad.
* ERASE: se machacan los datos del fichero con ceros binarios.

Copia:

01             1         2         3         4         5         6         7
02    ----+----0----+----0----+----0----+----0----+----0----+----0----+----0--
03    //PRUEBJOB JOB
04    //COPIAR   EXEC PGM=IDCAMS
05    //SYSPRINT DD SYSOUT=*
06    //FICHERO1 DD DSN=?
07    //FICHERO2 DD DSN=?
08    //SYSIN    DD   *
09           REPRO INFILE  (FICHERO1) -
10                 OUTFILE (FICHERO2) -
11                 SKIP    (100)      -
12                 COUNT   (1500)

* REPRO: parámetro que indica que se trata de una copia.
* INFILE y OUTFILE: identifican los nombres de los ficheros de entrada y salida.
* INDATASET y OUTDATASET: opcional, pueden especificarse en lugar de INFILE y OUTFILE.
* SKIP: número de registros que deben saltarse desde el inicio del fichero antes de comenzar el proceso de copiado. También se pueden codificar:
o FROMKEY: indica la clave inicial (KSDS).
FROMADDRESS: indica la dirección inicial (ESDS). FROMNUMBER: indica el número de registro inicial (RRDS).
* COUNT: número de registros que queremos copiar. También se pueden codificar:
o TOKEY: indica la clave final (KSDS).
o TOADDRESS: indica la dirección final (ESDS).
o TONUMBER: indica el número de registro final (RRDS).

link original: http://www.adictosaltrabajo.com/tutoriales/tutoriales.php?pagina=JCLIntro

Enlace permanente a este artículo: http://www.borhaps.es/idcams-programas-del-mvs/

publi

Deja un comentario