Hola Sergi,


Yo lo que hago es traspasar el fichero del AS400 a una carpeta del IFS y de
ahí ejecuto el FTP para traspasar ficheros y lo hago en formato UTF-8
finalmente le pongo un pipe “|” para poder importarlo a una aplicación
externa.



La instrucción para bajarlo del IBM i al IFS que utilizo es la siguiente:



CPYTOIMPF  FROMFILE(BIBLIOTECA/FICHERO) +

             TOSTMF('/home/carpeta/fichero.csv') +

             MBROPT(*REPLACE) FROMCCSID(1145) +

             STMFCCSID(1208) STMFAUT(*INDIR) +

             RCDDLM(*CRLF) DTAFMT(*DLM) STRDLM(*NONE) +

             STRESCCHR(*NONE) FLDDLM('|')

A partir de ahí un FTP y lo subo a la aplicación externa.



Cualquier consulta estoy a tu disposición.



Saludos



Lluís.



*De:* Forum.help400 [mailto:[email protected]] *En
nombre de *Sergi Sitjes
*Enviado el:* dimecres, 26 de maig de 2021 12:25
*Para:* forum.help400 <[email protected]>
*Asunto:* RE: Pasar por ftp archivo



Se me ha olvidado comentar que el fichero que quiero transferir es el
resultado de una QRY/400, así que dispongo de las “limitadas” funciones del
QRY/400 para convertir formatos si esa pudiera ser una solución.



Saludos,



Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: [email protected]
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



*De:* Forum.help400 <[email protected]> *En nombre
de *Sergi Sitjes
*Enviado el:* miércoles, 26 de mayo de 2021 12:18
*Para:* forum.help400 <[email protected]>
*Asunto:* Pasar por ftp archivo



Hola,



Tengo un fichero con varios campos, algunos de tipo GRAPHIC (pues nuestro
ERP trabaja lo campos alfanuméricos como de doble byte para soportar
lenguajes que lo requieren) y otros numéricos. El problema que tengo es que
cuando lo transfiero a un servidor via FTP (lo hago en formato ASCII) los
campos numéricos me llegan mal. Me sustituye los números por un carácter
extraño. Me llegan así:



Si hago un DSPFFD del fichero en cuestión este es el detalle del primer
campo, el que me carga como un cuadradito en lugar de ponerme el valor que
es 10.



Field Level Information

              Data        Field  Buffer    Buffer        Field    Column

   Field      Type       Length  Length  Position        Usage    Heading

   MMCONO     PACKED       3  0       2         1        Both     MMCONO



Alguna idea de cómo lo puedo solucionar?



Muchas gracias,



Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: [email protected]
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



La información que contiene este correo electrónico es confidencial y
compete exclusivamente al destinatario. Si Vd. ha recibido esta
comunicación por error, por favor, notifíquelo inmediatamente al remitente
y borre el mensaje junto con sus ficheros anexos sin leerlo, copiarlo,
grabarlo, distribuirlo o divulgarlo o hacer cualquier otro uso de la
información sin el consentimiento de Genebre S.A. El correo electrónico vía
Internet no permite asegurar la confidencialidad o correcta recepción de
los mensajes, por lo que Genebre no asume responsabilidad alguna por los
daños causados. The information contained in this communication is
confidential, may be privileged and is intended for the exclusive use of
the above named addressee. If you receive this communication in error,
please notify the sender immediately and delete it, and all its attached
documents. If you are not the intended recipient, you are expressly
prohibited from reading, copying, distributing, disseminating or, in any
other way, using any of the information without the Genebre S.A. consent.
Please note that Internet e-mail guarantees neither the confidentiality nor
the proper receipt of the message sent, so that Genebre shall not be liable
for any damages caused. La información que contiene este correo electrónico
es confidencial y compete exclusivamente al destinatario. Si Vd. ha
recibido esta comunicación por error, por favor, notifíquelo inmediatamente
al remitente y borre el mensaje junto con sus ficheros anexos sin leerlo,
copiarlo, grabarlo, distribuirlo o divulgarlo o hacer cualquier otro uso de
la información sin el consentimiento de Genebre S.A. El correo electrónico
vía Internet no permite asegurar la confidencialidad o correcta recepción
de los mensajes, por lo que Genebre no asume responsabilidad alguna por los
daños causados. The information contained in this communication is
confidential, may be privileged and is intended for the exclusive use of
the above named addressee. If you receive this communication in error,
please notify the sender immediately and delete it, and all its attached
documents. If you are not the intended recipient, you are expressly
prohibited from reading, copying, distributing, disseminating or, in any
other way, using any of the information without the Genebre S.A. consent.
Please note that Internet e-mail guarantees neither the confidentiality nor
the proper receipt of the message sent, so that Genebre shall not be liable
for any damages caused.

La información que contiene este correo electrónico es confidencial y
compete exclusivamente al destinatario. Si Vd. ha recibido esta
comunicación por error, por favor, notifíquelo inmediatamente al remitente
y borre el mensaje junto con sus ficheros anexos sin leerlo, copiarlo,
grabarlo, distribuirlo o divulgarlo o hacer cualquier otro uso de la
información sin el consentimiento de Genebre S.A. El correo electrónico vía
Internet no permite asegurar la confidencialidad o correcta recepción de
los mensajes, por lo que Genebre no asume responsabilidad alguna por los
daños causados. The information contained in this communication is
confidential, may be privileged and is intended for the exclusive use of
the above named addressee. If you receive this communication in error,
please notify the sender immediately and delete it, and all its attached
documents. If you are not the intended recipient, you are expressly
prohibited from reading, copying, distributing, disseminating or, in any
other way, using any of the information without the Genebre S.A. consent.
Please note that Internet e-mail guarantees neither the confidentiality nor
the proper receipt of the message sent, so that Genebre shall not be liable
for any damages caused.
____________________________________________________
�nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 � Publicaciones Help400, S.L.

Reply via email to