Re: Pasar archivo a una carpeta del PC

Wed, 15 Oct 2008 05:24:26 -0700 

Vamos por partes:

Seguramente el archivo se ha copiado el directorio por defecto, por ejemplo
/home/"usuario" cuando realizas
CPYTOIMPF FROMFILE(CELFIL/PDFDATOS) TOSTMF(pdfdat.fdf) MBROPT(*REPLACE)
RCDDLM(*CRLF) DTAFMT(*FIXED) DECPNT(*COMMA)

Y el error en el mndto CPYTOIMPF diría que el porque no hay un directorio
del IFS del AS400 que sea "c:\x\" ya que en AS400 no hay disco C ;-)

Y veo varios errores en utilizar a la vez los parámetros RCDDLM(*CRLF)
DTAFMT(*FIXED). Con *CRLF debe ser suficiente, pero recuerda utilizas una
página de códigos ASCII

Yo lo plantearía al revés, es decir el archivo fdf lo dejaría en un
directorio del as400, por ejemplo creas un directorio con MKDIR
'/compartido', creas un compartimiento por netserver a ésta carpeta y en el
PC la defines como una unidad de red.

Y utilizas a continuación un CPYTOSTMF de tu archivo PF a un fdf en el
directorio /compartido.

Por último, lanzas STRPCCMD a dicho archivo fdf del directorio /compartido

Espero que te sirva.

Salu2

El 14 de octubre de 2008 17:28, CELUGO - Informatica
<[EMAIL PROTECTED]>escribió:

>  Hola, foreros.
>
> Estoy intentando pasar un archivo desde el AS400 a una carpeta del PC, pero
> no soy capaz.
>
> Me explico: tengo un archivo en el AS400 generado con CRTPF. En él tengo
> varios registros de un campo por registro. Quiero copiarlo a una carpeta
> determinada del PC con el nombre "xxxx.fdf" y después lanzar el mandato
> STRPCCMD que abra este archivo.
>
> He probado con los mandatos CPYTOPCD, CPYTOSTMF y CPYTOIMPF pero no he
> conseguido nada.
>
> Si utilizo el comando de la siguiente forma:  CPYTOIMPF
> FROMFILE(CELFIL/PDFDATOS) TOSTMF(pdfdat.fdf) MBROPT(*REPLACE) RCDDLM(*CRLF)
> DTAFMT(*FIXED) DECPNT(*COMMA) me dice que se han copiado todos los
> registros, pero no lo encuentro por ninguna parte.
>
> Si utilizo el comando CPYTOIMPF FROMFILE(LIBX/PDFDATOS)
> TOSTMF('c:\x\pdfdat.fdf') MBROPT(*REPLACE) RCDDLM(*CRLF) DTAFMT(*FIXED)
> DECPNT(*COMMA) me da el siguiente error.
>
>  CPYTOIMPF FROMFILE(CELFIL/PDFDATOS) TOSTMF('c:\x\pdfdatos.fdf') MBROPT(*RE
>
>  PLACE) RCDDLM(*CRLF) DTAFMT(*FIXED) DECPNT(*COMMA)
>
>  Archivo QACP002224 creado en la biblioteca QTEMP.
>
>  Miembro QACP002224 añadido a archivo QACP002224 en QTEMP.
>
>  No se ha podido crear el archivo.
>
>  No se han copiado registros del archivo PDFDATOS en LIBX.
>  Se ha suprimido el objeto QACP002224 en QTEMP tipo *FILE.
>
>  El mandato de copiar ha finalizado debido a un error.
>
>
> He probado también a darle a la carpeta del PC permiso "control total" y
> con el mismo usuario y contraseña del as400. Está arrancado el servicio
> "mandato remoto de client access" en el PC con la opción de interactuar con
> el escritorio. Incluso lo he probado con el firewall desactivado.
>
> Hay algo que se me escapa y no sé qué es.
>
> ¿Es posible hacer lo que quiero de forma "sencilla"?
>
> Gracias.
>
> Un saludo.
>
> Víctor Díaz
>
> __________________________________________________
> Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
> &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://listas.combios.es/mailman/listinfo/forum.help400
>

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a