Consider, changing the SFLPAG=SLFPAG +1... ie a extendable subfile.
Without seeing the code, I would think that the current code already
handles the pageup/down keys based on page at a time. It probably should
still work correctly, however test this change before adding the function
keys for the SFLDROP.
Michael
_____
From: rpg400-l-bounces@xxxxxxxxxxxx [
mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of AlanShore@xxxxxxxx
Sent: Wednesday, June 13, 2007 3:25 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Using SFLFOLD with page at a time subfile.
Never mind - my brain finally kicked in
I'll use SFLCSRRRN with a prompt (F4 probably) on the sub-file screen to
read that sub-file record and display the necessary data in a window.
Alan Shore
NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill
Alan Shore
<AlanShore@xxxxxx
om> To
Sent by: RPG programming on the AS400 /
rpg400-l-bounces@ iSeries <rpg400-l@xxxxxxxxxxxx>
midrange.com cc
Subject
06/13/2007 04:19 Using SFLFOLD with page at a time
PM subfile.
Please respond to
RPG programming
on the AS400 /
iSeries
<rpg400-l@midrang
e.com>
Afternoon all
Here is my problem.
I have a subfile program that loads the data page-at-a-time (SFLSIZ =
SFLPAG), but the boss wants me to use a drop down (read SFLFOLD) with the
data. However, this is NOT possible with a page-at-a-time subfile (see the
blurb below from the IBM manual)
1. If subfile size equals subfile page, an error message (severity 20)
is issued and SFLFOLD is ignored. When several display sizes are
used
(DSPSIZ keyword specified), SFLFOLD is ignored only for display
sizes
for which the subfile size equals subfile page. If the subfile
record
format contains field selection, SFLFOLD is not valid.
Has anybody else have to get around this situation, if so, how?
Thanks in anticipation
Alan Shore
NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill
--
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 message contains information from Certegy, Inc which may be confidential
and privileged. If you are not an intended recipient, please refrain from any
disclosure, copying, distribution or use of this information and note that such
actions are prohibited. If you have received this transmission in error,
please notify by e:mail postmaster@xxxxxxxxxxxx
==============================================================================
midrange.com
