Baja de perfiles Onesait · Editran/P

A consecuencia de la necesidad de dar de baja genérica sesiones de editran/P, aparece la nueva función de baja de perfiles mediante la ejecución de un proceso batch, alimentado por unos datos de entrada previamente definidos por el usuario, ya sea mediante una operación manual o por una aplicación usuaria.

Se obtiene un listado con los datos de entrada, que señala los posibles errores de los mismos, o las sesiones de presentación dadas de baja si las entradas son correctas.

Se proporciona en instalación, un ejemplo de este JCL con el nombre ZTBPJBP1. La baja de sesiones de transmisión provoca la baja de los registros de conversación, sesión e identificador de transporte.

Formato de la ficha de orden de baja

Tiene 2 formatos. Bien por códigos o por conversación (nombre de la sesión asociada a los códigos ).

Nivel	Nombre	Long.	Fmto.	Descripción
1	Tratamiento	1	Alf.	Con “*” la ficha se ignora, Con ‘P’ se tratan Código local-Código remoto-aplicación.
1	Separador	1	Alf.	Guión de separación de campos.
1	Origen	9	alfn.	Código origen. Ceros en selección genérica.
1	Separador	1	alf.	Guión de separación de campos.
1	Remoto	9	alfn.	Código remoto. Ceros en selección genérica.
1	Separador	1	alf.	Guión de separación de campos.
1	Aplicación	6	alfn.	Código de aplicación. Ceros en selección genérica.

Nivel	Nombre	Long.	Fmto.	Descripción
1	Tratamiento	1	Alf.	Con “*” la ficha se ignora, Con ‘C’ se tratan Conversaciones.
1	Separador	1	Alf.	Guión de separación de campos.
1	Conversación	32	alfn.	Conversación. Formatos: String String * * String

JCL del proceso

El nombre del jcl que realiza el alta de las sesiones de transmisión es “ZTBBJBP1”. Su contenido es el siguiente:

//KI0D5870 JOB (EGDC,KIT,,99),EDITRAN,MSGCLASS=H,CLASS=A,             
//             MSGLEVEL=1,NOTIFY=&SYSUID                              
//JOBLIB   DD DSN=SYS1.COB2LIB,DISP=SHR                               
//*********************************************************************
//* INDRA, S.A.- SOL. COMUNICACIONES                                  *
//*********************************************************************
//**   BAJA BATCH DE PERFILES EDITRAN/P                            ***+
//********************************************************************+
//*                                                                   
//ZTBBBB01 EXEC PGM=ZTBBBBP1                                          
//STEPLIB  DD   DSN=KI.EGDC.ZTBP.LOAD31,DISP=SHR                        
//ZTBGFPER DD   DSN=KI.EGDC.ZTBP.ZTBPFPE,DISP=SHR                    
//ZTBGFLIS DD   SYSOUT=*                                              
//SYSOUT   DD   SYSOUT=*                                              
//SYSPRINT DD   SYSOUT=*                                              
//FICHAS   DD   *    
*P-000000000-000000000-PRUEBA                     
*C-*
*C-PRUEBA*                    
C-SESION 2314                  
/* 

Ejemplos

Baja de todos los códigos remotos y aplicaciones que tienen como origen el código local 000099940.

P-000099940-000000000-000000

Baja genérica de sesiones (2 formatos válidos):

P-000000000-000000000-000000          
C-*

Baja de todas las aplicaciones del código remoto 000033330.

P-000000000-000033330-000000 

Baja de todas las aplicaciones del código local 000099940 y código remoto 000033330 .

P-000099940-000033330-000000

Baja de la sesión indicada:

P-000099940-000033330-TELECA

Baja de la conversación indicada:

C-PRUEBAS INDRA APLIC 44776

Baja de las conversaciones que comienzan por cualquier cosa y terminan por 0023 teleca:

C-*0023TELECA