|
Hi Vern,
Thanks for suggestions. It's not only the converted code, but the programmer
still writes new code in this way.
Actually I have a tool (CHGILESRC by SSS, but I don't think it's known
outside of Germany) that is able to convert Z-ADD, MULT, COMP, SETON,
SETOFF, IFEQ, CAS and other "old" Opcodes into Evals of If/Select with
enhanced factor2. But if only MOVEs, MOVELs and MOVEAs are used it will not
work and converting a MOVE without having a look on it may cause a lot of
problems. The tool also moves field definitions for C to D specs.
Theoretically the tool should also be able to convert the lefthand
indicators into if-statements.
But there the tool struggeled. The first time in 5 years!
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im
Auftrag von Vernon Hamberg
Gesendet: Thursday, September 27, 2007 14:43
An: RPG programming on the AS400 / iSeries
Betreff: Re: AW: remove blanks
Hi Birgitta
Converting all those op codes into EVALs is
tedious at best - and IBM's CVTRPGSRC (is that
the name) command does none of this. Fortunately
we have Bob Luebbe's Linoma Software RPG tools -
full control over how things are converted. Data
definitions in C-specs can be moved to D-specs,
even case changes, and lots of other good stuff.
This makes the transition to the new stuff much easier.
Regards
Vern
At 12:12 AM 9/27/2007, you wrote:
Hi,
anyone is writing new code in RPG III.I noticed that after I posted - I still find it hard to believe that
But there are a lot!
Even worse are those, who converted the RPGII/RPGIII code to RPGIV but
write new code by using RPGII/RPGIII syntax. Currently I'm working on a
software that was written in the late 90ties. Not a single EVAL nor a
built-in-function can be found, but a lot of indicators (*IN01 - *IN99)
lefthand of the code and the sources aren't documented at all. Not even
Subfiles are used! The syntax used is older than I ever learned it.
(and I started with RPGIII in the early 90ties).
... The worst is, the programmer refuses to learn or to use new
features: "I wrote programs in this way since 30 years and it works!"
(with a lot of failures that could have been avoided when RPGIV
techniques would have been used!)
And an other comment: "Copying is faster than trying something new!!!"
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars."
(Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Jon Paris
Gesendet: Wednesday, September 26, 2007 14:52
An: rpg400-l@xxxxxxxxxxxx
Betreff: RE: remove blanks
>> Several have answered with ILE IV solutions - he is working in RPG
III
I noticed that after I posted - I still find it hard to believe that
anyone is writing new code in RPG III.
What is particularly odd is that this appears to be an outsourcing
situation. Why on earth would you outsource (to people who apparently
don't know the language) and have the new code written in a language
obsolete for 12 years. Sigh....
See you at Summit Vern.
Jon Paris
Partner400
www.Partner400.com
--
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.
--
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.
--
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.
--
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.
As an Amazon Associate we earn from qualifying purchases.
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.