Re: embedded sql and object_statistics

Similar to using SYSTOOLS.SPLIT(), if you create a table function that
takes the delimited list as input, and outputs a set of parsed values, you
could code it like this:

with CTE_LIST as (

select PV..PARSED_VALUE as OBJECT_NAME
from table( MY_PARSER( :I_objects ) ) as PV ( PARSED_VALUE )

)

select OS.objname
from table( QSYS2.OBJECT_STATISTICS( ... ) ) as OS
where exists( select 1 from CTE_LIST L where L.OBJECT_NAME = OS.objname )



On Tue, Apr 18, 2023 at 10:11 AM Jay Vaughn <jeffersonvaughn@xxxxxxxxx>
wrote:

thanks Daniel... but don't seem to have that

its not found

Jay

On Tue, Apr 18, 2023 at 12:58 PM Daniel Gross <daniel@xxxxxxxx> wrote:

Hi Jay,

try to use the SYSTOOLS.SPLITT table function - I think the syntax is:

where objname in (select element
from table(splitt(:l_objects, ‘,‘)))

but I’m not 100% sure - because I’m out of the office right now.

I used it several times in an application where I needed a „dynamic
parameter list“ - works AFAIK on 7.3 and later.

HTH
Daniel




Von meinem iPhone gesendet

Am 18.04.2023 um 18:34 schrieb Jay Vaughn <jeffersonvaughn@xxxxxxxxx

:

I'm doing an embedded rpgle sql select on qsys2.object_statistics,

and

my

where clause contains...
where objname in (:l_objects)

l_objects = char(2048) and will contain a comma delimited string of
objects, just as sql "IN" would want to see... ie. 'OBJECT1',

'OBJECT2'

in debug it looks fine... I even tried (trim(:l_objects))

However when I run it, I get sqlcode 100.

But if I convert the thing to dynamic sql, i can get it to work.

(but I

really don't want to have to do that)...

any suggestions to make it work without dynamic?

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related

questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.