Hola de nuevo

¿y no hay mas información sobre el error CPF2817 en el joblog?

Y en mi opinión si los archivos xml son en código ascii cambiaria el
CPYFRMIMPF a un CPYFRMSTMF con los parámetros  STMFCODPAG(*PCASCII)
RCDDLM(*CRLF)

El 27 de marzo de 2015, 19:03, Elvira Vázquez <[email protected]>
escribió:

> Hola Foro
>
>
>
> Tengo que traer un numero indeterminado de ficheros de una FTP pero no
> puedo usar el MGET normal porque me lo rechaza por empezar con un numero
>
> Lo que he hecho es traerlos a un DIR
>
>
>
> 0000.02 locsite NAMEFMT
> 1
>
>
> 0001.03 lcd
> /ficherosxml
>
>
> 0001.06 mget 09*.*
>
>
> 0003.00
> QUIT
>
>
>
>
>
>    Para procesarlo quise utilizar el comando CPYFRMIMPF pero me da como
> error CPF2817 y no tengo idea de cómo resolverlo
>
>
>
> 0001.00 PGM
>
>
> 0001.06 DCLF
> FILE(WDBBASE/LISTF)
>
>
> 0001.11 CLRPFM FILE(WFUENTE/FTPTXT)
> MBR(FTPLOGTC)
>
>
> 0001.13 MONMSG MSGID(CPF3141)
> EXEC(DO)
>
>
> 0001.14 ADDPFM FILE(WFUENTE/FTPTXT) MBR(FTPLOGTC)
> +
>
> 0001.15        TEXT('LOG TEMATICA
> ')
>
>
> 0001.16
> ENDDO
>
>
> 0003.06        STRQSH CMD('LS /ficherosxml/ >
> +
>
>
> 0003.07
> /QSYS.LIB/WDBBASE.LIB/LISTF.FILE/LISTF.MBR')
>
>
> 0003.08 MONMSG
> MSGID(QSH0005)
>
>
> 0003.09
> START:
>
>
> 0003.10 RCVF  RCDFMT(LISTF)
>
>
> 0003.11 MONMSG MSGID(CPF0864) EXEC(GOTO
> CMDLBL(END))
>
>
> 0003.14 CPYFRMIMPF FROMSTMF(&LISTF) TOFILE(WDBBASE/TRACKET)
> +
>
> 0003.16
> MBROPT(*ADD)
>
>
> 0003.18 OVRDBF  FILE(OUTPUT) TOFILE(WFUENTE/FTPTXT)
> +
>
> 0003.19
> MBR(FTPLOGTC)
>
>
> 0003.21 GOTO
> CMDLBL(START)
>
>
> 0003.22
> END:
>
>
> 0003.23 DLTOVR
> FILE(OUTPUT)
>
>
> 0004.00
> ENDPGM
>
>
>
>
>
>
>
>
>  Agradezco cualquier ayuda
>
>
>
>
>
>
>
>
>
> Elvira
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> [image: cid:[email protected]]
>
>
>
> *Thinking about*
>
> *your Business*
>
> Elvira Vázquez González
>
> Administradora
>
> Tel: (+34) 91 665 72 98
> Fax: (+34) 91 616 93 26
>
> [email protected]
>
> www.edasnet.com
>
>
>
> Este mensaje puede contener información confidencial sujeta  al secreto
> profesional, cuya divulgación no está permitida por la ley y está dirigida
> únicamente para el uso de la persona destinataria. Si usted no es la
> persona destinataria de este mensaje, por la presente se le comunica que no
> debe usar, difundir, copiar de ninguna forma, ni emprender ninguna acción
> en relación con ella. Si usted ha recibido este mensaje por error, le
> rogamos que lo elimine, al igual que cualquier copia del mismo, y que
> proceda a la eliminación de cualquier archivo adjunto al mismo,  y nos
> notifique este hecho de manera inmediata mediante correo electrónico
> remitido a nuestra atención, o a través del teléfono (+34) 91 665 72 98.
> Asimismo, le comunicamos que la distribución, copia o utilización de este
> mensaje, o de cualquier documento adjunto al mismo, cualquiera que fuera su
> finalidad, están prohibidas por la ley.
> Le informamos, como destinatario de este mensaje, que el correo
> electrónico y las comunicaciones por medio de Internet no permiten asegurar
> ni garantizar la confidencialidad de los mensajes transmitidos, así como
> tampoco su integridad o su correcta recepción, por lo que el emisor no
> asume responsabilidad alguna por tales circunstancias. Si no consintiese en
> la utilización del correo electrónico o de las comunicaciones vía Internet,
> le rogamos nos lo comunique y ponga en nuestro conocimiento de manera
> inmediata.
> This message may contain confidential and privileged information,
> protected from disclosure by law, and is intended only for the use of the
> addressee named above. If you are not the intended recipient of this
> message you are hereby informed that you must not use, disseminate, copy it
> in any form or take any action in reliance on it. If you have received this
> message in error please delete it and any attachments or  copies of it and
> notify the sender by reply e-mail or by phone (+34) 91 665 72 98. In such
> case, you are hereby notified that any dissemination, distribution, copying
> or use of this message or any attachments, for any purpose, is strictly
> prohibited by law.
> We hereby inform you, as addressee of this message, that e-mail and
> Internet do not guarantee the confidentiality, nor the completeness or
> proper reception of the messages sent and, thus, the sender does not assume
> any liability for those circumstances. Should you not agree to the use of
> e-mail or to communications via Internet, you are kindly requested to
> notify us immediately.
>
>
>
> *P*
>
> Antes de imprimir este e-mail piense bien si es necesario hacerlo: El
> medioambiente es cosa de todos
>
> Before printing this e-mail think well if you must: The environment is
> everyone's
>
>
>
>
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a