Hola amigos:
Buscando en mi "baúl de descargas" (siempre descargo cosas que en algún momento te sirve) encontré una solución, siempre hay alguno que le pasó lo mismo. No sé de quien es el código para agradecerle.
En el rendertext lo puse como COBOL PICTURE, y definí el picture z.z(6), me dio el error de que no puede tener mas de 4 decimales, pero no le di importancia.
Para mover los valores creé un par de variables.
Código COBOL:
01 w-texto pic x(9).
01 w-numero redefines w-texto pic +z.z(6).
y para asignar un valor al textbox
Código COBOL:
move campo to w-numero.
move w-texto to "text" of txtTextBox.
y para tomar el valor ingresado por el operador hago al reves.
Código COBOL:
move "text" of txtTextBox to w-texto.
move w-numero to campo.
Saludos.
Fito.