El tema de comentas del problema de acceso entre IFS y QDLS
es un cambio que se introdujo en el sistema en la V5R4 y está documentado

http://www-01.ibm.com/support/docview.wss?uid=nas8N1015061

Y sobre la copia del archivo al IFS ¿has probado con un CPYTOSTMF ? Sería
algo así:

 ===> CPYTOSTMF FROMMBR('/qsys.lib/SIGENF.lib/CUADER58.file/CUADER58.MBR')
TOSTMF('/REMESAS/MYASCII.TXT') STMFCODPAG(*PCASCII) ENDLINFMT(*CRLF)


No entiendo porqué haces un COPY mediante un STRPCCMD cuando se puede hacer
directamente con un CPY desde el as400 (si es realmente necesario)

Salu2


El 14 de enero de 2014, 12:43, Vicente Aliaga | Silomar
<[email protected]>escribió:

>  Yo desde el bloc de notas de Windows veo perfectamente el contenido pero
> es al
>
> Importarlo desde el  portal del banco lo rechaza. Y está todo visualmente
> igual
>
> tanto el que me da como bueno y el que no, por lo que llego a la
> conclusión de que es
>
> por un problema del la codificación interna algún parámetro del Mandato
> CPYTOIMPF.
>
>
>
> Aun te digo más, si creo el archivo en la QDLS con CPYTOPCD y lo copio con
>
>
> STRPCCMD   PCCMD('CALL COPY \\POWER7\TESORERI\CUADER58.TXT
>  \\POWER7\REMESAS\CUADER58.TXT)
>
> desde el Power7 a la IFS si me reconoce correctamente el TXT de la IFS.
>
>
>
> Lo que no he probado es el COPY del OS400 sino que uso el del propio PC.
>
>
>
> Todo este tema viene porque el POWER7 me crea denegaciones de acceso a la
> QDLS
>
> cuando un usuario entra primero en la IFS antes de acceder el la QDLS,
> tengo instalada
>
> la PTF que lo arregla “teóricamente” pero aun estoy con el problema, y
> aprovechando la
>
> migración de todo a la IFS por otros temas
>
>
>
> Muchas gracias
>
>
>
> P *No lo imprima si no es necesario. Protejamos el medio ambiente.*
>
> Este mensaje y sus archivos adjuntos pueden contener información
> confidencial y están dirigidos exclusivamente a su destinatario. Le
> informamos que la legislación vigente prohíbe el uso, divulgación o copia
> del contenido del presente mensaje por persona distinta del destinatario
> sin autorización previa. Si Ud. no es el destinatario de este mensaje y lo
> ha recibido por error le agradeceríamos que nos lo comunicara y que
> procediera a destruirlo. This message can contain confidential information
> and is directed exclusively to its adressee. We inform you that the
> legislation prohibits to use, spreading or copy the content of the present
> message by person different from the adressee without previous
> authorization. If you are not the adressee of this message or you have
> received it by error we would be thankful if you notify us and delete it.
>
>
>
>
>  ------------------------------
>
> *De:* FB FB [mailto:[email protected]]
> *Enviado el:* martes, 14 de enero de 2014 11:49
> *Para:* [email protected]; forum.help400
> *Asunto:* Re: copiar a IFS desde archivo del POWER7
>
>
>
> ¿Tu puedes ver el fichero?
>
>
>
> El 14 de enero de 2014, 9:51, Vicente Aliaga | Silomar <[email protected]>
> escribió:
>
> Buenos días,
>
>
>
> He podido hacer que me reconozca el banco el TXT que le mando si lo muevo
> por FTP pero
>
> quisiiera usar el comando:
>
>
>
> CPYTOIMPF  FROMFILE(SIGENF/CUADER58) +
>
>              TOSTMF('/REMESAS/MYASCII.TXT') +
>
>              MBROPT(*REPLACE) FROMCCSID(284) +
>
>              STMFCODPAG(*PCASCII) RCDDLM(*CRLF) +
>
>              DTAFMT(*FIXED) STRDLM(*NONE) +
>
>              STRESCCHR(*NONE) RMVBLANK(*TRAILING) +
>
>              FLDDLM('')
>
>
>
> Ya que es mas simple.
>
>
>
> Podeis decirme que parametro no es correcto ya que me dice el banco que el
> archivo esta vacio.
>
>
>
> Gracias
>
>
>
> P *No lo imprima si no es necesario. Protejamos el medio ambiente.*
>
> Este mensaje y sus archivos adjuntos pueden contener información
> confidencial y están dirigidos exclusivamente a su destinatario. Le
> informamos que la legislación vigente prohíbe el uso, divulgación o copia
> del contenido del presente mensaje por persona distinta del destinatario
> sin autorización previa. Si Ud. no es el destinatario de este mensaje y lo
> ha recibido por error le agradeceríamos que nos lo comunicara y que
> procediera a destruirlo. This message can contain confidential information
> and is directed exclusively to its adressee. We inform you that the
> legislation prohibits to use, spreading or copy the content of the present
> message by person different from the adressee without previous
> authorization. If you are not the adressee of this message or you have
> received it by error we would be thankful if you notify us and delete it.
>
>
>
>
>
>
>
>
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
>
>
>
>
> --
> Atentamente.
>
> RP Director Técnico
> Tel. 93 255 31 51
> Fax. 93 255 31 09
>
> ____________________________________________________
> Ú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