Modificación de Estados en Onesait Editran

Al borrar los datos del tampón de la sesión el estado en Editran deberá modificarse a inicializado. Este proceso puede realizarse mediante el proceso de peticiones masivas de Editran.

La lista de sesiones generada en el informe sirve de entrada a este proceso.

El JCL ZTBGJPET realiza la modificación. Se suministrará la lista de sesiones como fichero PETICIÓN dando en FICHAS los valores ’10-F-E’ para realizar la función 10 de inicialización de estados mediante Fichero en el sentido Emisor o ’10-F-R’ para el sentido Receptor.

El JCL es el siguiente.

 EDIT       KI.EGDI.ZTBG.JCLS(ZTBGJPET) - 01.35             Columns 00001 00072
 Command ===>                                                  Scroll ===> CSR 
 004300 //ZTBGPET EXEC PGM=ZTBGBPET,REGION=8M                                  
 004400 //STEPLIB  DD DSN=IMS510P.RESLIB,DISP=SHR                              
 - - -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -
 006510 //PETICION DD  DSN=KI.EGDI.ZTBG.ZTBGFSES,DISP=SHR                      
 006600 //LISTADO  DD   SYSOUT=H,DCB=(BLKSIZE=132)                             
 006700 //FICHAS   DD   *                                                      
 006800  10-F-E                                                                
 006900 /*