CICS - Conceptos básicos de COBOL

Los programas CICS están escritos en lenguaje COBOL en Mainframes. Discutiremos sobre cómo escribir un programa COBOL-CICS simple, compilarlo y luego ejecutarlo.

Programa CICS

Escribiremos un programa COBOL-CICS simple que muestra algún mensaje en la pantalla de salida de CICS. Este programa es para demostrar los pasos involucrados en la ejecución de un programa COBOL-CICS. Los siguientes son los pasos para codificar un programa simple:

Paso 1

Inicie sesión en Mainframes y abra una sesión de TSO.

Paso 2

Cree un nuevo PDS en el que codificaremos nuestro programa.

Paso 3

Cree un nuevo miembro dentro del PDS y codifique el siguiente programa:

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
FILE SECTION.
WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(40).
01 WS-LENGTH  PIC S9(4) COMP.
PROCEDURE DIVISION.
A000-MAIN-PARA.
   MOVE 'Hello World' TO WS-MESSAGE
   MOVE '+12' TO WS-LENGTH
   EXEC CICS SEND TEXT 
      FROM (WS-MESSAGE)
      LENGHT(WS-LENGTH)  
   END-EXEC
   EXEC CICS RETURN
   END-EXEC.

Etapa 4

Después de codificar el programa, necesitamos compilarlo. Podemos compilar el programa usando el siguiente JCL:

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C  
//CICSCOB  EXEC CICSCOB,                                                
//COPYLIB = ABC.XYZ.COPYLIB,                            
//LOADLIB = ABC.XYZ.LOADLIB 
//LIB        JCLLIB ORDER = CICSXXX.CICS.XXXPROC                
//CPLSTP     EXEC DFHEITVL                                
//TRN.SYSIN  DD DSN = ABC.XYZ.PDS(HELLO),DISP = SHR     
//LKED.SYSIN DD *                                        
   NAME HELLO(R)                                          
//

Paso 5

Abra una sesión de CICS.

Paso 6

Ahora instalaremos el programa usando el siguiente comando:

CEMT SET PROG(HELLO) NEW.

Paso 7

Ejecute el programa utilizando el ID de transacción asociado. El ID de transacción lo proporciona el administrador. Mostrará la siguiente salida:

Compilación del programa

El siguiente diagrama de flujo muestra los pasos utilizados para compilar un programa COBOL-CICS:

Traductor

La función de un traductor es verificar si hay errores de sintaxis en los comandos CICS. Los traduce en declaraciones COBOL equivalentes.

Compilador

La función de un compilador es expandir los libros de copia COBOL. Compila el código después de verificar el código fuente en busca de errores de sintaxis.

Editor de enlaces

La función de un editor de vínculos es vincular diferentes módulos de objetos para crear un único módulo de carga.