Yo lo definiría así:
DCL &VarOrigen *Char(1)
DCL &VarQM *Char(3)
CHGVAR VAR(&VarQM) VALUE(''''||&VarOrigen||'''')
STRQMQRY QMQRY(PRUEBAQM) +
OUTPUT(*OUTFILE) +
OUTFILE(QTEMP/PRUEBA) +
OUTMBR(*FIRST) +
SETVAR((VarQM &VarQM))
Espero te sirva:
Jordi.
____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
