Ir a contenido principal

Bienvenido a My developerworks. Si no tiene un ID de IBM y un password, regístrese aquí.

Al hacer clic en Enviar, usted está de acuerdo con los términos y condiciones de developerWorks.

La primera vez que inicie sesión en developerWorks, se creará un perfil para usted. Este perfil incluye el nombre, apellido y nombre de usuario que poporcinó cuando se registró en developerWorks. Cierta información de su perfil será mostrada públicamente, pero usted puede editar la información en cualquier momento. Su nombre, apellido (a menos que usted elija ocultarlo), y nombre de usuario acompañarán el contenido que usted publica.

Toda la información enviada es segura.

La primera vez que inicia sesión en developerWorks se crea un perfil para usted, teniendo que elegir un nombre para mostrar en el mismo. Este nombre acompañará el contenido que usted publique en developerWorks.

Por favor elija un nombre de 3 - 31 caracteres. Su nombre de usuario debe ser único en la comunidad developerWorks y debe ser distinto a su dirección de email por motivos de privacidad.

Al hacer clic en Enviar, usted está de acuerdo con los términos y condiciones de developerWorks.

Toda la información enviada es segura.

Transforme de UML a COBOL, Parte 1

Cree programas COBOL y servicios web sin escribir código

Reginaldo Barosa, Executive IT Specialist, IBM
Author photo
Reginaldo W. Barosa es Executive IT Specialist en IBM, brinda soporte de ventas, ayudando a los clientes en las soluciones de modernización empresariq y herramientas de desarrollo, como Rational Developer for System z. Antes de ingresar a IBM U.S., hace ya más de nueve años, Reginaldo trabajó durante 27 años para IBM Brasil, fue coautor de IBM Redbooks y escribió dos libros, además de otros artículos y tutoriales para IBM developerWorks. Es ingeniero eléctrico egresado del Instituto Maua de Tecnologia en San Pablo, Brasil.

Resumen:  Conozca una nueva característica de la Versión 7 de WebSphere® Developer para System z™: z/OS Database Application Generator. z/OS Database Application Generator genera automáticamente programas CICS® COBOL con acceso a DB2®. Esta característica además genera un servicio web y el Lenguaje de Control de Trabajos (JCL) que lo ayudará a implantar el código generado. Este tutorial comienza con una introducción rápida a esta característica y le presenta un escenario de ejemplo que le enseñará a transformar UML a COBOL. Nota: A partir de la Versión 7.1, WebSphere Developer for System z pasó a denominarse Rational Developer for System z.

Fecha:  03-08-2011
Nivel:  Intermediaria

Comentario:  

Configuración e instalación de servicios web CICS en z/OS

El asistente Database Application Generator puede resultar muy útil para crear los activos necesarios para los activos de servicios web, pero no hace milagros. Aún será necesario crear las definiciones CICS para implementar los servicios CICS. Esta sección explica brevemente cómo crear las definiciones de servicios Web CICS para el escenario de ejemplo.

Creación de directorio z/OS HFS

Para exponer un programa CICS como servicio web sobre HTTP, se requieren recursos TCPIPSERVICE y PIPELINE. La definición del recurso PIPELINE señala a una serie de directorios HFS y a un archivo de configuración de canalización. La configuración de servicios CICS requiere configurar archivos y directorios en el HFS.

Para este ejemplo, cree los siguientes directorios HFS. Puede usar un shell USS de WebSphere Developer para System z para crear estos directorios.

  • /u/itso04/wdzv7pot/shelf/
    CICS usa este directorio para almacenar los archivos de enlace de servicios web que están asociados con recursos WEBSERVICE. Cada recurso WEBSERVICE está asociado a un PIPELINE. CICS administra el directorio shelf junto con el recurso PIPELINE. Considere que varios PIPELINE pueden usar el mismo directorio shelf porque CICS proporciona una estructura de directorios única para cada PIPELINE debajo del directorio shelf. Además, como CICS escribe a este directorio, requerirá de permisos de seguridad adecuados.
  • /u/itso04/wdzv7pot/wspickup/provider/
    El directorio de recogida contiene los archivos de enlace de servicios web que deberán asociarse a PIPELINE. Ante la instalación de un PIPELINE o la emisión de un comando PERFORM PIPELINE SCAN (REALIZAR ESCANEO DE CANALIZACIÓN), CICS buscará en este directorio archivos que terminen en .wsbind. Para cada archivo .wsbind, CICS crea dinámicamente un WEBSERVICE y un URIMAP, los asocia con PIPELINE y los instala dejándolos listos para usar.

Copia del archivo WSBIND a z/OS

El archivo WSBIND generado debe encontrarse en el directorio de recogida del servicio CICS (WSDIR), es decir, el directorio que se definió en la CICS PIPELINE (CANALIZACIÓN CICS). En este ejemplo, usamos el directorio HFS /u/itso04/wdzv7pot/wspickup/provider/.

Tome en cuenta que el archivo WSBIND es un archivo binario EBCDIC. Debe transmitirse en forma binaria al sistema z/OS objetivo. Puede usar las facilidades Remote System Explorer de WebSphere Developer para System z para transmitir este archivo al directorio HFS del sistema z/OS objetivo. CICS usa este archivo durante su proceso de PIPELINE y generación de servicios web.

Al mover el archivo WSBIND a z/OS, cerciórese de que los archivos con la extensión .wsbind se administren como archivos binarios. Para verificar, use la ventana de preferencias en Windows > Preferences > Remote Systems > Files (Ventanas > Preferencias > Sistemas remotos > Archivos). Tome en cuenta que los archivos *.wsbind predeterminadamente se transfieren en modo de transferencia de archivos binario. No es necesario realizar ningún cambio.

Para copiar WSBIND, siga los pasos a continuación:

  1. En la vista Remote Explorer, seleccione los dos archivos, WSBIND, CUSTCRUD.wsbind y CUSTLIST.wsbind, haga clic derecho y seleccione Copy.
  2. Pase a la vista Remote System, expanda USS Files, haga clic derecho en itso04/wdzv7pot/wspickup/provider/ y seleccione Paste. Los dos archivos WSBIND se copiarán al sistema z/OS.

Creación de una definición de recurso CICS PIPELINE

Un PIPELINE es un recurso CICS usado cuando una aplicación CICS desempeña el rol de proveedor o solicitante de servicios web. Este recurso proporciona información acerca de programas administradores de mensajes que participan en una solicitud de servicio y su respuesta. Normalmente, varias aplicaciones usan una misma definición PIPELINE.

La definición de un recurso PIPELINE contiene una referencia al archivo de configuración de la canalización, el directorio shelf y el directorio de recogida WSDIR. El archivo de configuración está en formato XML y detalla los administradores de mensajes que actuarán en las solicitudes y respuestas de servicios web al pasar por la canalización. En este tutorial, usamos el archivo de configuración proporcionado por CICS, cicsProvider.xml, como administrador SOAP V1.1.

Para definir el PIPELINE, use la siguiente transacción CEDA:

CEDA DEFINE PIPELINE(ITSOPIPE) GROUP(ITSOWDZ)

Observe el ejemplo mostrado en la Figura 18. Tome en cuenta que los directorios HFS distinguen mayúsculas de minúsculas y deben concordar con los directorios creados anteriormente.


Figura 18. Transacción CICS CEDA para definición de PIPELINE


Instalación de servicios z/OS CICS

Luego de definir los recursos CICS, proceda a instarlos. Al igual que en la definición de otros recursos, CICS, PIPELINE y TCPIPSERVICE deberán estar instalados para que funcione correctamente. Use la opción INSTALL para instalarlos. Para ver todos los recursos definidos e instalarlos, use la transacción CEDA CICS:

CEDA EXPAND GROUP(ITSOWDZ)


Puesta del ejecutable a disposición de CICS

Al igual que con otros programas ejecutables, antes de probar su programa, deberá asegurarse de que su CICS pueda cargarlo. Verifique que los módulos de carga CRUD y LIST creados se encuentran en loadlib y en la concatenación de la biblioteca CICS (DFHRPL). En este ejemplo, estos programas son @USTRUD, @USTLIST, CUSTCRUD, y CUSTLIST.

Para confirmar que la instalación funciona correctamente, puede efectuar una consulta. La Figura 19 muestra los resultados de la consulta CEMT al PIPELINE instalado.


Figura 19. Consulta de transacción CEMT al PIPELINE


Creación de definición del recurso CICS TCPIPSERVICE

El recurso TCPIPSERVICE le indica a CICS que escuche a un puerto TCP/IP especificado y acepte HTML. Como el cliente se conecta con sus servicios web sobre un CICS de transporte HTTP, deberá definir un TCPIPSERVICE para recibir el tráfico HTTP entrante. Generalmente, el programador de sistemas CICS debe definir el PIPELINE. Esta entrada se denomina TCPIPSERVICE cuando se usa este mecanismo de servicios CICS. En este ejemplo, use la siguiente transacción:

CEDA DEFINE TCPIPSERVICE (ITSOPORT) GROUP(ITSOWDZ)

La Figura 20 muestra la creación del TCPIPSERVICE.


Figura 20. Transacción CEDA para definir el TCPIPSERVICE


Escaneo del PIPELINE con referenciación del directorio de recogida

El recurso PIPELINE contiene una referencia a un directorio de recogida. En el paso anterior, copiamos los archivos WSBIND al directorio del proveedor de recogida, /u/itso04/wdzv7pot/wspickup/provider/.

Al instalar cada recurso PIPELINE, CICS escanea el directorio especificado en el atributo WSDIR del PIPELINE (el directorio de recogida). Para cada archivo de enlace de servicio web del directorio, es decir, para cada archivo con el sufijo .wsbind suffix, CICS instala un WEBSERVICE y un URIMAP si éste aún no existe. Los recursos existentes se reemplazarán si la información en el archivo de enlace es más reciente que los recursos existentes.

Como copiamos un archivo WSBIND nuevo al directorio de recogida, se requerirá un PIPELINE SCAN (ESCANEO DE CANALIZACIÓN). El comando PERFORM PIPELINE SCAN mostrado a continuación inicia el escaneo del directorio de recogida de PIPELINE. CICS leerá los archivos WSBIND que se encuentran en este directorio de recogida y definirá automáticamente los recursos WEBSERVICE y URIMAP asociados con estos archivos.

CEMT PERFORM PIPELINE(ITSOPIPE) SCAN

Debe recibir una respuesta NORMAL.


Inspección de los CICS WEBSERVICE y URIMAP creados

Para inspeccionar el CICS WEBSERVICE creado, use la siguiente transacción CICS:

CEMT INQ WEBSERVICE (CUSTCRUD,CUSTLIST)

La Figura 21 muestra los datos de salida. Observe que CICS definió un URIMAP para cada WEBSERVICE.


Figura 21. Inspección de CICS WEBSERVICE

Para inspeccionar el URIMAP, use el nombre definido, como muestra la consulta WEBSERVICE. Por ejemplo, para COBOCRUD, use la siguiente transacción:

CEMT INQ URIMAP($438030)

La Figura 22 muestra los datos de salida.


Figura 22. Inspección del URIMAP

9 de 14 | Anterior | Siguiente

Comentario



static.content.url=http://www.ibm.com/developerworks/js/artrating/
SITE_ID=90
Zone=WebSphere, Rational
ArticleID=649224
TutorialTitle=Transforme de UML a COBOL, Parte 1
publish-date=08032011
author1-email=rbarosa@us.ibm.com
author1-email-cc=

Etiquétalo Etiquetas

Help
Utilice el campo de búsqueda para encontrar todo tipo de contenido en My developerWorks con esa etiqueta.

Utilice el deslizador para controlar cuántas etiquetas deben mostrarse.

Las etiquetas populares muestran las etiquetas más difundidas en esta zona particular de contenido (por ejemplo: Java, Linux, WebSphere).

Mis Etiquetas muestra sus etiquetas en esta zona particular de contenido (por ejemplo: Java, Linux, WebSphere).

Utilice el campo de búsqueda para encontrar todo tipo de contenido en My developerWorks con esa etiqueta. Las etiquetas populares muestran las etiquetas más difundidas en esta zona particular de contenido (por ejemplo: Java, Linux, WebSphere). Mis Etiquetas muestra sus etiquetas en esta zona particular de contenido (por ejemplo: Java, Linux, WebSphere).