Hola Alex, Marti. Muchas gracias por vuestros comentarios, nos han servido de mucha ayuda
Cordialmente -----Mensaje original----- De: [email protected] [mailto:[email protected]] En nombre de [email protected] Enviado el: jueves, 27 de septiembre de 2012 12:00 Para: [email protected] Asunto: Resumen de Forum.help400, Vol 71, Envío 29 Envíe los mensajes para la lista Forum.help400 a [email protected] Para subscribirse o anular su subscripción a través de la WEB http://listas.combios.es/cgi-bin/mailman/listinfo/forum.help400 O por correo electrónico, enviando un mensaje con el texto "help" en el asunto (subject) o en el cuerpo a: [email protected] Puede contactar con el responsable de la lista escribiendo a: [email protected] Si responde a algún contenido de este mensaje, por favor, edite la linea del asunto (subject) para que el texto sea mas especifico que: "Re: Contents of Forum.help400 digest...". Además, por favor, incluya en la respuesta sólo aquellas partes del mensaje a las que está respondiendo. Asuntos del día: 1. Re: Paso de parametros a QSH (Alex Martínez) 2. Re: Paso de parametros a QSH (Marti Riera) ---------------------------------------------------------------------- Message: 1 Date: Thu, 27 Sep 2012 10:42:56 +0200 From: Alex Martínez <[email protected]> Subject: Re: Paso de parametros a QSH To: "forum.help400" <[email protected]> Message-ID: <caecncbomcjmcq9ozggt5d7z8cy0yzdhg8sbucea2oa1nywj...@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1" Hola Te falta concatenar los valores &NOMBRE4 Y &NOMBRE6 en la serie Prueba con algo así (no lo he verificado) CHGVAR VAR(&CMD) VALUE('cd + iaspidlesp/home/leroy/out/;jar -cfM ' + *CAT &NOMBRE4 *BCAT &NOMBRE6) QSH CMD(&CMD) Salu2 El 27 de septiembre de 2012 10:25, GIL Rafael <[email protected]>escribió: > Hola buenos días.**** > > ** ** > > Continuamos con este tema nuevo en el cual nos hemos metido. Podemos > comprimir ficheros sin problemas con el mandato jar, ahora lo queremos > integrar todo en un CL pasándole los datos de la variable, sin embargo > nos aparece el siguiente error:**** > > ** ** > > qsh: 001-0019 Se ha encontrado un error al buscar el mandato NOMBRE4. > No > exis**** > > te tal vía de acceso o > directorio. **** > > qsh: 001-0019 Se ha encontrado un error al buscar el mandato NOMBRE1. > No > exis**** > > te tal vía de acceso o > directorio. **** > > ** ** > > La parte del CL donde se integra el QSH es :**** > > ** ** > > 0047.00 CHGVAR VAR(&NOMBRE4) VALUE('f_suivi_exp_tie_431_' > + **** > > 0048.00 || &DATE1 || '_' || &TIME || > '.fic.gz') **** > > 0049.00 CHGVAR VAR(&NOMBRE6) VALUE('f_suivi_exp_tie_431_' > + **** > > 0050.00 || &DATE1 || '_' || &TIME || > '.fic') **** > > 0051.00 > **** > > 0052.00 QSH CMD('cd iaspidlesp/home/leroy/out/;jar > -cfM + **** > > 0053.00 &NOMBRE4 > &NOMBRE6') **** > > 0054.00 > **** > > ** ** > > Muchas gracias**** > > ** ** > > ____________________________________________________ > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > Forum.Help400 © Publicaciones Help400, S.L. > ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20120927/e3693856/attachment.html> ------------------------------ Message: 2 Date: Thu, 27 Sep 2012 10:54:09 +0200 From: Marti Riera <[email protected]> Subject: Re: Paso de parametros a QSH To: "forum.help400" <[email protected]> Message-ID: <CAEFRhHv=zya7vupo6jfvmbd-jopovjvqioxpy6zmqbfv5h7...@mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1" Hola, El parámetro CMD se debe rellenar con una variable, no permite concatenar otras variables en tiempo de ejecución, eso deberias verlo en la definición del mandato ya que da el error CPD0103 y/o CPD0104. Debes crear una nueva variable para poder ejecutar el QSH y seria algo asi: DCL &COMMAND *CHAR 256 CHGVAR &CMD VALUE('cd iaspidlesp/home/leroy/out/;jar -cfM' *BCAT &NOMBRE4 *BCAT &NOMBRE6) QSH CMD(&COMMAND) Después también puedes recuperar el resultado de la ejecución del mandato añadiendo, después del QSH, las sentencias: RCVMSG MSGTYPE(*LAST) MSG(&MSG1) MSGID(&MSGID) IF COND((&MSGID *EQ 'QSH0005') *AND (%SST(&MSG1 41 1) *NE '0')) THEN(GOTO CHKERR) Donde &MSG1 es *CHAR 132 y &MSGID es *CHAR 7 Saludos Martí Riera 2012/9/27 GIL Rafael <[email protected]> > Hola buenos días.**** > > ** ** > > Continuamos con este tema nuevo en el cual nos hemos metido. Podemos > comprimir ficheros sin problemas con el mandato jar, ahora lo queremos > integrar todo en un CL pasándole los datos de la variable, sin embargo > nos aparece el siguiente error:**** > > ** ** > > qsh: 001-0019 Se ha encontrado un error al buscar el mandato NOMBRE4. > No > exis**** > > te tal vía de acceso o > directorio. **** > > qsh: 001-0019 Se ha encontrado un error al buscar el mandato NOMBRE1. > No > exis**** > > te tal vía de acceso o > directorio. **** > > ** ** > > La parte del CL donde se integra el QSH es :**** > > ** ** > > 0047.00 CHGVAR VAR(&NOMBRE4) VALUE('f_suivi_exp_tie_431_' > + **** > > 0048.00 || &DATE1 || '_' || &TIME || > '.fic.gz') **** > > 0049.00 CHGVAR VAR(&NOMBRE6) VALUE('f_suivi_exp_tie_431_' > + **** > > 0050.00 || &DATE1 || '_' || &TIME || > '.fic') **** > > 0051.00 > **** > > 0052.00 QSH CMD('cd iaspidlesp/home/leroy/out/;jar > -cfM + **** > > 0053.00 &NOMBRE4 > &NOMBRE6') **** > > 0054.00 > **** > > ** ** > > Muchas gracias**** > > ** ** > > ____________________________________________________ > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > Forum.Help400 © Publicaciones Help400, S.L. > ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20120927/cdfb24fd/attachment-0001.htm> ------------------------------ __________________________________________________ Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS. &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://listas.combios.es/mailman/listinfo/forum.help400 Fin de Resumen de Forum.help400, Vol 71, Envío 29 ************************************************* ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
