Investigamos por diferentes espacios para brindarte la respuesta para tu duda, en caso de dificultades déjanos la inquietud y responderemos porque estamos para ayudarte.
Solución:
USAGE en COBOL describe cómo se va a utilizar un elemento de datos. Algunos ejemplos de USO son:
- MOSTRAR. Esto identifica un elemento que puede imprimirse en una terminal o informe. Esto puede o no ser un número (por ejemplo, podría ser un valor de texto). La descripción del elemento DISPLAY viene dada por la cláusula PICture. Por ejemplo:
PIC 9(5) USAGE DISPLAYdescribe un número de 5 dígitos que se puede mostrar (imprimir). A menudoUSAGE DISPLAYse deja fuera porque está implícito si falta. - ÍNDICE. Esto identifica un elemento utilizado como índice en una tabla (OCCURS).
- COMPalgo indica que el elemento de datos se utilizará en operaciones aritméticas (es decir, es un número de algún tipo).
Hay varios tipos de elementos numéricos. Dos de los tipos de datos numéricos más utilizados son:
- COMPUTACIONAL o COMP. Esto es equivalente a BINARIO
- COMPUTACIONAL-3 o COMP-3. Esto es equivalente a PACKED-DECIMAL
Los elementos de datos COMP (BINARIO) son generalmente la forma más eficiente de realizar cálculos en elementos de datos que representan valores enteros.
Los elementos de datos COMP-3 (PACKED-DECIMAL) se utilizan en COBOL porque mantienen un número fijo de puntos decimales. Todos los cálculos conducen a un resultado que tiene el número prescrito de puntos decimales. Esto es particularmente útil en operaciones de tipo contable. Los números de punto flotante hacen que el número de dígitos después del punto decimal sea variable (p. ej., el punto decimal puede “flotar”), que no es la forma en que normalmente se representan las operaciones financieras.
Puede encontrar una lista completa de elementos informáticos para IBM Enterprise COBOL aquí
Uno de los problemas que tienen muchos programadores cuando comienzan con COBOL es comprender que un elemento COMP es excelente para hacer matemáticas, pero no se puede mostrar (imprimir) hasta que se convierte en un elemento DISPLAYable a través de una instrucción MOVE. Si MOVER un elemento COMP a un informe oa una pantalla, no se presentará muy bien. Primero debe moverse a un elemento DISPLAY.
La otra cosa que quizás desee investigar un poco más es la relación entre la IMAGEN y el USO al definir variables en COBOL. Aquí hay un enlace a un muy buen tutorial introductorio de COBOL de la Universidad de Limerick.
COBOL realmente solo tiene dos tipos de datos: Números y cadenas.
El diseño de cada campo en un registro COBOL se especifica con precisión mediante un PICTURE (generalmente abreviado PIC) cláusula. Los más comunes son:
PIC Xpara cuerdasPIC X(100)significa 100 bytes string.PIC 9para números, opcionalmente conS(signo) oV(punto decimal implícito). Por ejemplo,PIC S9(7)V99significa un número con signo con 7 dígitos a la izquierda del punto decimal implícito y 2 dígitos a la derecha.
Los campos numéricos pueden tener un USAGE cláusula para optimizar su almacenamiento. Los más comunes USAGEson DISPLAY, COMPy COMP-3.
DISPLAY almacena cada dígito como un carácter. Por ejemplo, PIC 9(4) VALUE 123 almacena el número como si fuera el string “0123”. Y PIC 9(4)V99 VALUE 123.45 lo almacena como “012345”. Tenga en cuenta que el punto decimal en realidad no se almacena.
Este es un formato ineficiente ya que requiere 8 bits para representar cada dígito. Pero tiene una “optimización” para números con signo al usar la mitad del último byte para almacenar el signo. Normalmente, todos los dígitos EBCDIC tienen un nibble alto de F, por lo que 0123 es F0 F1 F2 F3. Pero -0123 es F0 F1 F2 D3; la D indica negativo. C significa positivo y F significa sin signo (es decir, positivo). (Se utilizan formatos similares en las versiones ASCII de COBOL, pero no como estandarizados).
COMP-3 es un decimal codificado en binario con un signo final nybble. PIC 9(3) COMP-3 VALUE 123 se convierte en los dos bytes 12 3F.
COMP o BINARY es un formato binario nativo, al igual que short, into long Cª.
En cuanto a decidir qué tipo de datos usar, puede ser muy complicado, PERO, un conjunto simple de pautas son:
MOSTRAR y la zona decimal editada solo debe usarse para mostrar valores numéricos en un informe o salida del sistema. Mueva los campos COMP y COMP-3 a un campo DISPLAY/Edited antes de colocarlo en un informe o en sysout.
COMP. – tiene la velocidad de cálculo más rápida para enteros
COMP-3 (DECIMALES EMPAQUETADOS) – debe usarse cuando posiciones decimales debe ser mantenido.
Los campos COMP y COMP-3 se pueden usar juntos en los cálculos. El compilador determinará qué tipo de campo se convertirá (debajo de las cubiertas) a un solo tipo de datos numérico común: basado en reglas.
Comentarios y valoraciones del post
Te invitamos a añadir valor a nuestra información añadiendo tu veteranía en los comentarios.