Apuntes de lectura rápida para COBOL en Mainframe (os/390 y z/OS)





Novedades





Apuntes en z/OS 110.

Ir

Instalación de Hercules.

Ir


Creación de las carpetas necesarias para correr los ejemplos.

Ir

Hola Mundo: Primero lo primero. Un código fácil para compilar y ejecutar.

Ir

Ejercicio simple con corte por sucursal, contando la cantidad de cuentas bancarias activas.

Ir



Corte de control doble, por tipo de documento y sexo.

CODIGO COBOL para agregar en IBMUSER.MAG.CBLSRC

CODIGO JCL compilador (CLA12COM) para agregar en IBMUSER.MAG.JCL

CODIGO JCL ejecutable (CLA12EXE) del compilado para agregar en IBMUSER.MAG.JCL

DATOS para crear el archivo de lectura (CLA12IN) en IBMUSER.ARCH



Otro corte de control doble con salida por archivo de impresora.

CODIGO COBOL para agregar en IBMUSER.MAG.CBLSRC

CODIGO JCL compilador (CLA15COM) para agregar en IBMUSER.MAG.JCL

CODIGO JCL ejecutable (CLA15EXE) del compilado para agregar en IBMUSER.MAG.JCL

DATOS para crear el archivo de entrada (CLA15I) en IBMUSER.ARCH

DATOS para crear el archivo de salida (CLA15O) en IBMUSER.ARCH



Corte de control triple, por tipo de cuenta, sexo y sucursal.

CODIGO COBOL para agregar en IBMUSER.MAG.CBLSRC

CODIGO JCL compilador (CLA17COM) para agregar en IBMUSER.MAG.JCL

CODIGO JCL ejecutable (CLA17EXE) del compilado para agregar en IBMUSER.MAG.JCL

DATOS para crear el archivo de lectura (CLA17I) en IBMUSER.ARCH



Diferencia entre dos códigos de salida. El primero es una salida común de registros a un archivo. El segundo es también una salida de registros a un archivo pero con formato de impresión.


Salida común a archivo, sin formato de impresión.

CODIGO COBOL para agregar en IBMUSER.MAG.CBLSRC

CODIGO JCL compilador (IMPRCOM) para agregar en IBMUSER.MAG.JCL

CODIGO JCL ejecutable (IMPREXE) del compilado para agregar en IBMUSER.MAG.JCL


Salida a archivo, con formato de impresión.

CODIGO COBOL para agregar en IBMUSER.MAG.CBLSRC

CODIGO JCL compilador (PRTCOM) para agregar en IBMUSER.MAG.JCL

CODIGO JCL ejecutable (PRTEXE) del compilado para agregar en IBMUSER.MAG.JCL

CODIGO COBOL de uso de vector, tabla o cubo.

Archivos indexados (VSAM KSDS), creación del archivo.

Ir


Código para ABM (lectura, alta, baja y modificaciones) de registros en archivo indexado.

CODIGO COBOL para ABM en el archivo creado en el punto anterior.

Dentro del código se han comentado (los PERFORM luego de los OPEN) las partes que se desea no funcionen al ejecutarlo, por ejemplo, si quiero realizar un alta,

debemos quitarle los asteriscos al modulo de altas, y ponerle los asteriscos de comentario a baja, lectura y modificación.


CODIGO JCL de compilación para el programa COBOL VSAMDEM2.

CODIGO JCL de ejecución para el programa COBOL VSAMDEM2.

NOTA: el archivo cobol incluye también una lectura secuencial del mismo vsam para verificar/buscar en una tabla

con un campo ID numérico donde cada registro sea único, en caso de alta de registro, cual seria el siguiente.

Actualización del z/OS para que funcione con DB2 y CICS.

Ir


Procedimiento para crear una base de datos en DB2, con una tabla de dos campos. En forma manual y paso a paso.

El primero de 'id' (identificación), numérico (9 digitos) entero, autoincremental y not null.

El segundo 'texto', alfanumérico (40 caracteres).

Ir


Acceso a la DB desde COBOL con codigo SQL embebido. Un ejemplo fácil.

Ir

Actualización del z/OS para que funcione con DB2 y CICS.

Ir


Primero un 'Hola mundo CICS' para ir entendiendo cual es la forma de programar, compilar y configurar...

Ir


Pseudo-conversando. Elevamos un poquito la dificultad para mostrar la interacción de entrada/salida con un mapa.

Ir


CICS de búsqueda con clave en archivo VSAM.

Ir


COBOL - CICS - DB2, un programa fácil usando los tres mundos para ir viendo como interactúan juntos.

Ir

Combinaciones de teclas.

Ir


Envio y descarga de archivos entre el mainframe y el terminal.

Ir


Creación de un volumen nuevo para nuestros programas.

Ir


LOGREC is full. Un problema que se presenta cada tanto en el terminal 1.

He encontrado una nueva forma, 'LA OFICIAL de IBM' de vaciar el LOGREC, así que quito la anterior.

Resulta que han colocado en ADCD.LIB.JCL muchas utilidades para tener listas sin programar nada. Y recién doy con ellas.

Entre ellas LOGREC. Asi que con 'v' entramos, lo submitimos, y listo.

NOTA: Este grupo no tiene que ver con COBOL, pero al ser un ítem incluido en la arquitectura del Mainframe (al que creo no se le presta atención), me parece interesante darle su lugar.


Configuración para que funcione OMVS correctamente.

Ir


Un 'Hola mundo' fácil para comenzar.

Ir


Apuntes en z/OS 111.

Ir

Acceder a una instalación de Hercules desde una pc remota por internet.

Ir


Ajustar la zona horaria de z/OS.

Ir


Solución a la advertencia 'RUNNING IN GOAL MODE' que aparece en la terminal 1 durante el inicio.

Ir

JCL para borrar datasets incompletos, no catalogados, etc.

Ir


En progreso