Craig Rutledge has a nice utility that will do this (and more).
http://home.windstream.net/craigru/jcrdown2.html
Scroll down until you find JCRNUMB.
TA
<elehti@xxxxxxxxxxxxxxxxxx> wrote in message
news:mailman.22753.1271347286.2580.midrange-l@xxxxxxxxxxxxxxx
All, I have a temporary need for that excellent RPG utility from 15
years ago (published in some magazine, either DataNetwork, Midrange
Computing, News38/400, etc.) that converts RPGIII statements END to the
appropriate ENDDO, ENDIF, ENDCS, creating an RPGIII source, not RPGIV
source. Do you still have this utility in your toolkit to share with
me? Or is it still on the web at mcpressonline.com or elsewhere? Can
you tell me where it is?
Why?
We are upgrading to JD Edwards World release A92 (2010 code) from from
our current A73 release, written predominately in RPGIII prior to the
year 2000. Many of the A9.2 programs are in RPG IV, but some A9.2 code
is still at RPGIII with ENDIF, ENDDO, ENDCS instead of END. This
complicates the source comparisons using Aldon's S-COMPARE and IBM's
CMPPFM command.
I need to convert some of the RPG 1999 code with that utility in a
sandbox environment and then perform the source comparisons using
Aldon's S-COMPARE and IBM's CMPPFM command, comparing to JDE's current
release.
I will use IBM's CVTRPGSRC command against selected A73 code in a
sandbox environment to get that old code up to RPGIV syntax prior to
comparing that old code to RPGIV programs. P4211 Sales Order Entry
program is a good example.
This utility will greatly assist in identifying code changes as I will
have to retrofit our custom modifications into A9.2.
Eric Lehti 918-879-6036 Ameristar Fence
As an Amazon Associate we earn from qualifying purchases.