It's a 25 years old program in desperate need of a rewrite. Over the
years everyone who had amended it has thought "I know lets add on
another function key call", "I know let add on another window" - called
from a function key. and so on and so on.
The poor old thing is staring to feel it's age, a bit like me when ever
I'm asked to modify it.
Thanks to all for your suggestions.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jerry Adams
Sent: 24 September 2008 12:56
To: RPG programming on the AS400 / iSeries
Subject: RE: Running out of function keys
Not meaning to sound critical, but I find it hard to believe that a
single panel uses 24 function keys. Even PDM doesn't go that far.
That said, I have seen (and have to maintain) programs where the
command/function keys are mapped across all panels. I.e., instead of
checking the function key in a subroutine or procedure that processes a
specific panel, the programmer checks for each key in mainline.
Another possibility, since there was no description of what all of these
function keys did I'm just supposing here, is that F1 prompts for a list
of, say, customers, F2 prompts for a list of items, etc. If that's the
case, prompting can be limited to a single function key and, then, based
upon the cursor placement, invoke the needed program. Alternatively,
for this example, is to simply bring up a list of programs/functions
from which the user can choose.
Like I said, I'm speaking from my own experiences, not from what may be
the case here. Maintaining these kinds of programs can be/is a pain in
the butt. Re-designing them can often be time prohibitive. Sometimes,
though, the modification can be simple, such as the Prompts example.
Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Brown, Stephen GRNRC
Sent: Wednesday, September 24, 2008 5:20 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Running out of function keys
Folks bit of a basic question compared to some of the current
discussions but I have a situation that I'd lie some advice on.
I have a program that I need to modify to allow calls to some additional
programs via function keys. Problem is there is not enough remaining
unused function keys available. That is F1 -> F24 are all in use, is
there any way in which to extend the range. ?
Thanks
Stephen Brown
Analyst Programmer
CIGNA European Technology Group
1 Knowe Road
GREENOCK
United Kingdom
PA15 4RJ
Phone : +44 (0)1475 492274
Fax : +44 (0)1475 730385
E-Mail : Stephen.Brown@xxxxxxxxx
Confidential, unpublished property of CIGNA Do not duplicate or
distribute. Use and distribution is limited solely to authorised
personnel.
(c) Copyright 2008 (CIGNA Corporation)
------------------------------------------------------------------------
------
CONFIDENTIALITY NOTICE: If you have received this email in error, please
immediately notify the sender by e-mail at the address shown. This
email transmission may contain confidential information. This
information is intended only for the use of the individual(s) or entity
to whom it is intended even if addressed incorrectly. Please delete it
from your files if you are not the intended recipient. Thank you for
your compliance. Copyright 2008 CIGNA
========================================================================
======
--
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.
midrange.com
