Un tipo COMP- 1 es una simple precisión , tipo de punto flotante que utiliza cuatro bytes de almacenamiento . El primer byte almacena el signo de número ( positivo o negativo ) en su bit más a la izquierda , y el exponente en los siete bits restantes . Los siguientes tres bytes almacenan la mantisa , o los números que vienen después del punto decimal . A COMP- 2 tipo es una variable de ocho bytes de doble precisión. Su primer octeto funciona igual que el COMP- 1 tipo y los restantes siete bytes almacenan la mantisa. Tipos COMP- X no truncan los resultados de las operaciones .
Zonal y Decimal empaquetado
COMP -3 es un tipo decimal empaquetado que utiliza cada byte para representar a los dos dígitos , a excepción de la extrema derecha , que tiene un número de bits de cero a tres y el signo de cuatro bits a siete. Un decimal con zona es un tipo sin envasar que utiliza un byte para representar un dígito , donde para cada uno, bits de cero a tres tienen el signo y los bits de cuatro a siete tienen una representación binaria de la cifra en sí .
tipos binarios
el binario , COMP y COMP- 4 tipos de todos los almacenes enteros binarios. Sin embargo , se truncan los resultados de las operaciones antes de guardar el valor. Puede utilizar las palabras clave COMP y notrunc forzar operaciones se comporten como tipos COMP- X . Algunas implementaciones COBOL también tienen COMP - 5 , que es un tipo binario que utiliza operaciones binarias completo sin truncar los resultados . Debido al truncamiento, operaciones con tipos binarios generalmente toman más tiempo que las operaciones con tipos de COMP- X .
IMAGEN Cláusula
La cláusula PICTURE COBOL permite crear cadenas con un determinado conjunto de parámetros. Por ejemplo , puede crear cadenas que sólo puede tener caracteres alfabéticos o cadenas que permiten los caracteres válidos. También puede utilizar la palabra clave PIC para crear tipos de números firmados o sin firmar . Con esta cláusula , también se especifica la longitud del valor . Por ejemplo, " PIC 999 " crea un número de tres dígitos , mientras que " PIC X ( 3 ) " crea una cadena de tres caracteres .