Inicialización genérica de estados de emisión

Generalidades.

El proceso de macrofichero puede utilizarse también para inicializar de forma incondicional el estado de emisión de una lista de sesiones. El resultado será equivalente a la inicialización de estados realizada desde la opción 2.1 del menú del operador o mediante el JCL de modificación de estados.

Proceso de inicialización.

Se realiza desde el JCL ZTBGJMCR que invoca al procedimiento ZTBGPMCR poniendo el PARM "Ann " siendo nn=10 (inicializar emisión) seguido de 24 blancos.

Las sesiones a procesar se toman del fichero ZTBGFSES, de longitud de registro 80 por lo que se puede crear con un editor, que contiene en las 24 primeras posiciones de cada registro una sesión de presentación a procesar.

El proceso se realiza de la siguiente manera:

• Se toma una sesión de presentación del fichero ZTBGFSES, se accede al perfil de la misma y se valida su estado.

• Se realiza el proceso de modificación de estados para la sesión llamando al programa estándar ZTBGB160 con los parámetros de entrada E9990001 (modificación incondicional de estados de emisión con número de sesión 1) tal como lo haría el JCL ZTBGJ6.

• Se toma una nueva sesión de presentación de ZTBGFSES y se repite el tratamiento hasta que se acaba la lista de sesiones.

El proceso del macrofichero no se interrumpe si se produce error durante el tratamiento de alguna sesión. Si se produce más de un error prevalece el primero encontrado y el JCL finaliza con dicho código.