Perd�n, no hab�a leido bien el mensaje:
PGM PARM(&FEC1 &FEC2)
DCL VAR(&FEC1) TYPE(*CHAR) LEN(6) DCL VAR(&FEC2) TYPE(*CHAR) LEN(6) DCL VAR(&SLT) TYPE(*CHAR) LEN(128)
CHGVAR VAR(&SLT) VALUE('FECP=("' *CAT + &FEC1 *CAT '") *OR FECP=("' + *CAT &FEC2 *CAT '")')
OPNQRYF FILE((TRNALM77)) QRYSLT(&SLT)
[EMAIL PROTECTED] wrote:
Hola,
�en el QRYSLT de un OPNQRYF se pueden usar variables de programa CL?, lo que pretendo es usar un par�metro de entrada al CL en una expresi�n de comparaci�n dentro del QRYSLT y no encuentro la manera de hacerlo excepto metiendo el valor del par�metro en la LDA y haciendo:
OPNQRYF FILE((TRNALM77)) QRYSLT('FECP=("' *CAT + %SST(*LDA 450 6) *CAT '") *OR FECP=("' + *CAT %SST(*LDA 456 6) *CAT '")')
donde FECP es el campo del fichero TRNALM77 cuyo valor pretendo comparar con los par�metros de entrada al CL.
Muchas gracias foreros.
David Alonso
************************************************************************** **********************************************
DISCLAIMER: Este mensaje contiene informaci�n propietaria de la cual parte o toda puede contener informaci�n confidencial o protegida legalmente. Est� exclusivamente destinado al usuario de destino. Si, por un error de env�o o transmisi�n, ha recibido este mensaje y usted no es el destinatario del mismo, por favor, notifique de este hecho al remitente. Si no es el destinatario final de este mensaje no debe usar, informar, distribuir, imprimir, copiar o difundir este mensaje bajo ning�n medio.
DISCLAIMER: This e-mail contains proprietary information some or all of which may be legally privileged. It is for the intended recipient only. If an addressing or transmission error has misdirected this e-mail, please notify the author by replying tothis e-mail. If you are not the intended recipient you must not use, disclose, distribute, copy, print or rely on this e-mail.
************************************************************************** ***********************************************
_____________________________________________________ Forum.HELP400 es un servicio m�s de NEWS/400. � Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]
_____________________________________________________ Forum.HELP400 es un servicio m�s de NEWS/400. � Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]
