Re: Subfile cursors with SQL

You should be able to do that with a
FETCH RELATIVE :startPos from mycursor for 15 rows into :myArray

Where startPos is either
1
-30 (-31?)

But honestly, I'd do it as a load-all subfile, displaying a message if
there's more than 9999 rows that match the filters.
Much better fit for a scrollable table on a web page. And if your still
stuck on 5250, you've can add a scroll bar there too.
https://boothmartin.midrange.com/Subfiles/Scroll_Bar/scroll_bar.html

And if you refuse to do a load all, consider at least an extending
subfile.
That way all you need to worry about is the next page (page down).

Charles

On Wed, Sep 28, 2022 at 3:19 PM DEnglander--- via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

I remember attending a course awhile ago where the instructor was teaching
about [I think] loading a page-at-a-time subfile with scrollable cursors.
I cannot seem to find any handouts or notes about that.

What I am trying to do is load a small [maybe 15 lines] subfile and allow
the user to press PageDn or PageUp to get the next or prior 15 rows based
on where the cursor currently resides.

I want to keep this in SQL [as opposed to Native] because the user can
specify filtering, which is incorporated into the DECLARE CURSOR
statement.

Does anyone know of any examples or URLs that can point me in the right
direction?

Thank you,

Doug



"CONFIDENTIALITY NOTICE: This e-mail transmission (and/or the attachments
accompanying it) contain confidential information belonging to the sender.
The information is intended only for the use of the intended recipient. If
you are not the intended recipient, you are hereby notified that any
disclosure, copying, distribution or the taking of any action in reliance
on the contents of the information is strictly prohibited. Any
unauthorized interception of this transmission is illegal under the law.
If you have received this transmission in error, please promptly notify the
sender by reply e-mail, and then destroy all copies of the transmission."
--
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.

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