Perdon :
Para pasarle parametros a un QRY (No QMQRY) en la pantalla de seleccion del
QRY, el parametro a recibir tiene que tener (:)
campo1 EQ :VARIABLE
des esta forma cuando lo ejecutes con STRQMQRY puedes usar el parametro SETVAR
Victor Velardez
Analisis y Desarrollo
Banco del Tucuman S.A.
Tel. 4503300-Int. 3227
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de Dario Heinze
Enviado el: Viernes, 16 de Septiembre de 2005 09:38 a.m. VEV
Para: [email protected]
Asunto: RE: QRY con selección variable
Pregunta... el campo de la fecha es numerico o alfanumerico?
generalmente me sucede esto cuando paso un parametro alfa a uno numerico o
viceversa...
en caso de que fuera numerico no necesitarias encerrar la fecha entre
comillas en tu string...
por si no queda claro... cambiar comando
CHGVAR VAR(&DESTINO) VALUE(&COM || &FECHA || &COM)
por
CHGVAR VAR(&DESTINO) VALUE(&FECHA)
Saludos,
Dario.-
> -----Mensaje original-----
> De: Jesus Ropero [SMTP:[EMAIL PROTECTED]
> Enviado el: Viernes, 16 de Septiembre de 2005 08:36
> Para: [email protected]
> Asunto: RE: QRY con selección variable
>
> Esto que indicas ya lo he cambiado, pero ... Yo creo que la cuestión es
> otra. Si miras el CL
>
>
> DCL VAR(&COM) TYPE(*CHAR) LEN(1) VALUE('"')
> DCL VAR(&FECHA) TYPE(*CHAR) LEN(10)
> DCL VAR(&DESTINO) TYPE(*CHAR) LEN(12)
>
> CHGVAR VAR(&DESTINO) VALUE(&COM || &FECHA || &COM)
> STRQMQRY QMQRY(JULIO/VIDRIO2) OUTPUT(*OUTFILE) +
> QMFORM(*QMQRY) OUTFILE(JULIO/VIDRIO) +
> ALWQRYDFN(*YES) SETVAR((FECHA &DESTINO))
>
> .... Y EL ERROR
>
>
> OUTFILE(JULIO/VIDRIO) ALWQRYDFN(*YES) SETVAR((FECHA '" "'))
> Consulta derivada del objeto *QRYDFN VIDRIO2 de JULIO, código 00.
> Nombre " " no permitido.
> Se ha producido un error en el mandato RUN QUERY con un SQLCODE -113.
> El mandato RUN QUERY finalizó debido a un error.
>
> Es normal que me dé este error la consulta que tiene el campo variable
> (:FECHA)no se detiene para que pueda teclearla.
>
> Perdonarme, por seguir por este camino, se que lo podia hacer de otras
> formas, pero quisiera terminarlo ya con el QM, que como veis estoy "pez".
>
> Gracias de nuevo
>
>
> -----Mensaje original-----
> De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> En nombre de Fernando Martínez
> Enviado el: viernes, 16 de septiembre de 2005 12:44
> Para: [email protected]
> Asunto: Re: QRY con selección variable
>
> Hola Jesus
>
> El error que te indica es debido a que esta intentando ejecutar un
> QMQRY
> cuando tu quieres ejecutar un QRYDFN. Puedes hacerlo poniendo el parametro
> ALWQRYDFN(*YES) o ALWQRYDFN(*ONLY).
>
> Salu2
>
> Fernando Martinez
>
>
> Jesus Ropero escribió:
>
> > Marti:
> >
> > Igual estoy haciendo un imposible la consulta QRY que tengo es un tipo
> > *QRYDFN, no *QMQRY
> >
> >
> > DCL VAR(&COM) TYPE(*CHAR) LEN(1) VALUE('"')
> > DCL VAR(&FECHA) TYPE(*CHAR) LEN(10)
> > DCL VAR(&DESTINO) TYPE(*CHAR) LEN(12)
> >
> > CHGVAR VAR(&DESTINO) VALUE(&COM || &FECHA || &COM)
> >
> > STRQMQRY QMQRY(JULIO/VIDRIO2) OUTPUT(*OUTFILE) +
> > QMFORM(*SYSDFT) OUTFILE(JULIO/VIDRIO) +
> > SETVAR((FECHA &DESTINO))
> >
> > (he probado con QMFORM(*SYSDFT) y QMFORM(*qmqry)
> >
> > ERROR:
> >
> > Causa . . . . . : No se encontró el objeto VIDRIO2 en la biblioteca
> > JULIO
> > tipo *QMQRY. No es correcto el nombre de objeto, el nombre de
> > biblioteca o
> > el tipo de objeto. Si no está especificado el nombre de biblioteca,
> > el
> > objeto puede estar en una biblioteca que no está contenida en la
> > lista de
> >
> > bibliotecas.
>
> >
> > ----------------------------------------------------------------------
> > --
> > *De:* [EMAIL PROTECTED]
> > [mailto:[EMAIL PROTECTED] *En nombre de *Marti Riera
> > *Enviado el:* viernes, 16 de septiembre de 2005 9:54
> > *Para:* [email protected]
> > *Asunto:* Re: QRY con selección variable
> >
> > Hola Jesus:
> >
> > Lo prometido es deuda:
> >
> > PGM PARM(&DESTIN)
> > DCL VAR(&COM) TYPE(*CHAR) LEN(1) VALUE('''')
> > DCL VAR(&DESTIN) TYPE(*CHAR) LEN(50)
> > DCL VAR(&DESTINO) TYPE(*CHAR) LEN(52)
> >
> > CHGVAR VAR(&DESTINO) VALUE(&COM || &DESTIN || &COM)
> > STRQMQRY QMQRY(lib/file) OUTPUT(*PRINT) QMFORM(*QMQRY) +
> > SETVAR((DESTIN &DESTINO))
> >
> >
> > Saludos.
> >
> > El día 15/09/05, *Jesus Ropero* <[EMAIL PROTECTED]
> > <mailto:[EMAIL PROTECTED]>> escribió:
> >
> > Buenas tardes:
> >
> > Llevo toda la tarde "pegándome" con este CL que como veis
> > incorpora un STRQMQRY:
> >
> >
> > DCL VAR(&FECHA) TYPE(*CHAR) LEN(10) /* Variable +
> > del QRY */
> > DCL VAR(&COM) TYPE(*CHAR) LEN(1) VALUE(X'7D') /* +
> > Comillas */
> > DCL VAR(&TOT) TYPE(*CHAR) LEN(12) /* +
> > Comillas-fecha-comillas */
> > CHGVAR VAR(&TOT) VALUE(&COM *TCAT &FECHA *TCAT &COM)
> >
> > STRQMQRY QMQRY(JULIO/VIDRIO2) QMFORM(*QMQRY) +
> > ALWQRYDFN(*YES) SETVAR((&FECHA &TOT))
> >
> > y por desgracia este es el resultado:
> >
> >
>
> >
> > 8>> call
> > crtetiqv00
>
> > 313 - STRQMQRY QMQRY(JULIO/VIDRIO2) QMFORM(*QMQRY)
> > ALWQRYDFN(*YES)
> > SETVAR((' '
> > ''''''))
> > no es una variable de Gestión de Consultas
> > válida.
> > Se ha encontrado un error en el mandato
> > STRQMQRY.
> > Error de función. CPF0001 no supervisado por CRTETIQV00 en la
> > sentencia
> > 313, instrucción X'001C'.
> >
> > ¿ me podeis dar alguna idea, por favor ?
> >
> > Muchas gracias
> >
> > [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
> >
> >
> >
> >
> >
> >
> > --
> > Marti Riera
>
>
>
>
>
> __________________________________________________
> Forum.HELP400 es un servicio más de NEWS/400.
> © Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://coyote.combios.es/mailman/listinfo/forum.help400
>
>
> __________________________________________________
> Forum.HELP400 es un servicio más de NEWS/400.
> © Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
La informacion contenida en el presente correo y en sus adjuntos -en su caso-
es confidencial y de uso
exclusivo para los destinatarios del mismo. Si Ud. recibe este correo por error
tenga bien notificar al emisor y eliminarlo.
Esta prohibido a las personas o entidades que no sean los destinatarios de este
correo cualquier tipo de modificacion, copia, distribucion, divulgacion,
retencion o uso de la informacion que contiene.
El Banco y demas sociedades del Grupo Comafi no se responsabilizan por
cualquier uso del correo electronico que fuera: abusivo, contrario a la moral,
a las buenas costumbres o a la ley, o realizado fuera de las competencias
laborales del autor del mail. Este no es un medio utilizado para contraer
obligaciones contractuales, excepto que, previamente, asi se hubiera pactado
por escrito.
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
