I have to interrogate the data back from the exit point in the RPG program to determine if the statement is allowed. Complex statements can return many rows so it appears I may be locked into the cursor to use the UDF as I need it.

The rows returned are not “consistent” to say the least, but what I have to get back are the statement type (query/update/etc) and tables involved. Fortunately I can drop the test if the user making the access is not permitted any ODBC work but once that test is done the RPG needs to decide if the statement is allowed based on type, user, and table.



On Aug 23, 2018, at 4:36 PM, Mike Jones <mike.jones.sysdev@xxxxxxxxx> wrote:

Hi Chris,

That depends on what you want to do with the data.

In general, if you can avoid a cursor, you should. For example, if all you
want to do is log the result set produced by the PARSE_STATEMENT UDF, you
may be able to do something like:

insert into MY_PARSED_SQL_LOG_TABLE
select * from table( PARSE_STATEMENT() )

Mike


On Thu, Aug 23, 2018 at 10:16 AM Chris Holko <christopherholko@xxxxxxxxx>
wrote:

I want to use qsys2.parse_statement within my SQLRPGLE program but I am
curious if the only option is to use it within a declare cursor/fetch
construct?

The routine is part of an ODBC exit hanging off of QIBM_QZDA_SQL2. It can
return more than one row per SQL statement passed.


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].