Roger
Nosotros creamos archivos tanto desde un lenguaje como del otro, y se leen y se graban indistintamente, pero teniendo la precaucion en rm de que el runtime este configurado con version 0.
Con respecto a los campos signados, optamos por decirle donde va el signo, y usamos:
Código COBOL:
02 IMPORTE-SLC PIC S9(12)V99 SIGN TRAILING SEPARATE.
Los COMP-3 no los usamos.
Los COMP-6 empezamos a investigar para convertir el archivo de texto byte a byte a numerico, o sea si tenemos por ejemplo:
si el campo comp-6 es de 12, en power seria un alfa de 6 (cada byte representa 2 digitos).
entonces si lees el alfa cada uno de esos 6 bytes representa 2 digitos numericos.
te armas una tabla con los valores hexadecimales para encontrar cada byte leido
Código COBOL:
01 W-PASE.
02 W-LINE01 PIC X VALUE X"01".
02 W-LINE02 PIC X VALUE X"02".
02 W-LINE03 PIC X VALUE X"03".
02 W-LINE04 PIC X VALUE X"04".
....
02 W-LINE99 PIC X VALUE X"99".
02 W-LINE00 PIC X VALUE X"00".
01 TABLA-PASE REDEFINES W-PASE.
02 ELEM-PASE OCCURS 100 PIC X.
y vas obteniendo los digitos empaquetados.
(nota: tenes que tener en cuenta que tambien estan los campos signados, pero tambien tienen su hexa , o sea vas a tener 10 variables mas para los positivos y 10 mas para los negativos -representacion de c/u de los 10 digitos con signo, recomiendo ver con el editor de archivos del fujitsu los valores decimales)
Resumiendo, se puede y anda bien.
Alguien comentaba el tema del orden de las claves en la select con respecto al orden en la FD. En rm no importa, pero en Power si.