COBOL - Sintaxis básica

Conjunto de caracteres

Los 'personajes' son los más bajos en la jerarquía y no se pueden dividir más. El juego de caracteres COBOL incluye 78 caracteres que se muestran a continuación:

No Señor. Descripción del personaje
1

A-Z

Alfabetos (mayúsculas)
2

a-z

Alfabetos (minúsculas)
3

0-9

Numérico
4

 

Espacio
5

+

Signo de más
6

-

Signo menos o guion
7

*

Asterisco
8

/

Barra inclinada
9

$

Signo de moneda
10

,

Coma
11

;

Punto y coma
12

.

Punto o período decimal
13

"

Comillas
14

(

Paréntesis izquierdo
15

)

Paréntesis derecho
dieciséis

>

Mas grande que
17

<

Menos que
18

:

Colon
19

'

Apóstrofe
20

=

Signo igual

Hoja de codificación

El programa fuente de COBOL debe estar escrito en un formato aceptable para los compiladores. Los programas COBOL están escritos en hojas de codificación COBOL. Hay 80 posiciones de caracteres en cada línea de una hoja de codificación.

Las posiciones de los caracteres se agrupan en los siguientes cinco campos:

Posiciones Campo Descripción
1-6 Números de columna Reservado para números de línea.
7 Indicador Puede tener un asterisco (*) que indica comentarios, un guión (-) que indica continuación y una barra inclinada (/) que indica avance de formulario.
8-11 Área A Todas las divisiones, secciones, párrafos y algunas entradas especiales de COBOL deben comenzar en el Área A.
12-72 Área B Todas las declaraciones COBOL deben comenzar en el área B.
73-80 Área de identificación Puede ser utilizado por el programador según sea necesario.

Ejemplo

El siguiente ejemplo muestra una hoja de codificación COBOL:

000100 IDENTIFICATION DIVISION.                                         000100
000200 PROGRAM-ID. HELLO.                                               000101
000250* THIS IS A COMMENT LINE                                          000102
000300 PROCEDURE DIVISION.                                              000103
000350 A000-FIRST-PARA.                                                 000104
000400     DISPLAY “Coding Sheet”.                                      000105
000500 STOP RUN.                                                        000106

JCL para ejecutar el programa COBOL anterior -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1 EXEC PGM = HELLO

Cuando compila y ejecuta el programa anterior, produce el siguiente resultado:

Coding Sheet

Cadenas de caracteres

Las cadenas de caracteres se forman combinando caracteres individuales. Una cadena de caracteres puede ser una

  • Comment,
  • Literal, o
  • Palabra COBOL.

Todas las cadenas de caracteres deben terminar con separators. Se utiliza un separador para separar cadenas de caracteres.

Separadores de uso frecuente: espacio, coma, punto, apóstrofo, paréntesis izquierdo / derecho y comillas.

Comentario

Un comentario es una cadena de caracteres que no afecta la ejecución de un programa. Puede ser cualquier combinación de caracteres.

Hay dos tipos de comentarios:

Línea de comentario

Se puede escribir una línea de comentario en cualquier columna. El compilador no comprueba la sintaxis de una línea de comentario y la trata como documentación.

Entrada de comentario

Las entradas de comentarios son aquellas que se incluyen en los párrafos opcionales de una División de Identificación. Están escritos en el Área B y los programadores lo usan como referencia.

El texto resaltado en Bold son las entradas comentadas en el siguiente ejemplo:

000100 IDENTIFICATION DIVISION.                                         000100
000150 PROGRAM-ID. HELLO.                                               000101 
000200 AUTHOR. TUTORIALSPOINT.                                          000102
000250* THIS IS A COMMENT LINE                                          000103
000300 PROCEDURE DIVISION.                                              000104
000350 A000-FIRST-PARA.                                                 000105  
000360/ First Para Begins - Documentation Purpose                       000106
000400     DISPLAY “Comment line”.                                      000107
000500 STOP RUN.                                                        000108

JCL para ejecutar el programa COBOL anterior -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1 EXEC PGM = HELLO

Cuando compila y ejecuta el programa anterior, produce el siguiente resultado:

Comment Line

Literal

Literal es una constante directamente codificada en un programa. En el siguiente ejemplo, "Hello World" es un literal.

PROCEDURE DIVISION.
DISPLAY 'Hello World'.

Hay dos tipos de literales como se explica a continuación:

Literal alfanumérico

Los literales alfanuméricos se incluyen entre comillas o apóstrofos. La longitud puede ser de hasta 160 caracteres. Un apóstrofe o una cita pueden ser parte de un literal solo si están emparejados. El comienzo y el final del literal deben ser iguales, ya sea apóstrofe o comillas.

Example

El siguiente ejemplo muestra literales alfanuméricos válidos e inválidos:

Valid:
   ‘This is valid’
   "This is valid"
   ‘This isn’’t invalid’

Invalid:
   ‘This is invalid”
   ‘This isn’t valid’

Literal numérico

Un literal numérico es una combinación de dígitos del 0 al 9, +, - o punto decimal. La longitud puede tener hasta 18 caracteres. El signo no puede ser el carácter situado más a la derecha. El punto decimal no debe aparecer al final.

Example

El siguiente ejemplo muestra literales numéricos válidos y no válidos:

Valid:
   100
   +10.9
   -1.9

Invalid:
   1,00
   10.
   10.9-

Palabra COBOL

COBOL Word es una cadena de caracteres que puede ser una palabra reservada o una palabra definida por el usuario. La longitud puede tener hasta 30 caracteres.

Usuario definido

Las palabras definidas por el usuario se utilizan para nombrar archivos, datos, registros, nombres de párrafos y secciones. Se permiten alfabetos, dígitos y guiones al formar palabras definidas por el usuario. No puede utilizar palabras reservadas COBOL.

Palabras reservadas

Las palabras reservadas son palabras predefinidas en COBOL. Los diferentes tipos de palabras reservadas que usamos con frecuencia son los siguientes:

  • Keywords como AGREGAR, ACEPTAR, MOVER, etc.

  • Special characters palabras como +, -, *, <, <=, etc.

  • Figurative constants son valores constantes como CERO, ESPACIOS, etc. Todos los valores constantes de constantes figurativas se mencionan en la siguiente tabla.

Constantes figurativas

No Señor. Constantes figurativas y descripción
1

HIGH-VALUES

Uno o más personajes que estarán en la posición más alta en orden descendente.
2

LOW-VALUES

Uno o más caracteres tienen ceros en representación binaria.
3

ZERO/ZEROES

Uno o más cero según el tamaño de la variable.
4

SPACES

Uno o más espacios.
5

QUOTES

Comillas simples o dobles.
6

ALL literal

Rellena el elemento de datos con Literal.