COBOL para principiantes(#2)

En esta serie de post estaremos hablando de tips, ejemplos y cosas sobre el lenguaje COBOL.

Recordar: Existen tres tipos de variables en COBOL.

Alfabéticas: PIC A
Numéricas: PIC 9
Alfanuméricas: PIC X

Uso de MOVE. Empleamos esta palabra reservada para "mover" valores/datos a una variable previamente definida.

*> Variable
01 NUMERO PIC 9(3)V99.

 
*> Uso de MOVE
MOVE 3.5 TO NUMERO. *> HORA NUMERO VALE 003.5

MOVE 0.32 TO NUMERO. *> HORA NUMERO VALE 000.32

Uso de PERFORM. Es similar al CALL de los archivos bat de Windows. Sirve para transferir el control del programa a un párrafo definido. En este ejemplo el párrafo es 'MiFuncion'. Existen formatos que podemos seguir, en este caso es el más simple.

*> DESDE EL 'MAIN' DEL PROGRAMA
PERFORM MiFuncion.


*> Función
MiFuncion.
 DISPLAY "ESTO ES UN MENSAJE"

Ejemplo. Definir dos variables, la primera de tipo numérico (PIC 9). La segunda, de tipo alfanumérico (PIC X). Existe un tercer tipo (PIC A) para variables alfabéticas. La palabra MOVE nos ayudará a asignar valores. El párrafo MOVIMIENTOS será donde se efectuaran estas operaciones. PERFORM le dará el control dentro del 'MAIN' del programa.

IDENTIFICATION DIVISION.
PROGRAM-ID. USO_DE_MOVE.
AUTHOR HIRONAKAMURA.
INSTALLATION. GITHUB.
DATE-WRITTEN. 16/11/19.
DATE-COMPILED 16/11/19.
SECURITY. NO ES CONFIDENCIAL.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. HP.
OBJECT-COMPUTER. HP.


DATA DIVISION.
WORKING-STORAGE SECTION.
01 PRECIO PIC 9(4)V99.
01 NOMBRE PIC X(30) VALUE "MARIANA".


PROCEDURE DIVISION.
  PERFORM MOVIMIENTOS.
STOP RUN.

MOVIMIENTOS.
  DISPLAY "***USO DE MOVE EN COBOL ***".
  MOVE ZEROS TO PRECIO.
  DISPLAY "PRECIO = "PRECIO.
  MOVE 34.5 TO PRECIO.
  DISPLAY "PRECIO = "PRECIO.
  MOVE 123 TO PRECIO.
  DISPLAY "PRECIO = "PRECIO.
  MOVE 0.76 TO PRECIO.
  DISPLAY "PRECIO = "PRECIO.
  MOVE 1231 TO PRECIO.
  DISPLAY "PRECIO = "PRECIO.
  DISPLAY "NOMBRE (ORIGINAL): "NOMBRE.
  MOVE "LAURA" TO NOMBRE.
  DISPLAY "NOMBRE: "NOMBRE.
  MOVE "JULIA" TO NOMBRE.
  DISPLAY "NOMBRE: "NOMBRE.

COBOL es un lenguaje estructurado donde es importante respetar la lógica secuencial. Un arma de dos filos para los programadores.

En siguientes post trataremos más temas.

Enlaces importantes:
http://www.escobol.com/

Comentarios

Entradas populares de este blog

Programación Windows Batch (CMD) parte 3

Crear ciclos para efectuar operaciones tediosas nos ahorrará tiempo para realizar otras tareas. En está ocasión veremos ciclos con FOR . ¿Cuál es la síntaxis de bucle FOR en Windows Batch? Si está dentro de un archivo *.bat : FOR %%variable IN (seq) DO operaciones Si lo ejecutamos en una terminal: FOR %variable IN (seq) DO operaciones Ejemplo 1 . Recorrer una secuencia de números del 0 al 5: recorrer.bat @ echo off FOR %%i in ( 0 1 2 3 4 5 ) DO echo Hola no. %%i pause Nos imprimirá en pantalla: Hola no. 0 Hola no. 1 Hola no. 2 Hola no. 3 Hola no. 4 Hola no. 5 ¿Puedo usar contadores? Si, se pueden usar. Ejemplo 2 . Uso de contadores: contador.bat @ echo off set numeros = 1 2 3 4 5 6 7 8 9 10 set cont = 0 for %%a in ( %numeros% ) do ( echo Hola no. %%a :: Contador set /a cont+ = 1 ) echo Total: %cont% Este código nos imprimirá, además de los mensajes Hola no. 0 ..., el total de valores conta

Programación Windows Batch (CMD) parte 4

Siguiendo con la serie de post sobre programación ( 1 , 2 , y 3 ) batch ahora veremos algunas cosas como operaciones aritméticas, operadores lógicos y uso de ficheros. Cuando somos administradores de servidores o desarrolladores muchas veces tenemos que realizar tareas que nos quitan, relativamente, tiempo valioso que podríamos ocupar para otras cosas (como ver nuestro Facebook, jeje, broma). Aprender a escribir scripts que nos faciliten algunas tareas siempre es útil. Por ejemplo, conocer todas las características técnicas de nuestro equipo de cómputo nos servirá cuando se realiza peritajes informáticos y soporte al equipo. Realizar respaldos automáticos a nuestras carpetas , archivos y directorios será más sencillo gracias a un script. Pero antes debemos aprender lo básico de la programación en batch. Ejemplo 1. Operaciones aritméticas básicas. aritmetica.bat @ echo off ::Nombre del archivo, imprimirá: aritmetica.bat echo %0 :: Set nos servirá para asignar va

Programación Windows Batch (CMD)

En esta serie de post aprenderemos cómo crear nuestros propios archivos Windows Batch. 1. ¿Por qué aprender Batch en Windows? Una de las razones es que, queramos o no, algún día tendremos que trabajar usando sistemas operativos Windows. Crear scripts nos puede servir para realizar tareas que parecen sencillas en un principio, pero que pueden llegar a ser tediosas (ej. crear múltiples carpetas, comprobar la existencia de un archivo, realizar respaldos, etc.). 2. ¿Cómo puedo crear un archivo Batch en Windows? Los archivos batch en Windows pueden ser escritos con las extensiones *.bat o *.cmd. Pueden contener una serie de comandos y secuencias de instrucciones para realizar diversas tareas. Ejemplo 1. Conocer el nombre del usuario. usuario.bat @ echo off echo Hola %USERNAME% pause GOTO Comentario -- esto es un comentario multi línea que no se interpretará en MS-DOS -- :Comentario En el anterior ejemplo podemos ver que la variable USERNAME contiene

Alquimista de código

Buscar este blog