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                             

Responder a