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



I used that about 15 (or more?) years ago for some Q&D stuff. It was
good at that time too. Support was excellent.

EDeLong@xxxxxxxxxxxxxxx 06/20/2007 2:08:44 PM >>>
Mike,

Just to throw out another solution for your maintenance program issue, I
once worked at a shop that used BCD's ProGen product. It could knock
out a file maintenance program in minutes....

Unlike some code generators, ProGen produced fairly clean and readable
code.

Eric

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Mike Berman
Sent: Wednesday, June 20, 2007 1:57 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: RPG400-L Digest, Vol 6, Issue 639


Alan, I definetly will get into this at some future time, but for right
now, I feel it will take too long to go through it all. I am still
looking for something that does the subfile data entry and an update
with in one program. that is the goal now.

Alan Campin <Alan.Campin@xxxxxxxxxxxxxxxx> wrote:
In the meantime, the requirements have evolved. It is not 'simple'
anymore, but a subfile data entry program, that allows for update of
existing records, although I want the design as a standard maintenance
subile and then for adding new records a command key will call a heads
down data entry subfile.


The code should give you everything you need.

Modules 3 and 4 are a standard single load subfile. If you do an F6, it
takes you into add mode and stays there until you F12 to exit.

If you want to edit multiple records, just type a 2 next to each one to
edit and it will pull each one to update in sequence. If you hit an F12,
anything that has not been updated will still be in the list.

I just sent an updated program to Lief at Think400 with correct phone
number and e-mail.

Let me know if you have any questions.



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.