Números negativos y decimales - Capítulo 16

Curso de COBOL desde cero


En este capítulo te voy a enseñar a trabajar con negativos y decimales.
Con lo que has visto hasta ahora, no puedes poner ni números negativos ni decimales.

Números decimales en COBOL

Para que una variable admita este tipo de dato numérico, debes incuir la letra V en el PICTURE, la cuál representará el punto de los decimales.

Mira unos ejemplos de colocación:

Código

01 NUM1 PIC 99V99.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
00.00

01 NUM1 PIC 9999V99.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
0000.00

01 NUM1 PIC 999V99999.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
000.00000

Números negativos en COBOL

Para especificar PICTURE con números negativos, debes hacerlo con la letra S. La pondrás delante de los 9.

Mira unos ejemplos de colocación:

Código

01 NUM1 PIC S9999.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-0000 o +0000

01 NUM1 PIC S999999.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-000000 o +000000

01 NUM1 PIC S9.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-0 o +0

Esto te da la opción de poner números negativos y positivos, para hacerlo negativos, tendrás que especificar el símbolo menos delante de la asignación de valor en la variable.
Si no entiendes esto, en el vídeo tienes un ejemplo gráfico que seguramente te ayudará a entenderlo mucho más fácil.

También puedes tener una combinación con números negativos y decimales a la vez:

Código

01 NUM1 PIC S99V99.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-00.00 o +00.00

01 NUM1 PIC S99V9999.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-00.0000 o +00.0000

01 NUM1 PIC S9V9.
*EQUIVALE A UN NÚMERO DE ESTE TAMAÑO:
-0.0 o +0.0

Suscríbete a mi canal de YouTube para apoyarme

Si te ha gustado este curso y crees que el trabajo merece la pena, te agradeceré eternamente que te suscribas a mi canal de YouTube para apoyarme y que pueda seguir haciendo cursos gratuitos.

Además, si te encanta la programación, tienes un montón más de cursos gratuitos para ver.

No solo eso, podrás participar enviándome comentarios con tus sugerencias para temas específicos o cursos completos o incluso las dudas que tengas y las intentaré ir resolviendo en los cursos que estén todavía abiertos.


Comentarios

Si te quedan dudas sobre el temario, sobre COBOL, o cualquier otra cosa relacionada o simplemente quieres agradecer, aquí tienes tu sitio para dejar tu granito de arena. Gracias por tus comentarios y por darle vida a este sitio web.