RE: STRQMQRY QMQRY(XV0001_Q01) OUTPUT(*PRINT) + STRQMQRY QMQRY(XV0001_Q01) OUTPUT(*PRINT) + STRQMQRY QMQRY(XV0001_Q01) OUTPUT(*PRINT) + SQL works in iNav but not QMQRY

A nice alternative I saw on these lists is to have a substitution variable inside the QMQRY such as &QT - then have one of your SETVAR items be (QT '''') - Put the &QT wherever needed inside the QMQRY.

HTH
Vern

-------------- Original message --------------
From: "Alan Campin" <Alan.Campin@xxxxxxxxxxxxxxxx>

I've got a pretty long SQL statement that works in iSeries Navigator's
run SQL scripts, as well as in the 5250 STRSQL. However, it does not
work when compiled as a QMQRY. (We're using QM queries because we need
to pass a couple of parameters.)



Here are the messages I receive:

STRQMQRY QMQRY(IMDMDCMPQM) SETVAR((DMD_C 001486) (DMD_P 001487))


I believe your problem is that the strings are not quoted. Here is some
CL that I use. This assumes that the fields in question are strings.

DCL VAR("E) TYPE(*CHAR) LEN(1) VALUE('''')

STRQMQRY QMQRY(XV0001_Q01) OUTPUT(*PRINT) +
QMFORM(XV0001_Q01) DATETIME(*NO) +
PAGNBR(*NO) SETVAR((JOBNAM ("E || +
&JOBNAME || "E)) (USRNAM ("E || +
&USERNAME || "E)) (JOBNUM ("E || +
&JOBNUMBER || "E)) (SEVERITY ("E +
|| &SEV_CHR || "E)))

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.