Re: How to retrieve SQL results into CL pgm

I know that RTVSQLROW in noxDb does exactly that: Opens a cursor and for
each subsequent call to the command it returns the next row in the
resultset. However, it seems like the program the command is calling is
missing in the build.

https://github.com/sitemule/noxDB/blob/master/src/RTVSQLROW.cmd

On Tue, Jun 7, 2022 at 5:40 AM Richard Schoen <richard@xxxxxxxxxxxxxxxxx>
wrote:

Here's something that's part of my QSHONI utility:
http://www.github.com/richardschoen/qshoni

The QSHQRYTMP command pretty much wraps using RUNSQL to an outfile. Great
for doing quick queries to a temp file. It's a light wrapper over RUNSQL.

Results can be consumed directly from a CL program with RCVF.

You will probably want to have a template DDL or DDS created if you plan
to make sure you don't get level checks on the outfile format.

Ex: QSHONI/QSHQRYTMP SQL('select COUNT(*) as COUNT from qsys2.ASP_INFO')
OUTFILE(QTEMP/SQLTMP0001)

When it's done you can read the single field count record from
QTEMP/SQLTMP0001 with RCVF.

Have fun.

Regards,
Richard Schoen
Web: http://www.richardschoen.net
Email: richard@xxxxxxxxxxxxxxxxx
------------------------------

How can I run an SQL statement and retrieve the results into a CL pgm?

For example, I want to SELECT COUNT(*) FROM QSYS2.ASP_INFO: but I want to
run it using RUNSQL in a CL program and get the COUNT into a variable in
the CL program.

Something like this:
DCL &COUNT *DEC LEN(1)
RUNSQL SQL( SELECT COUNT(*) FROM QSYS2.ASP_INFO)

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com