> For the complete documentation index, see [llms.txt](https://docs.editran.onesait.com/llms.txt). Markdown versions of documentation pages are available by appending `.md` to page URLs; this page is available as [Markdown](https://docs.editran.onesait.com/documentacion-editran/copy-of-privado-editran-v5.3-cics/migracion-a-v5.3-fase-1/migracion-desde-cualquier-fase-de-editran-v5.2.md). # Migración desde cualquier fase de Editran v5.2 ## ZTBMJM53 Se proporciona el siguiente JCL ZTBMJM53 que tiene el siguiente contenido: ```cobol //KI63A23A JOB (EGDC,KIT,,99),'ZTBMJM53',MSGCLASS=H,CLASS=A, // MSGLEVEL=1,NOTIFY=&SYSUID //*-------------------------------------------------------------------- //* MIGRACION DE VERSIONES 5.2 A VERSION 5.3.1 //* ACTUALIZACION DE REMOTOS EN VERSION 4.1 //* ACTUALIZACION DE SESIONES CON CRIPTOGRAFIA 2.2 //******************************************************************* //BORRADO EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DELETE (KI.EIDC.ZTBG.ZTBGFPER.V530) PURGE //* //DEFPERF EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE CLUSTER - (NAME(KI.EIDC.ZTBG.ZTBGFPER.V530) – VOL(DES805) - LOG(NONE) - NOREUSE - REC (4000 50) - FREESPACE(25 25) - RECORDSIZE(3000 3000) - SHAREOPTIONS(2 3) - KEYS(27 0) - INDEXED ) - DATA - (NAME(KI.EIDC.ZTBG.ZTBGFPER.V530.DATA)) - INDEX - (NAME(KI.EIDC.ZTBG.ZTBGFPER.V530.INDEX)) //* //REPRO1 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=H //ENTRADA DD DSN=KI.EIDC.ZTBG.ZTBGFPER,DISP=SHR //SALIDA DD DSN=KI.EIDC.ZTBG.ZTBGFPER.V530,DISP=SHR //SYSIN DD * REPRO INFILE(ENTRADA) OUTFILE(SALIDA) //******************************************************************* //BORRADO EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DELETE (KI.EGDC.ZTBP.ZTBPFPE.V530) PURGE //* //DEFPERF EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE CLUSTER - (NAME(KI.EGDC.ZTBP.ZTBPFPE.V530) - VOL(DES805) - LOG(NONE) - NOREUSE - REC (3000 50) - FREESPACE(25 25) - RECORDSIZE(2500 2500) - SHAREOPTIONS(2 3) - KEYS(34 0) - INDEXED ) - DATA - (NAME(KI.EGDC.ZTBP.ZTBPFPE.V530.DATA)) - INDEX - (NAME(KI.EGDC.ZTBP.ZTBPFPE.V530.INDEX)) //* //REPRO2 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=H //ENTRADA DD DSN=KI.EGDC.ZTBP.ZTBPFPE,DISP=SHR //SALIDA DD DSN=KI.EGDC.ZTBP.ZTBPFPE.V530,DISP=SHR //SYSIN DD * REPRO INFILE(ENTRADA) OUTFILE(SALIDA) //* //* EDITRAN 5.3. //* ACTUALIZACION DE REMOTOS EN VERSION 4.1 //* ACTUALIZACION DE SESIONES CON CRIPTOGRAFIA 2.2 //* ACTUALIZACION DEL PARAMETRO SOLICITAR ACUSE DESCARGA (S/N) //*-------------------------------------------------------------------- //* SE PUEDE REALIZAR UNA C-CONSULTA O UNA M-MODIFICACION DE //* UNA SESION CONCRETA //* LAS SESIONES DE UN LOCAL-REMOTO //* LAS SESIONES DE UN LOCAL //* TODAS LAS SESIONES //* MEDIANTE LA SYSIN //* //* FORMATO DE SYSIN //* 1.-LLLLLLLLLRRRRRRRRRAAAAAA //* 000099980000099940PRUEBA CONSULTA/MODIFICACION DE UNA SESION //* 000000000000099940PRUEBA CONSULTA/MODIFICACION POR REMOTO/APLI //* 000099940PRUEBA CONSULTA/MODIFICACION POR REMOTO/APLI //* 000000000000000000PRUEBA CONSULTA/MODIFICACION POR APLICACION //* PRUEBA CONSULTA/MODIFICACION POR APLICACION //* 000099980000099940000000 CONSULTA/MODIFICACION POR LOCAL-REMOTO //* 000099980000099940 CONSULTA/MODIFICACION POR LOCAL-REMOTO //* 000000000000099940000000 CONSULTA/MODIFICACION POR REMOTO //* 000099940 CONSULTA/MODIFICACION POR REMOTO //* 000099980000000000000000 CONSULTA/MODIFICACION POR LOCAL //* 000099980 CONSULTA/MODIFICACION POR LOCAL //* 000000000000000000000000 CONSULTA/MODIFICACION TODAS LAS SESIONES //* CONSULTA/MODIFICACION TODAS LAS SESIONES //* 2.-X //* C - CONSULTA DE LAS SESIONES //* M - MODIFICACION DE LAS SESIONES //*--------------------------------------------------------------------- //*-------------------------------------------------------------------- //PASO1 EXEC PGM=ZTBGBM53 //STEPLIB DD DSN=KI.EIDC.ZTBG.LOAD,DISP=SHR // DD DSN=KI.EGDC.ZTBP.LOAD31,DISP=SHR //ZTBGFPER DD DSN=KI.EIDC.ZTBG.ZTBGFPER.V530,DISP=SHR //ZTBPFPE DD DSN=KI.EGDC.ZTBP.ZTBPFPE.V530,DISP=SHR //EDILIST DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSDBOUT DD SYSOUT=* //ABENDAID DD SYSOUT=* //SYSCOUNT DD DUMMY //SYSUDUMP DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSIN DD * 000000000000000000000000 C /* // **************************** Bottom of Data **************************** ``` Mediante la ejecución del programa ZTBGBM53, se puede realizar una consulta o una modificación de la/s sesión/es que tenemos definidas. * El valor del parámetro CRIPTOGRAFÍA (S/N) debe ser el mismo en Editran/P y G. Si los valores son diferentes, deberá modificarse el correspondiente en P o en G para que ambos queden configurados de forma idéntica y la criptografía funcione correctamente. * VERSION CRIPTOGRAFICA = 2.2, se cambia por 3.0, 4.0 dependiendo de la licencia. * ALGORITMO CIFRADO DE DATOS = DES/TD2C, en la parte de G se cambia por TD3C, en la parte de P se quita. * VERSION REMOTO (N.N) menor a 5.0, se cambia por 5.0. * CONFIRMACION DE DESCARGA diferente de ‘N’, se cambia por ‘N’. * El valor de CRC para todas las sesiones es igual a 'S' * El valor de la sesión interna pasa a tener el valor CODIGO LOCAL + CODIGO REMOTO + APLICACION * Se eliminan las sesiones de Editran/P que no esten asociadas con ninguna sesion de Editran/G. ## SYSIN El formato de la SYSIN se compone de dos parámetros: ### Sesión de presentación Con el siguiente formato LLLLLLLLLRRRRRRRRRAAAAAA. Aquí le indicaremos la/s sesión/es de presentación a consultar o modificar. Esta consulta/modificación afecta a la sesión de presentación y a todas las sesiones de transmisión asociadas (a partir de ahora nos referiremos a este conjunto como sesión). Como informar los campos LLLLLLLLLRRRRRRRRRAAAAAA. ### **Informar todos los campos.** La consulta/modificación se realiza sobre una sesión en concreto. Ejemplo: ``` 000099980000099940PRUEBA ``` Comprueba los siguientes parámetros para la sesión 000099980000099940PRUEBA: ### **Informar los campos LLLLLLLLLRRRRRRRRR** La consulta/modificación se realiza por código local y código remoto. Ejemplo: ``` 000099980000099940000000 ``` Comprueba los siguientes parámetros para todas las sesiones con el local 000099980 y el remoto 000099940. ### **Informar los campos LLLLLLLLLAAAAAA** La consulta/modificación se realiza por código local y aplicación, para cualquier código remoto. Ejemplo: ``` 000099980000000000PRUEBA ``` también se puede dejar el remoto a blancos tal que así: ``` 000099980 PRUEBA ``` Comprueba los siguientes parámetros para todas las sesiones con código local 000099980 y aplicación PRUEBA. ### **Informar los campos RRRRRRRRRAAAAAA** La consulta/modificación se realiza por código remoto y aplicación, para cualquier código local. Ejemplo: ``` 000099980000000000000000 ``` también se puede dejar a blancos el código remoto y la aplicación tal que así: ``` 000099980 ``` Comprueba los siguientes parámetros para todas las sesiones con el local 000099980: ### **Informar solo el código local LLLLLLLLL** La consulta/modificación se realiza por código local. Ejemplo: ``` 000099980000000000000000 ``` también se puede dejar a blancos el código remoto y la aplicación tal que así: ``` 000099980 ``` Comprueba los siguientes parámetros para todas las sesiones con el local 000099980: ### **Informar solo el código remoto RRRRRRRRR** La consulta/modificación se realiza por código remoto. Ejemplo: ``` 000000000000099940000000 ``` también se puede dejar a blancos el código local y la aplicación tal que así: ``` 000099940 ``` Comprueba los siguientes parámetros para todas las sesiones con el remoto 000099940: ### **Informar solo la aplicación AAAAAA** La consulta/modificación se realiza por aplicación. Ejemplo: ``` 000000000000000000PRUEBA ``` también se puede dejar el código local y el código remoto a blancos tal que así: ``` 000099940 ``` Comprueba los siguientes parámetros para todas las sesiones con el remoto 000099940: ### Consulta/Modificación. Con una ‘C’ le indicamos que es una consulta y con una ‘M’ le indicamos que es una modificación Ejemplo1 ```cobol //SYSIN DD * 000099980000099940PRUEBA C ``` Consulta de la sesión de presentación 000099980000099940PRUEBA y todas las sesiones de transmisión asociadas. Ejemplo2 ```cobol //SYSIN DD * 000099980000099940PRUEBA M ``` Modificación de la sesión de presentación 000099980000099940PRUEBA y todas las sesiones de transmisión asociadas. ## ZTBGFLIS La salida es la misma para consulta o para modificación. Dicha salida tiene la siguiente cabecera: ``` INDRA MIGRACION DE PERFILES DE EDITRAN 5.2 A 5.3 PAG. 1 EDI V5.2 ========================================== FECHA DD/MM/AAAA SESION/REMOTO/APLICACION INCIDENCIA EN PERFILES ------------------------ ----------------------------------------------------------------------------- - ``` Primero salen las sesiones de presentación, con sus sesiones de transmisión correspondientes que se tienen que modificar o se modifican. Ejemplo: ``` INDRA MIGRACION DE PERFILES DE EDITRAN 5.2 A 5.3 PAG. 1 EDI V5.2 ========================================== FECHA DD/MM/AAAA SESION/REMOTO/APLICACION INCIDENCIA EN PERFILES ------------------------ ------------------------------------------------------------------------------ 000099980000099940PRTCP4 SESION/G CON ALGORITMO CIFRADO DATOS TD2C INCOMPATIBLE CON 5.3 SE SUSTITUYE POR TD3C 000099980000099940PRTCP6 SESION/G CON VERSION CRIPTOGRAFICA 2.2 INCOMPATIBLE CON 5.3 LA SESION NO FUNCIONARA HASTA QUE SE MODIFIQUEN PERFILES CORRECTAMENTE 000099980000099940PRTCP6 SESION/P DE LA SESION DE PRESENTACION 000099980000099940PRTCP6 VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 VERSION CRIPTOGRAFICA 2.2 INCOMPATIBLE CON 5.3 SE CAMBIA A 3.0 LA SESION NO FUNCIONARA HASTA QUE SE MODIFIQUEN PERFILES CORRECTAMENTE SUSTITUIR ? POR LOS SUBSITEMAS INTERCAMBIADO CON EL REMOTO 000099980000099940PRTCP7 SESION/G CON ALGORITMO CIFRADO DATOS DES INCOMPATIBLE CON 5.3 SE SUSTITUYE POR TD3C 000099980000099940PRTC11 SESION/P DE LA SESION DE PRESENTACION 000099980000099940PRTC10 VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000099980000099940PRTC12 SESION/P DE LA SESION DE PRESENTACION 000099980000099940PRTC10 VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000099980000099940PRTC13 SESION/P DE LA SESION DE PRESENTACION 000099980000099940PRTC10 VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000099980000099940PRUEBA SESION/G CON CONFIRMACION DE DESCARGA = R INCOMPATIBLE CON 5.3. SE CAMBIA A N 000099980000099940PRUEB1 SESION/G CON CONFIRMACION DE DESCARGA = X INCOMPATIBLE CON 5.3. SE CAMBIA A N ``` Luego salen las aplicaciones que se tienen que modificar o modifican. Ejemplo: ``` INDRA MIGRACION DE PERFILES DE EDITRAN 5.2 A 5.3 PAG. X EDI V5.2 ========================================== FECHA DD/MM/AAAA SESION/REMOTO/APLICACION INCIDENCIA EN PERFILES ------------------------ ------------------------------------------------------------------------------ 000000000000000000PRUEBA APLIC. CON CONFIRMACION DE DESCARGA = R INCOMPATIBLE CON 5.3. SE CAMBIA A N 000000000000000000PRUEB1 APLIC. CON CONFIRMACION DE DESCARGA = X INCOMPATIBLE CON 5.3. SE CAMBIA A N 000000000000000000PRUEB6 APLIC. CON CONFIRMACION DE DESCARGA = INCOMPATIBLE CON 5.3. SE CAMBIA A N 000000000000000000PRUEB8 APLIC. CON CONFIRMACION DE DESCARGA = L INCOMPATIBLE CON 5.3. SE CAMBIA A N ``` Luego salen los remoto que se tienen que modificar o modifican: Ejemplo: ``` INDRA MIGRACION DE PERFILES DE EDITRAN 5.2 A 5.3 PAG. X EDI V5.2 ========================================== FECHA DD/MM/AAAA SESION/REMOTO/APLICACION INCIDENCIA EN PERFILES ------------------------ ------------------------------------------------------------------------------ 000000000000099950000000 REMOTO CON VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000000000000099960000000 REMOTO CON VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000000000000099970000000 REMOTO CON VERSION 4.0 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 000000000000099980000000 REMOTO CON VERSION 4.1 INCOMPATIBLE CON 5.3. SE CAMBIA A 5.0 ``` Por último, aparece un resumen de las sesiones de EDITRAN/G, las sesiones de EDITRAN/P, las aplicaciones y los remotos que se modifican o se tienen que modificar. ``` INDRA MIGRACION DE PERFILES DE EDITRAN 5.2 A 5.3 PAG. X EDI V5.2 ========================================== FECHA DD/MM/AAAA SESION/REMOTO/APLICACION INCIDENCIA EN PERFILES ------------------------ ------------------------------------------------------------------------------ SESIONES EDITRAN/G SELECCIONADAS 000603 SESIONES EDITRAN/P SELECCIONADAS 000412 REMOTOS EDITRAN/G SELECCIONADOS 000146 APLIC. EDITRAN/G SELECCIONADAS 000153 ``` ## SYSOUT Esta salida informa de las sesiones de transmisión que no existen para una sesión de presentación concreta y que se van a eliminar. Ejemplo: ``` ZTBGBM53 ELIMINADA LA SESION DE PRESENTACION A0009994A000099990PRUJCB POR NO EXISTIR LA DE TRANSMISION ZTBGBM53 ELIMINADA LA SESION DE PRESENTACION A00099940000099940CICLIN POR NO EXISTIR LA DE TRANSMISION ``` --- # Agent Instructions This documentation is published with GitBook. GitBook is the documentation platform designed so that both humans and AI agents can read, navigate, and reason over technical content effectively. Learn more at gitbook.com. ## Querying This Documentation If you need additional information that is not directly available in this page, you can query the documentation dynamically by asking a question. Perform an HTTP GET request on the current page URL with the `ask` query parameter, and the optional `goal` query parameter: ``` GET https://docs.editran.onesait.com/documentacion-editran/copy-of-privado-editran-v5.3-cics/migracion-a-v5.3-fase-1/migracion-desde-cualquier-fase-de-editran-v5.2.md?ask=&goal= ``` `ask` is the immediate question: it should be specific, self-contained, and written in natural language. `goal` is optional and describes the broader end goal you are ultimately trying to accomplish on behalf of the user. GitBook uses it to tailor the answer towards what is most useful for that goal. The response will contain a direct answer to the question and relevant excerpts and sources from the documentation. Use this mechanism when the answer is not explicitly present in the current page, you need clarification or additional context, or you want to retrieve related documentation sections.