Re: Displaying a sequence number in load all DDS?

["Booth Martin" <Booth@xxxxxxxxxxxx>]

 There are no records in the subfile?  Then what fields are being changed?

 The other question I have is about the RPG cycle.  It looks to me like you
plan to have an event-based event instead of a cycle-based event.  May I ask
how that will happen?

---------------------------------------------------------
Booth Martin   http://www.MartinVT.com
Booth@MartinVT.com
---------------------------------------------------------

-------Original Message-------

From: rpg400-l@midrange.com
Date: Monday, November 25, 2002 06:13:24 PM
To: rpg400-l@midrange.com
Subject: Re: Displaying a sequence number in load all DDS?

Steve,
A little history here is that on iinitialization the subfile control is
written then the subfile is displayed with out ever writing a subfile
record. What I am looking for is a way to make a field that automagicall
increments itself with out any intervention in the RPG. Will this method
do that? If not is this even possible?

____________________________________________________

J. Scott Carter
Programmer/Analyst
e-mail: Mailto:scarter@rsrcorp.com
Phone: 214.583.0348

It's not the destination that counts in life it's the journey. The journey
with the people we love is all that really matters. Such a simple truth so
easily forgotten.



"Steve Landess"
<steve_landess@ho To: <rpg400-l@midrange.com>
tmail.com> cc:
Sent by: Subject: Re: Displaying a sequence number in load all DDS?
rpg400-l-admin@mi
drange.com


11/25/2002 04:51
PM
Please respond to
rpg400-l






Define an output field in the subfile for displaying the relative record
number.

Then, in the RPG program: Just before you write the subfile record to the
subfile, z-add or move the value of the subfile RRN field (as defined in
the
F-spec continuation KSFILE line) into this new field.

HTH

Steve Landess
Austin, Texas
(512) 423-0935








_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

.