MFNetDisk - Emulando VTS - Parte 2/2

Escrito por Javier
Adjuntos:
Descargar este archivo (ALVOLCAT.txt)ALVOLCAT[Crea catálogo VOLCAT.GENERAL]0.8 kB
Descargar este archivo (CREARMM.txt)CREARMM[Crea los ficheros necesarios para RMM]3 kB
Descargar este archivo (PRUEBVTS.txt)PRUEBVTS[Job para probar las cintas]0.9 kB

¡Después de configurar el servidor VTS en Windows, las tareas que se ejecutarán en zOS y el IODF, empezamos con la configuración de OAM, SMS y RMM!

OAM (Object Access Method)

 

Empezaremos editando el fichero IEFSSNXX que tengamos en uso para definir el subsistema.

SUBSYS SUBNAME(OAM1) INITRTN(CBRINIT)

Lo podemos añadir dinámicamente con el comando:

SETSSI ADD,SUBNAME=OAM1,INITRTN=CBRINIT

 

El fichero de parámetros se encuentra en SYS1.PARMLIB(CTICBR00). En caso de que no exista, copiar el fichero SYS1.SAMPLIB(CBRCTI00) de la librería de ejemplos.

Para crear la STC copiaremos el fichero SYS1.SAMPLIB(CBRAPROC) a nuestra PROCLIB con el nombre OAM.

 

Ahora lo editamos y modificamos la DD SYSUT2 para indicar nuestra proclib, en caso de que sea diferente. La primera vez que arranquemos OAM, lo único que hará será modifica este mismo miembro. La segunda vez que arranquemos, ya arrancaremos OAM.

 

Lo arrancaremos con “S OAM”. Se quedará esperando a que hagamos la parte del SMS.

 

Toda la información sobra las librerías de cintas se guarda en un catálogo llamado VOLCAT.VGENERAL que tendremos que definir. El job terminará correctamente.

NOTA: El job se puede descargar al principio de la entrada

 

SMS

 

Para saber los ficheros de configuración que tenemos activos de SMS, usaremos el comando “D SMS” desde SDSF. En mi caso, SYS1.SCDS.

 

Ahora entramos a ISMF – Integrated Storage Management Facility.

 

Entraremos en la opción 10 - Library Management

NOTA: Para ver esta opción, debemos entrar en la opción 0 - ISMF Profile > 0 - User Mode Selection > elegir la opción 2 en “USER MODE”. Pulsar intro, salir completamente de ISMF y volver a entrar.

 

Entraremos en la opción 3 – Tape Library. Si nos da un error al entrar aquí, debemos comprobar que tenemos bien definido el catalogo VOLCAT.GENERAL.

 

Definiremos la librería LIBVTS.

 

Pulsamos F8 para definir el Threshold, es decir, cuantos cartuchos scratch deben quedar para que salte alerta.

 

Volvemos a pulsar F8 y marcaremos YES en Initial Online Status.

 

Salimos con F3 para crearla.

Ahora vamos a la opción 4 – Data Class.

                              

Mantenemos todo por defecto menos los parámetros Media Type y Recording Technology.

 

Salimos con F3 y quedará guardada.

Ahora vamos a crear un Storage Group tipo TAPE. Entramos en la opción 6 – Storage Group.

 

Lo llamaremos SGROBOT y será de tipo TAPE.

 

Pondremos el nombre de la librería creada anteriormente y en “SMS Storage Group Status” pondremos Y.

 

Nos fijamos que esté enable.

 

Salimos con F3 dos veces y quedará guardado.

Ahora definimos una Management Class desde la opción 3.

 

Dejamos los parámetros por defecto y salimos con F3 para que se guarde.

 

Entramos en la opción 5 – Storage Class.

 

Definiremos la storage class SCROBOT.

 

Dejamos los datos por defecto.

 

Ahora vamos a crear las rutinas ACS de SMS. Esto son las reglas que seguirá el SMS para asignar una management class, data class, storage class, storage group u otra.

Para ello nos creamos una librería particionada y creamos los siguientes ficheros:

DATACLAS: DCPRUEBA

 

PROC DATACLAS                            

IF &UNIT = 'VTS' THEN                     

 SET &DATACLAS = 'DCROBOT'               

END                 

 

NOTA: Mi pantallazo es distinto porque tengo más configuraciones. Con incluir la parte de VTS es suficiente.

 

MGMTCLAS: MCPRUEBA

 

PROC MGMTCLAS                           

IF &UNIT = 'VTS' THEN                    

 SET &MGMTCLAS = 'MCROBOT'              

END        

 

NOTA: Mi pantallazo es distinto porque tengo más configuraciones. Con incluir la parte de VTS es suficiente.

 

STORCLAS: SCPRUEBA

 

PROC STORCLAS             

IF &UNIT = 'VTS' THEN     

 SET &STORCLAS = 'SCROBOT'

END        

 

NOTA: Mi pantallazo es distinto porque tengo más configuraciones. Con incluir la parte de VTS es suficiente.

 

STORGRP: SGPRUEBA

 

PROC STORGRP                           

IF &UNIT = 'VTS' THEN                   

 SET &STORGRP = 'SGROBOT'              

END       

 

NOTA: Mi pantallazo es distinto porque tengo más configuraciones. Con incluir la parte de VTS es suficiente.

               

Volvemos a ISMF y entramos en la opción 7 - Automatic Class Selection.

 

Entramos en 2 – Translate.

 

Rellenamos usando nuestros datos correspondientes. El dataset de “Listing Data Set” se crea automáticamente.

  

Nos fijamos que el RETURN CODE sea 0. Pulsamos dos veces F3 para volver al panel anterior.

Hacemos el mismo paso con el resto de rutinas: MCPRUEBA, SCPRUEBA y SGPRUEBA

 

Ya tenemos las 4 rutinas ACS incluidas.

Ahora entramos en la opción 3 – Validate, para validar las rutinas y que no falte nada.

 

Marcamos * en ACS Routine Type para validar todo.

 

En mi caso sale un warning por otra configuración, pero no pasa nada.

 

Vamos a la opción 8 - Control Data Set.

 

Y activamos la configuración 5 – Activate 

 

RMM (Removable Media Manager)

 

Comprobaremos que tenemos DFSMSRMM activado en el miembro IFAPRDXX.

 

Ahora entramos en el fichero IEFSSNXX que entramos anteriormente y añadimos el subsistema para el RMM.

SUBSYS SUBNAME(DFRM) INITRTN(EDGSSSI)

Lo podemos añadir dinámicamente con el comando:

SETSSI ADD,SUBNAME=DFRM,INITRTN=EDGSSSI

 

Añadiremos los siguientes comandos al fichero IKJTSOXX que tengamos en uso.

NOTA: Podemos comprobar la configuración activa con el comando D IKJTSO,SEND

 

Ahora vamos a crear el fichero de parámetros que usará DFRMM copiando el fichero SYS1.SAMPLIB(EDGIVPPM) en nuestra PARMLIB con el nombre EDGRMM00.

 

Lo editamos y lo dejamos de la siguiente manera.

 

Como STC usaremos el fichero SYS1.SAMPLIB(EDGDFRMM), para ello, lo copiamos a nuestra PROCLIB con el nombre DFRMM.

 

Entramos el fichero que acabamos de copiar y nos fijamos en los nombres de los ficheros EDGPDOX y EDGPDOY ya que los tenemos que crear.

IMPORTANTE: Ambos ficheros deben estar en el mismo disco.

 

En un mismo job he juntado todos los pasos que son necesarios para RMM. Se puede descargar al principio de la entrada. Se llama CREARMM.

 

Podemos acceder a los menús de DFRMM usando el comando TSO %EDGRMLIB

También podemos añadir una opción al panel que deseemos.

 

En este punto ya hemos terminado de configurar todo. Debemos hacer IPL para cargar la nueva configuración del IODF y demás parámetros.

 

Una vez arrancado el sistema, arrancaremos el MPCPROC.

S MPCPROC,PRM=COLD

 

Ahora arrancaremos OAM y el DFRMM.

 

Nos saldrá un mensaje indicando que añadamos volúmenes scratch.

 

Ahora el DFRMM con “S DFRMM”.

 

Ahora vemos el estado de la librería con el comando: D SMS,LIB(LIBVTS),DETAIL

 

Añadiremos un volumen scratch a la librería mediante el comando:

LI ENT A00000,LIBVTS,MEDIA2

Insertaremos unos pocos cartuchos y volvemos a displayarla.

 

Ahora vamos a ejecutar un job que escriba un fichero en cinta y luego lo lea. Podéis descargar el job al principio de la entrada.

 

Terminará correctamente.

 

Hasta aquí esta entrada. Espero que os haya gustado. ¡Intentaré montar el HSM para aprovechar estas cintas!

                           

 

Visto: 607

Escribir un comentario


Código de seguridad
Refescar