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

Responder a