PerroCobolero: COBOL - Manejo de Cadenas

PerroCobolero: COBOL - Manejo de Cadenas: Manejo de cadenas en COBOL se utilizan para hacer varias operaciones con cadenas. A continuación, se indican las instrucciones de manejo ca...

Instalar COBOL en WindOWS O LINUX HERCULES

Instalar COBOL en Windows/Linux

Existen muchos Mainframe Los Emuladores disponibles para Windows, lo que se puede utilizar para escribir y aprender simples programas COBOL.

Uno de los emuladores es Hércules, que se puede instalar fácilmente en Windows siguiendo unos sencillos pasos como se indica a continuación:

• Descargue e instale el emulador Hercules, que está disponible en el sitio de la casa de Hércules: www.hercules-390.eu
• Una vez que haya instalado el paquete en máquina Windows, se creará una carpeta como C:\hércules\mvs\cobol.
• Ejecutar la línea de comandos (CMD) y llegar al directorio C:\hércules\mvs\cobol en CMD.
• La guía más completa sobre los diversos comandos para escribir y ejecutar un JCL y COBOL programas que se pueden encontrar en:
  www.jaymoseley.com/hercules/installmvs/instmvs2.htm

COBOL - Diseño de Datos

COBOL presentación es la descripción del uso de cada uno de los campos y los valores presentes en ella. A continuación, se describen los datos utilizados en las entradas descripción COBOL:

• Cláusula Redefine
• Cláusula cambia
• Cláusula Uso
• Cuadernos

Cláusula Redefine

Cláusula Redeifnes se utiliza para definir un almacenamiento con diferentes descripción de los datos. Si uno o más elementos de datos no se utilizan simultáneamente y, a continuación, la misma capacidad de almacenamiento de datos pueden ser utilizados por otro elemento de datos. Por lo tanto, el mismo tipo de almacenamiento se puede hacer referencia a diferentes elementos de datos.

Sintaxis

Siguiente es la sintaxis para Redefine cláusula:

01 WS-OLD PIC X(10).
01 WS-NEW1 REDEFINES WS-OLD PIC 9(8).
01 WS-NEW2 REDEFINES WS-OLD PIC A(10).

A continuación, se describen los detalles de los parámetros utilizados:

COBOL - Manejo de Cadenas

Manejo de cadenas en COBOL se utilizan para hacer varias operaciones con cadenas. A continuación, se indican las instrucciones de manejo cadena:

• Inspeccionar
• Cadena
• Unstring

Inspeccionar

Inspeccione verbo es usado para contar o reemplazar los caracteres de una cadena. Cadena de operaciones que se pueden llevar a cabo el alfanumérico, numérico, alfabético o valores. Inspeccionar las operaciones se realizan de izquierda a derecha. Las opciones que se utilizan para las operaciones de cadena de la siguiente manera:

Cómputo

Cómputo se utiliza la opción para contar los caracteres de la cadena.

Sintaxis

Continuación se presenta la sintaxis de Cómputo opción:

INSPECT input-string
TALLYING output-count FOR ALL CHARACTERS

Los parámetros utilizados son los siguientes:

COBOL - Interfaz de la Base de Datos

Hasta ahora, hemos aprendido el uso de los archivos en COBOL. Ahora, vamos a analizar cómo interactúa un programa COBOL con DB2. Implica las siguientes condiciones:

• Embedded SQL
• Programación de aplicaciones DB2
• Variables Host
• SQLCA
• Las consultas SQL
• Cursores

Embedded SQL

Las sentencias SQL incorporadas se utilizan en programas COBOL SQL estándar para realizar las operaciones. Las sentencias SQL incorporadas son preprocesados por procesador SQL antes de que el programa de aplicación se compila. COBOL es conocida como la lengua del país anfitrión. COBOL-DB2 son las aplicaciones que incluyen tanto COBOL y DB2.

Las sentencias SQL incorporadas como declaraciones SQL normal con algunos cambios de menor importancia. Por ejemplo, que la producción de una consulta se dirige a un conjunto predefinido de variables que se conoce como Host Variables. Cláusula adicional se coloca dentro de la instrucción SELECT.

Programación de aplicaciones DB2

COBOL - Subrutinas

Cobol subrutina es un programa que puede ser compilado con total independencia, pero no pueden ser ejecutadas independientemente. Hay dos tipos de subrutinas: subrutinas internas comorealizardeclaraciones yexternas subrutinas comoLLAMAR verbo.

Llamada Verbo

Llamada verbo se usa para transferir el control de un programa a otro programa. El programa que contiene la LLAMADO verbo es el Programa de llamadas y el programa que se llama sea conocido como el Programa llamado. Programa que realiza la llamada ejecución se detendrá hasta que el programa llamado termina la ejecución. Salir del programa instrucción se utiliza en el programa llamado para transferir el control.

Programa llamado Limitaciones

Estos son los llamados requisitos del programa:

COBOL - Modo de Acceso a Archivos

Hasta ahora, la organización de los archivos han sido objeto de debate. Para cada archivo organigrama, distintos modos de acceso puede ser usado. A continuación, se describen los tipos de archivos modos de acceso:

• Acceso secuencial
• Acceso aleatorio
• Acceso Dinámico

La sintaxis, en este módulo, junto con sus respectivos términos sólo se refieren a su uso en el programa. Los programas completos utilizando estas sintaxis se examinará en el próximo capítulo.

Acceso secuencial

COBOL - Proceso de Tabla

Las matrices de COBOL son conocidos como tablas. Un array es una estructura de datos lineal y es una recopilación de los distintos elementos de datos del mismo tipo. Los datos de una tabla se clasifican internamente.

Declaración mesa

Tabla de Datos se declara en División. se produceCláusula se utiliza para definir una tabla. Cláusula se indica la repetición de datos definición de nombre. Sólo se puede utilizar con números de nivel a partir de 02 a 49. No se produce el uso con cláusula redefine. Descripción de un y bidimensional tabla es el siguiente:

One-Dimensional Tabla

En una tabla multidimensional, se produce cláusula sólo se utiliza una vez en la declaración. WS-TABLA es el elemento de grupo que contiene tabla. WS-B nombres de los elementos de la tabla que se producen 10 veces.

Sintaxis

Siguiente es la sintaxis para definir una tabla multidimensional:

01 WS-TABLE.
   05 WS-A PIC A(10) OCCURS 10 TIMES.

Ejemplo

Manejo de archivos EN COBOL

Manejo de archivos los verbos se utilizan para realizar diversas operaciones con archivos. A continuación, se describen los verbos manejo de archivos:

• Abrir
• Leer
• Escribir
• Nueva Versión
• Eliminar
• Inicio
• Cerrar

Abra Verbo

La primera operación de archivo que se debe realizar. Si tiene éxito, entonces sólo es posible realizar otras operaciones en un archivo. Sólo después de abrir un archivo, por lo que las variables de la estructura de archivos están disponibles para su procesamiento. ESTADO DEL ARCHIVO variable se actualiza después de cada operación de archivo.

Sintaxis

OPEN "mode" file-name.

En este caso, nombre de archivo es literal de cadena, que se utilizará para asignar un nombre al archivo. Un archivo se puede abrir en los siguientes modos:

TABLAS EN COBOL

Cobol. Tablas.

Una tabla es un conjunto campos contiguos, cuya longitud y tamaño deben ser iguales,
 unidos todos bajo un mismo nombre, de manera que accedemos a ellos de forma individual 
a través de uno o varios índices. Vamos a hacer un ejemplo para verlo mas claro:

Vamos a imaginar un cine, en las que pueden entrar un máximo de 1000 personas por día. 
Lo que queremos es que no cuente el número de personas que han ido al cine cada día 
de la semana. 

Con lo que sabemos hasta ahora debemos crear 7 variables, una para cada día de
 la semana:
...
77 lunes                pic 9(04).
77 martes             pic 9(04).
77 miercoles         pic 9(04).
77 jueves               pic 9(04).
77 viernes             pic 9(04).
77 sabado             pic 9(04).
77 domingo           pic 9(04).