Hola foro,
la pregunta es la siguiente, �como se puede
ejecutar un QRY sometido pasandole parametros?.
En interactivo nos funciona realizando los
siguientes pasos:
1�. creamos una consulta QRY utilizando
en la seleccion de registros una variable tipo
":nombrevariable".
2�. en la siguiente pantalla la slvamos como
tipo "query"
3�. ejecutamos:
STRQMQRY QMQRY(ANTONIO/MDF155X)
OUTPUT(*PRINT)
+
QMFORM(*QMQRY) ALWQRYDFN(*YES)
nos pide el valor de
la variable definida en el select de la consulta y funciona.
Cuando lo ejecutamos sometido lanzamos con
SBMJOB desde un CL:
DCL
VAR(&MDTLEN) TYPE(*CHAR) LEN(2) VALUE(' 8')
STRQMQRY QMQRY(ANTONIO/MDF155X)
OUTPUT(*PRINT) +
QMFORM(*QMQRY) ALWQRYDFN(*YES) +
SETVAR((MDTLEN &MDTLEN))
nos da el siguiente error:
Operandos de operador de comparaci�n = no
compatibles.
Se ha producido un error en el mandato RUN QUERY con un SQLCODE
-401.
El mandato RUN QUERY finaliz� debido a un error.
�Que estamos haciendo mal?.
Gracias.
Antonio Campillejo
Visionlab