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



Thanks to all who responded.
I have deceided to go with my original concept of deleting all the records before update and writting the subfile records assigning a new sequence based on the position of the sequence#/Item in an array.


Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3









----- Original Message ----
From: Alan Shore <AlanShore@xxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, December 6, 2007 2:50:38 PM
Subject: Re: Reseuqence data in file based on screen seq


Hi Jeff
my reply from earlier still stands, BUT with one addition
at the end of addling/changing/deleting records from the subfile to the
database file, you will have to create a routine to copy all the records
from the database file to a work file, clear out the database file then
re-read the work file into the data base file incrementing (by 10) the
counter into the database file.

You originally asked for a simple method
Like I originally said, it depends on your definition of simple.



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 12/06/2007 02:18:19 PM:

This is an example of what I need to do:
For a given Company/Location/Item:

Data File:
Seq# Substitute Item
10 Sub 1
20 Sub 2

Screen: (as displayed on initial load)
Seq# Substitute Item
10 Sub 1
20 Sub 2

Screen (as seen after user changes)
Seq# Substitute Item
10 Sub 1
05 Sub 2

Data File (final result after processing user changes)
Seq# Substitute Item
10 Sub 2
20 Sub 1


Thanks,
Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical
Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical
Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical
Solutions Implementer V5R3









----- Original Message ----
From: Booth Martin <booth@xxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, December 6, 2007 2:04:44 PM
Subject: Re: Reseuqence data in file based on screen seq

I am not sure what you mean by "resequence data."

As the sequence number is part of the key, the process will apparently
just happen as you process the subfile and add/update records. You will
want to keep the original key fields as hidden fields in the subfile.
That way you can compare original key fields to the viewable key fields
and see if you are adding. updating, or deleting data records.

If you really need the data to be reorganized, you could reorganize at
the end of the process?

Jeff Young wrote:
Does anyone have a simple method to resequence data in a file
based on the new sequence # on a screen?
I am limited to V5R1 with any concepts used.

The file has a sequence # as part of the primary key.
The user will see a subfile of all records in the file with the
sequence # available to be changed.
In addition, they can add records and specify any sequence # they
choose.
Add, Change and Delete are all done in one pass.

Thanks,

Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical
Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical
Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical
Solutions Implementer V5R3





As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.