Re: SQLRPG - prepare, declare, no cursor

["rick baird" <rick.baird@xxxxxxxxx>]

That's what I ended up doing - prepare-declare cursor-open-fetch-close.

I'm not ready to compile and test yet - many more subroutines to
write, but i think this is the ticket.

it does seem like an awful lot of work though, doesn't it?

thanks for the help.

On 4/11/06, Tyler, Matt <mattt@xxxxxxxxxxxxxx> wrote:
> Because I saw now way to dynamically execute a statement and return a
> value with EXECUTE or EXECUTE IMMEDIATE.  I have a program right now in
> development that does exactly what Rick's asking for.  Its build the
> dynamic statement, prepare, declare, open, fetch then close.  I
> certainly would not mind a shorter amount of steps to produce the same
> result, but I do not know of one that uses a dynamic statement.
>
> I just did a test program and I get SQLSTT='42612', SQLCOD=-84.
> Basically it says a select statement is not allowed in an EXECUTE
> IMMEDIATE operation.  Similar results with PREPARE and EXECUTE.
>
> Thanks, Matt
>
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
> Sent: Tuesday, April 11, 2006 2:52 PM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: SQLRPG - prepare, declare, no cursor
>
> And, why would he want to use a cursor or fetch with this?
>
> Rob Berendt
> --
>
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> "Tyler, Matt" <mattt@xxxxxxxxxxxxxx>
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 04/11/2006 03:55 PM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
>
>
> To
> "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> cc
>
> Subject
> RE: SQLRPG - prepare, declare, no cursor
>
>
>
>
>
>
> Rick leave out the EXECUTE step of your example here.  I do not believe
> you can use EXECUTE or EXECUTE IMMEDIATE to return a record count.
> EXECUTE is not used with cursors and fetches.  Also, validate the SQLSTT
> value after each step except for DECLARE.
>
> Thanks, Matt
>
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rick baird
> Sent: Tuesday, April 11, 2006 1:43 PM
> To: RPG programming on the AS400 / iSeries
> Subject: SQLRPG - prepare, declare, no cursor
>
> Hey all,
>
> I know if done this before, but I'm drawing a blank.
>
> I'm building a dynamic sql statement (variable 'where' clause, could
> contain as few as one, as many as 6 fields to compare in my where
> statement).
>
> All i want is the record count  -  count(*), moved into a host
> variable - so there will be no cursor - only a single fetch of the
> record count.
>
> which of the following steps do I need to run, in order, to do this?
>
> prepare
> declare
> execute
> open
> fetch
>
> I RTFM'd, but I'm not getting anywhere.
>
> Thanks!
>
> --
>
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> --
>
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> --
>
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>