Hola,

Puedes utilizar el DSPLNK, si da error CPFA0A9, es que no existe.
https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_72/cl/dsplnk.htm

Saludos

Martí Riera


Missatge de Vicente Aliaga | Silomar <vali...@silomar.es> del dia dc., 9 de
gen. 2019 a les 18:23:

> Buenas tardes foro,
>
>
>
> Me interesaría saber si hay algún comando o API para comprobar si existe
> un fichero en el IFS, lo que quiero saber es si hay o no un xxxxxx.PDF o un
> documento de Word….. para luego abrirlo, copiarlo, renombrarlo, moverlo….
>
>
>
> En abril comentaron esto que adjunto pero quería atacar directamente a los
> ficheros de la carpeta IFS.
>
>
>
> Muchas gracias
>
>
>
> [image: LogoElayFri]
>
> Vicente Aliaga
> *Director Informática*
>
>
>
> 961 920 029
>
> vali...@silomar.es
>
>
>
> *Silomar Elaborados y Distribución, SL & Silomar Frigoríficos, SL*
>
> Autovía A-3 Madrid-Valencia, km 345 • 46930 • QUART DE POBLET • Valencia •
> www.silomar.es
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> *De:* forum.help400-boun...@listas.combios.es [mailto:
> forum.help400-boun...@listas.combios.es] *En nombre de *
> pedro.pin...@gmail.com
> *Enviado el:* viernes, 13 de abril de 2018 13:34
> *Para:* 'forum.help400'
> *Asunto:* RE: recuperacion datos desde nombre fichero
>
>
>
> Con este código, lees un directorio del ifs (&DIRg), lo metes en un
> documento (&TMBR) y luego lo copias a un fichero (audos2f).
>
>
>
> /*                                                                   */
>
>  /*    leer directorio                                                */
>
>  /*                                                                   */
>
>               CHGVAR     VAR(&A) VALUE('ls /' *CAT &DIRg *TCAT ' > +
>
>                            /QDLS/CARPETA/' *CAT &TMBR)
>
>               STRQSH     CMD(&A)
>
>               MONMSG     MSGID(CPF0000)
>
>  /*                                                                   */
>
>  /*    copiar a archivo                                               */
>
>  /*                                                                   */
>
>               CPYFRMPCD  FROMFLR(CARPETA) TOFILE(Tulib/audos2f) +
>
>                            FROMDOC(&TMBR) TRNTBL(*NONE) TRNFMT(*NOTEXT)
>
>               MONMSG     MSGID(CPF0000) EXEC(GOTO CMDLBL(FIN))
>
>               DLTDLO     DLO(&TMBR) FLR(CARPETA)
>
>
>
>
>
>
> ******************************************************
>
>   *  FICHERO DE DIRECTORIOS               AUDOS2F
> *
>
>   ******************************************************
>
>
>  A*
>
>
>  A          R RDOS2
>
>  A*
>
>
>  A            NOMDI1       150
>
>  A*
>
>
>
> Un saludo
>
>
>
>
>
> *Pedro Pinedo Hernandez.*
>
> *pedro.pin...@hotmail.com <pedro.pin...@hotmail.com>*
>
>
>
>
>
>
>
> *De:* forum.help400-boun...@listas.combios.es [mailto:
> forum.help400-boun...@listas.combios.es] *En nombre de *Elvira_vazquez
> *Enviado el:* viernes, 13 de abril de 2018 10:09
> *Para:* forum.help400@listas.combios.es
> *Asunto:* recuperacion datos desde nombre fichero
>
>
>
> Hola a todos
>
>
>
> Tengo un fichero que traigo desde un FTP y lo dejo en un Directorio con el
> nombre por ejemplo:
>
>
>
> 2018_13_04_9_12_31_72_68505K.400
>
>
>
> Necesito guardar de alguna forma parte del nombre con el que lo tengo en
> el DIR, sería 9_12_31_72,  y no se como hacerlo
>
>
>
> Agradezco cualquier ayuda
>
>
>
> Gracias
>
>
>
> Elvira
>
> .
> P *No lo imprima si no es necesario. Protejamos el medio ambiente. Please
> consider the environment before printing this email.*
> ADVERTENCIA - 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. Según la normativa vigente en
> materia de protección de datos de carácter personal, informamos que sus
> datos personales serán tratados por parte de Silomar Elaborados y
> Distribución, SL con la finalidad del correcto desarrollo de las
> actividades de nuestra organización así como enviarle noticias, novedades e
> información general de nuestra empresa a través de medios postales y
> electrónicos. En caso que Ud no sea cliente de nuestra empresa dichas
> comunicaciones se realizarán siempre bajo previo consentimiento por su
> parte. Usted puede ejercitar los derechos de acceso, rectificación,
> cancelación, oposición y demás derechos en los términos establecidos en la
> normativa vigente dirigiéndose a nosotros. Asimismo, Ud. nos puede
> solicitar el envío de información adicional sobre nuestra política de
> protección de datos, tel 961 920 029, e-mail: proteccionda...@silomar.es
> WARNING - This message can contain confidential information and is
> directed exclusively to its addressee. We inform you that the legislation
> prohibits to use, spreading or copy the content of the present message by
> person different from the addressee without previous authorization.  If you
> are not the addressee of this message or you have received it by error we
> would be thankful if you notify us and delete it. According to current
> regulations regarding the protection of personal data, we inform you that
> your personal data will be processed by Silomar Elaborados y Distribución,
> SL for the purpose of the correct development of our organization's
> activities as well as to send you news and general information about our
> company through postal and electronic means. In case you are not a customer
> of our company, such communications will always be made with your prior
> consent. You can exercise the rights of access, rectification,
> cancellation, opposition and other rights in the terms established in the
> current regulations by contacting us. Likewise, you can request us to send
> additional information about our data protection policy, tel 961 920 029,
> e-mail: proteccionda...@silomar.es
> ____________________________________________________
> Ú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