RE: QRY con selección variable

Jesus Ropero Fri, 16 Sep 2005 02:54:14 -0700

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]> 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]

--
Marti Riera

RE: QRY con selección variable

Responder a