Comments on: Query Variables in CL

By: tomliotta

tomliotta — Wed, 25 Nov 2009 03:54:37 +0000

Hmmm… this “answer” editor doesn’t like four single-quotes in a row. It changed them into two double-quotes. Well, if what I said made sense, you’ll figure it out.

Tom

By: tomliotta

tomliotta — Wed, 25 Nov 2009 03:52:32 +0000

BTW, to add quotes, use a QM query like:

select col1,col2 from myfile where col1 like &Q&PARM&Q

Then in the CL:

STRQMQRY QMQRY(myqry) SETVAR(  ( Q '''' ) (PARM &CLvar)  )

The &Q query substitution variable receives a single quote as its value. You can re-use it wherever needed in the query statement. No need to add the quotes in CL. Let QM query do it for you. Just tell it where. Tom

By: tomliotta

tomliotta — Wed, 25 Nov 2009 03:41:20 +0000

From what you asked, it’s a CHAR column that contains ’9000%’ as a possible value. When 9000 is input, you want to retrieve the ’9000%’ value. If that’s true, there shouldn’t be any problem.

The numeric 9000 is going to be a character literal when it gets into the QM query statement. You just need to ensure that quotes get placed in the proper positions and that the “%” wild-card also gets included.

Tom

By: kumari

kumari — Mon, 30 Jan 2006 08:26:13 +0000

I think this will solve your problem -

OPNQRYF FILE((FILENAME))QRYSLT(FIELDNAME *EQ %WLDCRD(9000*)

Please let me know, this solved your problem or how else did you solve it.

By: jplamontre

jplamontre — Sun, 29 Jan 2006 15:52:02 +0000

some notes to have in mind :
-1- a variable transmitted to a qmqry is up to 55 chars.
-2- a variable in a query can not be in a litteral (between quotes)

wrong : select … like ‘&P1′…
correct : select … like &P1…

this means you have to add quotes yourself in the cl :
dcl "e *char 1 value(””)
dcl ¶m …
dcl ¶mquoted … len is len of ¶m + 2

chgvar ¶mquoted ("e *cat ¶m *cat "e)
strqmqry … setvar ((P1 ¶mquoted))

if qmqry has too much limitations for your job, you can easily replace it by executesql or execsql, two tools at http://jplamontre.free.fr/jpltools

By: astradyne

astradyne — Fri, 27 Jan 2006 04:57:36 +0000

Hi Samantha

In the past when I’ve wanted to do this I’ve gone down the route of creating a Query/400 query and then using the RTVQMQRY route to convert it so that it can use parameters.

There are lots of articles on this process, just Google RTVQMQRY or visit http://search400.techtarget.com/tip/1,289483,sid3_gci530291,00.html for an exmple of how to use it.

All the best

Jonathan

By: chuckm

chuckm — Thu, 26 Jan 2006 18:15:15 +0000

Sorry...finger check. As I was trying to say, you have to create a text string that contains the query statment with the contents of your variable concatenated within. See if this little example doesn't get you going: PGM DCL VAR(&PART1) TYPE(*CHAR) LEN(80) + VALUE('Select A B C D from lib/file where A IS LIKE "') DCL VAR(&VARIABLE) TYPE(*CHAR) LEN(10) VALUE('9000') DCL VAR(&PART2) TYPE(*CHAR) LEN(80) VALUE('%" Order BY A B C D') DCL VAR(&QRYSTMT) TYPE(*CHAR) LEN(200) CHGVAR VAR(&QRYSTMT) VALUE(&PART1 |

By: chuckm

chuckm — Thu, 26 Jan 2006 17:59:57 +0000

SamanthaD, In general, when you want to pass a variable into a query statement, you make the entire statement a text string and concatenate the value of the variable into it. Here's a little example that may get you going: PGM DCL VAR(&PART1) TYPE(*CHAR) LEN(80) + VALUE('Select A B C D from lib/file where A IS LIKE "') DCL VAR(&VARIABLE) TYPE(*CHAR) LEN(10) VALUE('9000') DCL VAR(&PART2) TYPE(*CHAR) LEN(80) VALUE('%" Order BY A B C D') DCL VAR(&QRYSTMT) TYPE(*CHAR) LEN(200) CHGVAR VAR(&QRYSTMT) VALUE(&PART1 |

By: sheldonlinker

sheldonlinker — Thu, 26 Jan 2006 15:05:59 +0000

First, regaring LIKE and numeric data: It won’t work. Perhaps if what you have is a number, then what you want is

VARCHAR(field) LIKE VARCHAR(argument)||’%’

Second, there are certain restrictions when coding SQL from CL. I find it easier to write a C/SQL (any other language/SQL) command, and call it from CL. Inside such a program, the line above will have an added variable marker:

VARCHAR(field) LIKE VARCHAR(:argument)||’%’