× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Hi Alan
I use single page load subfiles, but I have never used SQL
Is there any chance you could post the program code (Yes - I AM lazy)

Thanks in advance
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640


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

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.


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


Disclaimer: This message contains confidential information and is intended only for the individual named. If you are not the named addressee you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately by e-mail if you have received this e-mail by mistake and delete this e-mail from your system. E-mail transmission cannot be guaranteed to be secure or error-free as information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or contain viruses. The sender therefore does not accept liability for any errors or omissions in the contents of this message, which arise as a result of e-mail transmission. If verification is required please request a hard-copy version. Any views or opinions presented are solely those of the author and do not necessarily represent those of the company.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2024 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].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.