Ver Mensaje Individual
  #7
Antiguo 6 de junio de 2018, 13:20
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 20.09.2026 12:17
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492

Citación del post de jmeza Ver Mensaje
Josber
Si no es mucho, me podrías dar un ejemplo de esta instrucción (?, es un simple IF y un MOVE)
para implementarlo en mi programs,
Cambié el IF por un EVALUATE, pero funciona exactamente igual.

En el Evento KeyPress del campo, pones:

Código COBOL:
  1.      EVALUATE POW-ARG-KEYASCII
  2.               WHEN 46           *> Cambiamos el punto por una coma
  3.                    MOVE 44 TO POW-ARG-KEYASCII
  4.      END-EVALUATE.
Un saludo.-
Josber is offline   Responder Con Cita