Cómo convertir Ingresar campos a Alpha Numeric en COBOL

COBOL sigue siendo uno de los idiomas más ricos y elegantes computadoras en el mercado. Aparte de la potencia de cálculo y capacidad de manejo de archivos grandes , usted tiene la flexibilidad de las conversiones y los informes de números. Muchas veces puede que tenga que mostrar valores numéricos específicos en los informes de salida , archivos o campos de visualización de la pantalla , como CICS. Sin lugar a dudas , se encontrará con formatos numéricos que no se mostrarán correctamente como se almacena y tendrá que convertir además a un formato más legible . Uno de los más comunes es el decimal empaquetado o COMP- 3 campo numérico. Instrucciones
1

Identificar el campo ( s ) que desea convertir en el código COBOL. Por ejemplo , usted puede tener un campo que lee similar a : " 05 pkd - campo - 01 pic s9 ( 5v99 ) comp- 3 . " Se trata de una firma , el campo decimal empaquetado utilizado de manera eficiente en los cálculos , pero no puede ser fácilmente leído en una pantalla.
2

Vaya a la " sección Working -Storage del programa y establecer los campos intermedios a los cuales va necesidad de hacer la transición numérica deseada de la siguiente manera : crear dos campos numéricos " 05 ws- numérico pic s9 ( 5v99 ) Valor cero" y " 05 ws -display numérico pix x ( 8 ) . "

3

código de inserción en el programa para mover el campo de entrada directamente en el primer campo de intermediario " ws- numérico. " Esto va a descomprimir el número de comp- 3 en un campo numérico zonal. a su vez, tienen el código ahora se mueven el primer campo de intermediario en la segunda, ws -display- numérico. Este último campo se puede utilizar para mostrar el número , ya sea en forma impresa o en una pantalla de ordenador .
4

Compile el programa con los cambios guardados y asegúrese de que no hay errores en la compilación marcando el código de condición .
5

ejecutar la versión compilada y verificar los resultados .