Re: 5250 and un-do

Why do you discuss things that has no practical use in a multiuser
environment?

In a web/erp context you fight against the consequence of users pressing
"back" in
the browser - why do you think it is so?

Yes, in free text or code editors you may be able to do "undo" but those
progams
has no place in a multiuser environment and lock the file once a user opens
it.

On Mon, Dec 18, 2017 at 7:15 PM, Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

It also assumes a lock on all objects affected!


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Dec 18, 2017, at 1:47 PM, Justin Taylor <JUSTIN@xxxxxxxxxxxxx> wrote:

My first, off-the-cuff, idea would be something like this.

A QTEMP table having the same columns as your SFL, plus an integer ID

(not identity) column. Your RPG would also have an ID variable. When the
SFL is loaded or changed, increment your RPG variable, delete all QTEMP
rows where the ID column is >= your RPG variable, then write your SFL to
QTEMP. For undo/redo, simply decrement/increment your RPG variable and
load the corresponding SFL from QTEMP.

This assumes a save-on-exit SFL. If your SFL persists changes

immediately to disk, additional handling would be required to ensure DB
integrity.

HTH
--
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: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related

questions.

Help support midrange.com by shopping at amazon.com with our affiliate

link: http://amzn.to/2dEadiD

--
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: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD