Con *libl no te va a funcionar nunca, tenes que poner una librería. Cordialmente: Luis A Bregoli Tel. 15-4970-9897 email: [email protected] Sitio: http://www.bregoliluis.com/ <https://www.bregoliluis.com/> <http://www.prosyde.com>
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Libre de virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> El mar, 2 mar 2021 a las 11:34, <[email protected]> escribió: > 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. <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Libre de virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
____________________________________________________ �nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones Help400, S.L.
