Ya he descubierto el problema.
En la selección del query, yo tenía :
En la sección de definición de campos :
Campo Expresión
WCON substr(inconc,1,2)
Y luego ya en la selección, tenía :
AND/OR Campo Prueba Valor
INCLIE EQ :WCLI
AND INFEPR GE :WFECD
AND INFEPR LE :WFECH
AND WCON EQ '01'
Pues lo que no le gusta es la última sentencia, la he sustituido y va perfecto.
Un saludo.
Javier.
Este mensaje y cualquier fichero adjunto esta dirigido únicamente a sus
destinatarios y pueden contener información confidencial. Si usted considera
que ha recibido este correo electrónico por error (por el asunto, por el
remitente o por cualquier otra causa), le informamos que cualquier revisión,
alteración, impresión, copia o transmisión de este mensaje o de cualquier
fichero adjunto está prohibida y puede constituir un acto ilegal. Por favor,
notifíquele el error al remitente respondiendo a este e-mail y elimine el
mensaje y su contenido inmediatamente.
This e-mail and any files transmitted with it are intended solely for the use
of the intended recipients and may contain confidential information. If it
appears (from the subject matter or address information or otherwise) that you
received this email in error, please note that any review, dissemination,
disclosure, alteration, printing, copying or transmission of this e-mail or any
file transmitted with it is prohibited and may be unlawful. Please notify us by
return email and delete this email and its contents immediately.
> From: [email protected]
> Subject: Resumen de Forum.help400, Vol 54, Envío 41
> To: [email protected]
> Date: Wed, 27 Apr 2011 12:00:07 +0200
>
> 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: QUERY CON PARAMETROS (alex martinez)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Wed, 27 Apr 2011 10:12:17 +0200
> From: alex martinez <[email protected]>
> Subject: Re: QUERY CON PARAMETROS
> To: "forum.help400" <[email protected]>
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Hola de nuevo:
>
> Cuando realizas la llamada a QM con una variable de sustitución, si &PCLI
> contiene un valor de tipo caracteres con comillas sencillas, QM elimina
> dichas comillas (y de ahí el error QWM2701), para que ésto no suceda el
> campo &PCLI debe contener comillas sencillas, (no son comillas dobles, son 2
> pares de comillas sencillas)
>
> CHGVAR VAR(&PCLI) VALUE('''' *TCAT &PCLI *TCAT '''')
>
>
> Salu2
>
> El 26 de abril de 2011 23:06, Fco. Javier B. L. <[email protected]>escribió:
>
> >
> >
> > No utilizo nada de eso.
> >
> > Lo más increible es que tengo 2 querys, y uno funciona.
> > Query 1, el que funciona :
> >
> > 0001.00 /*
> > ***************************************************************** */
> > 0002.00 /* EXPORTACION DE
> > FACTURAS */
> > 0003.00 /*
> > ***************************************************************** */
> > 0003.01 PGM PARM(&PCLI &PANYD &PMESD &PDIAD &PANYH
> > +
> > 0003.03 &PMESH
> > &PDIAH)
> > 0003.04 /* declaración de parámetros
> > */
> > 0003.05
> >
> > 0003.06 DCL VAR(&PCLI) TYPE(*CHAR)
> > LEN(4)
> > 0003.07 DCL VAR(&PANYD) TYPE(*CHAR)
> > LEN(4)
> > 0003.17 DCL VAR(&PMESD) TYPE(*CHAR)
> > LEN(2)
> > 0003.27 DCL VAR(&PDIAD) TYPE(*CHAR)
> > LEN(2)
> > 0003.37 DCL VAR(&PANYH) TYPE(*CHAR)
> > LEN(4)
> > 0003.47 DCL VAR(&PMESH) TYPE(*CHAR)
> > LEN(2)
> > 0003.57 DCL VAR(&PDIAH) TYPE(*CHAR)
> > LEN(2)
> > 0003.67
> >
> > 0003.77 DCL VAR(&WCLI) TYPE(*CHAR)
> > LEN(4)
> > 0003.87 DCL VAR(&WANYD) TYPE(*CHAR)
> > LEN(4)
> > 0003.97 DCL VAR(&WMESD) TYPE(*CHAR)
> > LEN(2)
> > 0004.07 DCL VAR(&WDIAD) TYPE(*CHAR)
> > LEN(2)
> > 0004.17 DCL VAR(&WANYH) TYPE(*CHAR)
> > LEN(4)
> > 0004.27 DCL VAR(&WMESH) TYPE(*CHAR)
> > LEN(2)
> > 0004.37 DCL VAR(&WDIAH) TYPE(*CHAR)
> > LEN(2)
> > 0004.47
> >
> > 0004.57 /* crear query con salida a fichero
> > */
> > 0004.67
> >
> > 0004.77 DLTF
> > FILE(DEPOTF/SALIDA1)
> > 0004.87 MONMSG
> > MSGID(CPF0000)
> > 0004.97 STRQMQRY QMQRY(CONSULTAS/FRASARKAS1)
> > OUTPUT(*OUTFILE) +
> > 0005.07 QMFORM(*QMQRY) OUTFILE(DEPOTF/SALIDA1)
> > +
> > 0005.17 OUTMBR(*FIRST *REPLACE) ALWQRYDFN(*YES)
> > +
> > 0005.27 SETVAR((WCLI &PCLI) (WANYD &PANYD) (WANYH
> > +
> > 0005.37 &PANYH) (WMESD &PMESD) (WMESH &PMESH)
> > +
> > 0005.47 (WDIAD &PDIAD) (WDIAH
> > &PDIAH))
> > 0005.87 DLTSPLF
> > FILE(QPQXPRTF)
> > 0005.97 MONMSG
> > MSGID(CPF0000)
> > 0011.03
> >
> > 0012.00
> > ENDPGM
> >
> > Definición del query FRASARKAS1 :
> >
> > Selección :
> >
> > AND/OR Campo Prueba Valor (Campo, Número, 'Caracteres'
> > o...)
> > T01.FCCLIE EQ
> > :wcli
> > AND T01.FCANYF RANGE :wanyd :wanyh
> > AND T01.FCMESF RANGE :wmesd :wmesh
> > AND T01.FCDIAF RANGE :wdiad :wdiah
> > AND T01.FCSERI EQ
> > 'FRA'
> >
> > Query 2, que no funciona :
> >
> > 0001.00 /*
> > ***************************************************************** */
> > 0002.00 /* EXPORTACION DE
> > FACTURAS */
> > 0003.00 /*
> > ***************************************************************** */
> > 0003.01 PGM PARM(&PCLI &PFECD
> > &PFECH)
> > 0003.04 /* declaración de parámetros
> > */
> > 0003.05
> >
> > 0003.06 DCL VAR(&PCLI) TYPE(*CHAR)
> > LEN(4)
> > 0003.07 DCL VAR(&PFECD) TYPE(*CHAR)
> > LEN(8)
> > 0003.17 DCL VAR(&PFECH) TYPE(*CHAR)
> > LEN(8)
> > 0003.27
> >
> > 0003.37 DCL VAR(&WCLI) TYPE(*DEC)
> > LEN(4)
> > 0003.47 DCL VAR(&WFECD) TYPE(*DEC)
> > LEN(8)
> > 0003.57 DCL VAR(&WFECH) TYPE(*DEC)
> > LEN(8)
> > 0003.67
> >
> > 0003.77 /* crear query con salida a fichero
> > */
> > 0003.87
> >
> > 0003.97 DLTF
> > FILE(DEPOTF/SALIDA2)
> > 0004.07 MONMSG
> > MSGID(CPF0000)
> > 0004.77 STRQMQRY QMQRY(CONSULTAS/FRASARKAS2)
> > OUTPUT(*OUTFILE) +
> > 0004.87 QMFORM(*QMQRY) OUTFILE(DEPOTF/SALIDA2)
> > +
> > 0004.97 OUTMBR(*FIRST *REPLACE) ALWQRYDFN(*YES)
> > +
> > 0005.07 SETVAR((WCLI &PCLI) (WFECD &PFECD) (WFECH
> > +
> > 0005.17
> > &PFECH))
> > 0005.37 DLTSPLF
> > FILE(QPQXPRTF)
> > 0005.47 MONMSG
> > MSGID(CPF0000)
> > 0011.03
> >
> > 0012.00
> > ENDPGM
> >
> > Definición del query FRASARKAS1 :
> >
> > Selección :
> >
> > AND/OR Campo Prueba Valor (Campo, Número,
> > INCLIE EQ :WCLI
> > AND INFEPR GE :WFECD
> > AND INFEPR LE :WFECH
> > AND WCON LIST '01' '02' '03' '07'
> >
> > Yo no acabo de entender por qué funciona el primer query.
> >
> > Salu2.
> >
> >
> >
> > > >
> > > ----------------------------------------------------------------------
> > >
> > > Message: 5
> > > Date: Tue, 26 Apr 2011 09:06:55 +0200
> > > From: "MARTINEZ Nora (MM)" <[email protected]>
> > > Subject: RE: QUERY CON PARAMETROS
> > > To: "forum.help400" <[email protected]>
> > > Message-ID:
> > > <[email protected]>
> > > Content-Type: text/plain; charset="iso-8859-1"
> >
> > >
> > > Hola Javier, mira a ver si el query que no te funciona está definido con
> > niveles de ruptura y con resúmenes. Estas definiciones dan problemas cuando
> > se pasan parámetros. Es mejor hacerlo en dos pasos o dos querys, uno que
> > solo seleccione datos que sea el que recibe parámetros y otro que trate los
> > datos. A ver si así te funciona.
> > >
> > > Saludos,
> > >
> > > Nora
> > >
> > > De: [email protected] [mailto:
> > [email protected]] En nombre de Fco. Javier B. L.
> > > Enviado el: jueves, 21 de abril de 2011 16:39
> > > Para: Foro-Help400
> > > Asunto: QUERY CON PARAMETROS
> > >
> > > Buenas tardes :
> > > Estoy haciendo un CL que llama a un query que recibe parámetros y me da
> > un error.
> > > Lo curioso es que he hecho otro, el primero, y me ha ido bien, y son muy
> > parecidos.
> > > El query lo coge de otros ficheros pero la "sustancia" es la misma.
> > > No lo entiendo, ¿alguien me puede ayudar?
> > >
> > > CL :
> > >
> > > PGM PARM(&PCLI &PFECD &PFECH)
> > > /* declaración de parámetros */
> > >
> > > DCL VAR(&PCLI) TYPE(*CHAR) LEN(4)
> > > DCL VAR(&PFECD) TYPE(*CHAR) LEN(8)
> > > DCL VAR(&PFECH) TYPE(*CHAR) LEN(8)
> > >
> > > /* crear query con salida a fichero */
> > >
> > > DLTF FILE(DEPOTF/SALIDA2)
> > > MONMSG MSGID(CPF0000)
> > > STRQMQRY QMQRY(CONSULTAS/FRASARKAS2) OUTPUT(*OUTFILE) +
> > > QMFORM(*QMQRY) OUTFILE(DEPOTF/SALIDA2) +
> > > ALWQRYDFN(*NO) SETVAR((WCLI &PCLI))
> > > DLTSPLF FILE(QPQXPRTF)
> > > MONMSG MSGID(CPF0000)
> > >
> > > ENDPGM
> > >
> > > Condiciones del query :
> > >
> > > INCLIE EQ :wcli
> > > AND INFEPR RANGE 20110101 20110131
> > > AND T02.TATIPO EQ 'TICO'
> > > AND WCON LIST '01' '02' '03' '07'
> > >
> > > Error :
> > >
> > > No se ha encontrado el objeto SALIDA2 en DEPOTF de tipo *FILE.
> > > No se ha encontrado el objeto FRASARKAS2 en la biblioteca CONSULTAS.
> > > El mandato RUN QUERY finalizó debido a un error.
> > > Anomalía en mandato STRQMQRY.
> > > Error de función. QWM2701 no supervisado por MTU086C en la sentencia 477,
> > > instrucción X'0017'.
> > > MTU086C ha recibido QWM2701 en la sentencia 477. (C D I R)
> > > MTU086C ha recibido QWM2701 en la sentencia 477. (C D I R)
> > >
> > > Un saludo y muchas gracia.
> > > Javier.
> > >
> >
> > ____________________________________________________
> > Ú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/20110427/262563bc/attachment.html>
>
> ------------------------------
>
> __________________________________________________
> 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 54, Envío 41
> *************************************************
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
