En la lección 1.3 se describe la creación de una clase de almacenamiento intermedio de mensaje.
Antes de empezar, debe completar la Lección 1.2: configurar el proyecto Web y la interfaz e implementaciones
Java. En esta lección realizará las siguientes tareas:
- Crear una clase de almacenamiento intermedio de mensaje
- Editar la clase de almacenamiento intermedio de mensaje utilizando
anotaciones doclet
- Crear las operaciones de enlace de entrada y salida
- Crear las correlaciones de datos de segmento de salida
- Primero creará una clase de almacenamiento intermedio de mensajes: Expanda el proyecto
MultiSegOutput, expanda Recursos Java y expanda
JavaSource.
- Pulse con el botón derecho del ratón en el paquete sample.ims y seleccione
Nuevo> Clase para lanzar el asistente Nueva clase.
- Especifique CCIBuffer como el nombre de la clase. Acepte todos
los valores por omisión.
- Pulse Terminar. La clase CCIBuffer se abre en el editor
Java.
- En la sección de comentarios de la clase CCIBuffer, teclee el código
@type-descriptor.message-buffer.
- Pulse CTRL-S para guardar los cambios. Verá que se genera nuevo código automáticamente en
CCIBuffer.java.
- A continuación creará un método para ejecutar la transacción
IMS y el tipo de datos de mensaje de
entrada: en la vista Explorador de proyectos, pulse con el botón derecho sobre MSOImpl.java
y seleccione Fuente > Añadir método a bean Java J2C.
- En la página Método Java
pulse Añadir.
- Especifique runMultiSegOutput como el nombre del método
Java. Pulse Siguiente.
- Pulse Nuevo para definir el tipo de entrada.
- Seleccione la correlación COBOL_a_Java. Pulse Examinar.
- Busque el archivo COBOL MSOut.cbl. Pulse Abrir.
- Pulse Siguiente.
- En la página Importador COBOL, pulse Mostrar valores avanzados.
- Seleccione las siguientes opciones:
Tabla 1. Valores de parámetros de importador COBOLParámetro |
Valor |
Nombre de plataforma |
Z/OS |
Página de códigos |
IBM-037 |
Nombre de formato de coma flotante |
IBM Hexadecimal |
Signo decimal externo |
EBCDIC |
Nombre Endian |
Big |
Nombre endian de entero remoto |
Big |
Nombre de comillas |
DOUBLE |
Nombre Trunc |
STD |
Nombre Nsymbol |
DBCS |
- Pulse Consulta para cargar los datos.
- Se muestra una lista de estructuras de datos. Seleccione INPUT-MSG en el campo
Estructuras de datos.
- Pulse Siguiente.
- Deje sin marcar Guardar sesión como script Ant.
- En la página Guardar propiedades, el Nombre de clase predeterminado es INPUTMSG.
Sobrescriba el Nombre de clase con InputMsg. Pulse Terminar.
- A continuación creará el tipo de datos de mensaje de salida: pulse Examinar para
definir el tipo de salida.
- Teclee CC en el campo Seleccionar un tipo de datos y CCIBuffer
aparecerá en el campo Tipos coincidentes.
Seleccione CCIBuffer como
el tipo de salida. Pulse Terminar.
- En la página Método Java,
pulse Finalizar.
- En la página Métodos
Java, asegúrese de que
interactionVerb esté establecido en SYNC_SEND_RECEIVE (1) para indicar
que la interacción con IMS implica una
interacción de envío seguida de una de recepción.
- Pulse Terminar.
- A continuación creará las correlaciones de datos de segmentos de salida. Primero creará la clase
OutputSeg1.java: Para realizar esta tarea, deberá utilizar un asistente de correlación de datos autónomo para
crear solamente los archivos de correlación de datos.
- Seleccione Archivo > Nuevo > Otros > Enlace de datos Java CICS/IMS para invocar el
asistente Enlace de datos.
- Pulse Siguiente.
- Seleccione COBOL_a_Java en la lista Elegir correlación. Pulse
Examinar para buscar el copy book COBOL MSOut.cbl.
- Pulse Siguiente.
- En la página Importador COBOL, pulse Mostrar valores avanzados.
- Seleccione las siguientes opciones:
Tabla 2. Valores de parámetros de importador COBOLParámetro |
Valor |
Nombre de plataforma |
Z/OS |
Página de códigos |
IBM-037 |
Nombre de formato de coma flotante |
IBM Hexadecimal |
Signo decimal externo |
EBCDIC |
Nombre Endian |
Big |
Nombre endian de entero remoto |
Big |
Nombre de comillas |
DOUBLE |
Nombre Trunc |
STD |
Nombre Nsymbol |
DBCS |
- Pulse Consulta para cargar los datos.
- Se muestra una lista de estructuras de datos. Seleccione OUTPUT-SEG1 en el campo
Estructuras de datos.
- Pulse Siguiente.
- En el asistente Guardar propiedades, pulse Examinar y seleccione el proyecto
MultiSegOutput que ha creado antes.
- Pulse Examinar para seleccionar el nombre del paquete:
sample.ims.data.
- Cambie el nombre de clase
Java de
OUTPUTSEG1 por OutputSeg1.
- Pulse Terminar.
- Ahora creará la clase OutputSeg2.java: Seleccione Archivo > Nuevo > Otros > Enlace de
datos Java CICS/IMS para invocar el asistente Enlace de datos.
- Pulse Siguiente.
- Seleccione COBOL_a_Java en la lista Elegir correlación. Pulse
Examinar para buscar el copy book COBOL MSOut.cbl.
- En la página Importador COBOL, pulse Mostrar valores avanzados.
- Seleccione las siguientes opciones:
Tabla 3. Valores de parámetros de importador COBOLParámetro |
Valor |
Nombre de plataforma |
Z/OS |
Página de códigos |
IBM-037 |
Nombre de formato de coma flotante |
IBM Hexadecimal |
Signo decimal externo |
EBCDIC |
Nombre Endian |
Big |
Nombre endian de entero remoto |
Big |
Nombre de comillas |
DOUBLE |
Nombre Trunc |
STD |
Nombre Nsymbol |
DBCS |
- Pulse Consulta para cargar los datos.
- Se muestra una lista de estructuras de datos. Seleccione OUTPUT-SEG2 en el campo
Estructuras de datos.
- Pulse Siguiente.
- En el asistente Guardar propiedades, pulse Examinar para seleccionar el
proyecto MultiSegOutput que ha creado antes.
- Pulse Examinar para seleccionar el nombre del paquete:
sample.ims.data.
- Cambie el nombre de clase
Java de
OUTPUTSEG2 por OutputSeg2.
- Pulse Terminar.
- Ahora creará la clase OutputSeg3.java: Seleccione Archivo > Nuevo > Otros > Enlace de
datos Java CICS/IMS para invocar el asistente Enlace de datos.
- Pulse Siguiente.
- Seleccione COBOL_a_Java en la lista Elegir correlación. Pulse
Examinar para buscar el copy book COBOL MSOut.cbl.
- En la página Importador COBOL, pulse Mostrar valores avanzados.
- Seleccione las siguientes opciones:
Tabla 4. Valores de parámetros de importador COBOLParámetro |
Valor |
Nombre de plataforma |
Z/OS |
Página de códigos |
037 |
Nombre de formato de coma flotante |
IBM 390 Hexadecimal |
Signo decimal externo |
EBCDIC |
Nombre Endian |
Big |
Nombre endian de entero remoto |
Big |
Nombre de comillas |
DOUBLE |
Nombre Trunc |
STD |
Nombre Nsymbol |
DBCS |
- Pulse Consulta para cargar los datos.
- Se muestra una lista de estructuras de datos. Seleccione OUTPUT-SEG3 en el campo
Estructuras de datos.
- Pulse Siguiente.
- En el asistente Guardar propiedades, pulse Examinar para seleccionar el
proyecto MultiSegOutput que ha creado antes.
- Pulse Examinar para seleccionar el nombre del paquete:
sample.ims.data.
- Cambie el nombre de clase
Java de
OUTPUTSEG3 por OutputSeg3.
- Pulse Terminar.