Josber, los campos VARCHAR son campos compuestos, y en COBOL se representan asi:
Código COBOL:
01 PRONOM.
49 PRONOM-LON PIC S9(4) COMP-4. *> CANTIDAD DE BYTES USADA
49 PRONOM-TXT PIC X(40). *> MAXIMO
Los niveles 49 deben ser 49 y no otro. Todos los VARCHAR contienen 2 bytes demas, al principio del campo en formato binario donde se indica la longitud, que deberiamos informar segun la longitud que vayamos a usar (de 1 a 40 en este caso). De hecho es la ventaja de los VARCHAR.
En cuanto a lo otro, para los DECIMAL debes usar COMP-3 (o que es lo mismo PACKED-DECIMAL), ademas en la tabla es UNSIGNED :
Código COBOL:
01 PROCOD PIC 9(5) COMP-3.
Pero joe, todo esto son mas bien temas de rendimiento (menos lo del COMP-3). Pero entiendo que en otros sitios te funcion con DECIMAL numerico simple de COBOL? Ha de haber una conversion automatica, puede que en este caso falla por algo. Intenta cambiarlo por COMP-3 a ver que tal...
Si no, ya no se me ocurre nada mas....
