Ver Mensaje Individual
  #2
Antiguo 22 de abril de 2016, 09:21
Kuk
Administrador
Última Actividad 19.09.2026 20:11
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

Fito, define el "RenderText" en "Standard" y haz lo siguiente:

Código COBOL:
  1.  WORKING-STORAGE SECTION.
  2.  01  EDT-DECIMAL        PIC Z(5)9,9(6).
  3.  
  4.  PROCEDURE DIVISION:
  5.  
  6.      MOVE 1234,456789 TO EDT-DECIMAL
  7.      
  8.      MOVE EDT-DECIMAL TO POW-TEXT OF CmText1



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita