GRACIAS MARTI, EN CUENTO PUEDA ME PONGO A
ELLO.
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
--
Marti Riera
