Hola Txaro:
Puedes substituir el CPYTOPCD por CPYTOIMPF, pe:
CPYTOIMPF FROMFILE(LIB/FILE)
TOSTMF('/QDLS/archivo.txt')
MBROPT(*REPLACE)
STMFCODPAG(*PCASCII)
RCDDLM(*CRLF)
DTAFMT(*FIXED)
Saludos.
Marti Riera
----- Mensaje Original -----
De: "Txaro Tellechea" <[EMAIL PROTECTED]>
Fecha: Martes, Septiembre 24, 2002 4:58 pm
Asunto: Problemas en la conservaci�n de los caracteres en blancos
finales de un fich.con CPYTOPCD
> Hola,
>
> El problema que se me plantea es el siguiente:
>
> Tengo en el AS/400 generado un fichero con una longitud de
> reg. de 100 caracteres, con la peculiaridad de que en las �ltimas
> posiciones son blancos. Para verlo m�s intuitivamente os remito un
> ejemplo:
> ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6
> ...+... 7 ...+... 8 ...+... 9 ...+... 100
> AAAAAAAAA 0000810 AAAAAAAAAAA AA
> BBBBBB 0000100 BBBBBBBBBB BBBBBBB 1
> CCCCCC 0000150 CCCCCC CCCCC
> 2
> DDDDDD 0000008 DDDDDDD DDDDDD
> 3
>
> Aqu� tenemos un fichero con 4 registros. Necesito transferir este
> fichero en modo ASCII, para lo cual uso el mandato CPYTOPCD. Pero
> aqu� es donde aparecen los problemas. El fichero ASCII que yo
> obtengo en la carpeta del AS/400, no respeta la longitud del
> fichero de 100 caracteres; sino que la longitud final de cada
> registro es la siguiente posici�n al �ltimo car�cter significativo
> de cada registro. Es decir el 1� registro finaliza en la posici�n
> 73, en 2� reg. en la posici�n 85 ... ( En la transferencia con
> CLIENT ACCESS me sucede lo mismo, no puedo usar el Client Access
> Express).
> �C�mo puedo yo transferir dicho fichero a modo ASCII, de manera
> que se respete la longitud de cada registro a 100 caracteres
> incluyendo a su vez los caracteres blancos finales?
>
> Agradeciendo la colaboraci�n, os env�o un Saludo
> Txaro Tellechea,
>
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE