Re: Subfile more/bottom problem -- RPG400-L

I agree. I just wrote a set of subfiles with single page load in
procedures, 5 different position to values using dynamic SQL. Very simple
and clean. The dynamic SQL makes it simple and reading everything in a
single read into an array makes it even simpler. Only one procedure builds
the SQL statement and opens the cursor. All the rest of the routines just
read the cursor reading a page of records plus one into an array. Framework
can be used again and again, just changing the load procedures.

On Wed, Jan 15, 2014 at 2:39 PM, Briggs, Trevor (TBriggs2) <
TBriggs2@xxxxxxxxxxx> wrote:

Even with only "a few hundred rows" that's wasted database I/O if the
user can usually be expected to find the record they're seeking on the
first or second subfile page. As others have said, for potentially large
subfiles a filtering or positioning option is probably more
user-friendly, and a piece of cake if SQL is your access method of
choice.

But, I don't agree that dynamically extending subfiles have "substantial
maintenance issues". I wrote my first one back on the System/38 and I'm
still copying and pasting that code into programs today! :-)

Trevor Briggs
Analyst/Programmer
Lincare, Inc.
(727) 431-1246
TBriggs2@xxxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Wednesday, January 15, 2014 4:16 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Subfile more/bottom problem

In my experience, there are many, many subfiles that are only a few
hundred rows. Those are ideal for load-all.

Subfiles have a limitation of 9999 rows, however it appears to me that
the practical limit is somewhere around 2500 rows. At 15 rows/screen,
getting to the end of a 2500 row subfile is 160 clicks. That is way too

many to be useful.

So, when a subfile is likely to be over a few hundred records, I look at

filtering, or two-stepping, to reduce the total number of records down
to a few hundred at a time. If that isn't practical I generally go with

a "Set to:" and then do single page subfiles. Dynamically extending
subfiles, with today's loading speeds, seem to me today to have limited
value and substantial maintenance issues.

On 1/15/2014 2:53 PM, Briggs, Trevor (TBriggs2) wrote:

The major problem with scroll bars as I see it is that they are only
useful if you build the entire subfile up front. In all but a small

set

of circumstances it is more efficient to build a dynamically extending
subfile.

Trevor Briggs
Analyst/Programmer
Lincare, Inc.
(727) 431-1246
TBriggs2@xxxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Wednesday, January 15, 2014 3:43 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Subfile more/bottom problem

Paging keys are built-in. Its automatic. You don't need to do
anything about the,m. To try out a scroll bar you only need to do

one

or two things.
*

1) SFLEND(*SCRBAR *MORE) instead of SFLEND(*MORE)

and, 2) if you haven't already, populate the SFLSIZ with the proper
number of records:
A SFLSIZ(&SF1RECS)
...
A SF1RECS 5S 0P
**

...
*

* Save values.
C eval SF1RECS = SF1NUM
*

(That makes the slider the correct proportion for the tray)
**

**

*

On 1/15/2014 2:27 PM, Gary Thompson wrote:

I have a recent subfile app that as soon as I can
I am making a scroll bar version - should improve
ability of warehouse to review pallet details -
not yet sure how that will go over - I never see
them use a mouse . . . but when I use the app,
I always wish I could scroll to see all pallet
details . . . any way to make PageUp/Down move
the scroll bar ?

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx

[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin

Sent: Wednesday, January 15, 2014 1:16 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Subfile more/bottom problem

Is the SFLEND conditioned with an indicator, set to the correct

condition?

Consider using a scroll bar? Users understand them, and you do not
need to leave an empty line at the bottom of the DSPF for the

MORE.../BOTTOM line. (
http://martinvt.com/Subfiles/Scroll_Bar/scroll_bar.html )

Yes, I know. I am scroll bar obsessed. Yes. I know. Green screen

is dead.

On 1/15/2014 10:30 AM, James H. H. Lampert wrote:

I just happened to notice that one of my "load all pages at once"
subfile screens is showing "more" at the bottom of the first screen
when there are only three records loaded.

It won't let me page down, but it's still showing "more," rather

than

"bottom."

In fact, on closer inspection, I see that if I load it with more

than

a full page of records, it shows "more" on the bottom of the second
page, even though there's less than a page.

I'm not sure, but I think the display file record definitions from
which I derived this screen were originally for "page at a time"

mode,

and that I probably screwed something up in the translation, but I'm
not sure where to look.

--
JHHL

--
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: 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 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: 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 message originates from Lincare Holdings Inc. It contains information
which may be confidential or privileged and is intended only for the
individual or entity named above.
It is prohibited for anyone else to disclose, copy, distribute or use the
contents of this message.
All personal messages express views solely of the sender, which are not to
be attributed to Lincare Holdings Inc., and may not be copied or
distributed without this disclaimer.
If you received this message in error, please notify us immediately at
MailAdmin@xxxxxxxxxxx or (800) 284-2006.

************************************************************************************************************************************************************************************************************

--
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: 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.