Hola, Normal que no lo acepte el CPY, si tienes *LIBL ¿en que librería no la ha copiar?
Saludos Martí Riera Missatge de Javier Baca Lechuga <[email protected]> del dia dt., 2 de març 2021 a les 14:12: > Buenas tardes, > > > > A ver si alguien sabe cómo lo podría hacer. > > Necesitaría sustituir, por ejemplo, la biblioteca LIBRERIA1 por *LIBL en > el mandato CPY. > > Es decir, me gustaría cambiar esto : > > > > DCL VAR(&NOM) TYPE(*CHAR) LEN(10) VALUE('ALFMDEMP') > > DCL VAR(&OBJ) TYPE(*CHAR) LEN(55) > > DCL VAR(&DES) TYPE(*CHAR) LEN(50) > > CHGVAR VAR(&OBJ) VALUE('/qsys.lib/LIBRERIA1.lib/' + > > *CAT &NOM *TCAT '.file/' *CAT &NOM + > > *TCAT '.mbr') > > CHGVAR VAR(&DES) VALUE('/COMPARTITS/TEMPORAL/' *CAT + > > &NOM *TCAT '.ALBA') > > CPY OBJ(&OBJ) TOOBJ(&DES) REPLACE(*YES) > > > > Por esto : > > > > DCL VAR(&NOM) TYPE(*CHAR) LEN(10) VALUE('ALFMDEMP') > > DCL VAR(&OBJ) TYPE(*CHAR) LEN(55) > > DCL VAR(&DES) TYPE(*CHAR) LEN(50) > > CHGVAR VAR(&OBJ) VALUE('/qsys.lib/*LIBL.lib/' + > > *CAT &NOM *TCAT '.file/' *CAT &NOM + > > *TCAT '.mbr') > > CHGVAR VAR(&DES) VALUE('/COMPARTITS/TEMPORAL/' *CAT + > > &NOM *TCAT '.ALBA') > > CPY OBJ(&OBJ) TOOBJ(&DES) REPLACE(*YES) > > > > Parece que al CPY no le gusta *LIBL, ¿cómo lo debería de poner?. > > Me da el error “No está permitido el patrón en el directorio del nombre > de vía de acceso”. > > > > Un saludo y gracias, > > > > Javier > > > > > > > *********************************************************************************************** > Este mensaje y todos los archivos adjuntos son confidenciales y de uso > exclusivo por parte > de su/sus destinatario/s. Si usted ha recibido este mensaje por error, le > agradecemos que > lo notifique inmediatamente al remitente y destruya el mensaje. Queda > prohibida cualquier > modificación, edición, uso o divulgación no autorizados. El Emisor no se > hace responsable > de este mensaje si ha sido modificado, distorsionado, falsificado, > infectado por un virus o > editado o difundido sin autorización. > > > > *********************************************************************************************** > This message and any attachments are confidential and intended for the > named addressee(s) only. > If you have received this message in error, please notify immediately the > sender, then delete > the message. Any unauthorized modification, edition, use or dissemination > is prohibited. > The sender shall not be liable for this message if it has been modified, > altered, falsified, infected > by a virus or even edited or disseminated without authorization. > > *********************************************************************************************** > > ____________________________________________________ > Ú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.
