Ver Mensaje Individual
  #11
Antiguo 30 de marzo de 2015, 15:33
Breew
Patrocinador del Foro
Última Actividad 09.05.2022 07:47
Posts Posts: 125
Likes enviados Enviados: 104
Likes recibidos Recibidos: 8

Hola .

Vaya Fallo, No doy una con los numericos.
Comienzo a entender el tema de las variables numericas.

De todas maneras, me estoy calentando la cabeza y no consigo hacerlo funcionar bien.

Si quisiera hacer que dos numeros tecleados en pantalla con formato numerico de edicion me de el resultado en un tercer campo tambien visualizados como edicion, no me sale ni a tiros.

En el Form he creado 2 CmText donde introduzo el formato ZZZ9,99 y el resultado seria un tercer CmText tambien con ZZZ9,99

la procedure seria la siguiente
Código COBOL:
  1.  ENVIRONMENT     DIVISION.
  2.  DATA            DIVISION.
  3.  WORKING-STORAGE SECTION.
  4.  01 campo1          pic 9999v99.
  5.  01 campo2          pic 9999v99.
  6.  
  7.  
  8.  PROCEDURE       DIVISION.
  9.       move "text" of cmtext1 to campo1.
  10.       move "text" of cmtext2 to campo2.
  11.       Add campo1  to Campo2.
  12.       Move campo2 to "text" of cmtext3.

He hecho varias pruebas con decimal point is comma y no consigo saber si en los CmText debo tambien marcarlo o que es lo que debo de hacer.

Gracias de antemano por el incordio que os estoy dando.
Breew is offline   Responder Con Cita