Gracias a lo s 2,
@Fito, el caso es que es así como lo tengo y no funcionaba, con la salvedad de que no muevo una constante, si no una variable, por lo que realmente la sentencia auténtica es
Código COBOL:
MOVE "Text" OF CAMPO50 TO "Size" OF "Font" OF INFORMACION1
Donde CAMPO50 está definido como PIC ZZ9,99, lo que pasa es que puse el otro ejemplo, porque era el cambio que había hecho para hacer las pruebas, curiosamente, pasando una constante sin decimales, (8 en éste caso), también da error, por lo que creo que
@fastpho, no va mal encaminado.
@fastpho, no, el problema aparentemente si usas variables y no constantes, no son los decimales, aunque sí me has dado la pista, el problema es que cuando lo pasas directamente como lo he hecho yo, por lo visto, el RunTime, no hace bien la conversión y lo pasa en el formato editado, (gran cagada diría yo), si lo cambiamos por
Código COBOL:
MOVE POW-NUMERIC OF CAMPO50 TO "Size" OF "Font" OF INFORMACION1
donde no pasa el editado, si no el numérico y, a funcionar, con una instrucción de PWC3, funciona, así que espero que nunca pierda la retrocompatibilidad, si no ....
Mil gracias
Un salu2.-