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


  1.  Home
  2. RPG400-L
  3. September 2006

RE: Converting RPG to RPG ILE

Rob,

RPG Toolbox does a much better job of converting RPG III to RPG IV.

Among other capabilities, it can look at the source and target field
sizes and type and convert MOVE, ADD, SUB, ect to EVAL.

Also, it can convert indicators & opcodes to BIFs and subroutines to
procedures.  Heck, here's a list of the options:

                         RPG Wizard by Linoma (RPGWIZ)

 

Type choices, press Enter.

 


From file  . . . . . . . . . . .   QRPGLESRC     Name, QRPGSRC,

QRPGLESRC   
  Library  . . . . . . . . . . .     *LIBL       Name, *LIBL


From member  . . . . . . . . . .                 Name, generic*, *ALL



From type  . . . . . . . . . . .   *RPG4         RPG, RPT, RPG38,

RPT38...  
To file  . . . . . . . . . . . .   QRPGLESRC     Name, QRPGLESRC,
*FROMFILE 
  Library  . . . . . . . . . . .     *FROMLIB    Name, *FROMLIB, *LIBL

To member  . . . . . . . . . . .   *FROMMBR      Name, *FROMMBR

Replace existing To member(s)  .   *YES          *NO, *YES

Target OS/400 release  . . . . .   *CURRENT      *CURRENT, VxRx

Format of calculation specs  . .   *FREE         *FREE, *FIXED

Examine field attributes . . . .   *YES          *NO, *YES

Expand copy members  . . . . . .   *NO           *NO, *YES

Redefine data structures . . . .   *YES          *NO, *YES

Redefine *LIKE DEFN fields . . .   *YES          *NO, *YES

Redefine calc. defined fields  .   *YES          *NO, *YES

Convert left hand indicators . .   *YES          *NO, *YES

Convert opcodes to BIFs  . . . .   *YES          *NO, *YES          
Convert key lists (KLIST)  . . .   *YES          *NO, *YES, *YES2   
Insert file I/O BIFs . . . . . .   *YES          *NO, *YES, *YES2   
Convert ADDs/SUBs to EVALs . . .   *YES          *NO, *YES, *YES2   
Convert Z-ADDs/Z-SUBs to EVALs     *YES          *NO, *YES, *YES2   
Convert MULTs to EVALs . . . . .   *YES          *NO, *YES, *YES2   
Convert DIVs to EVALs  . . . . .   *YES          *NO, *YES, *YES2   
Convert MOVE(L)s having *BLANK     *EVAL         *NO, *EVAL, *CLEAR 
Convert MOVE(L)s having *ZERO  .   *EVAL         *NO, *EVAL, *CLEAR 
Convert MOVEs having data  . . .   *EVAL         *NO, *EVAL         
Convert MOVELs having data . . .   *EVAL         *NO, *EVAL         
Convert MOVEA operations . . . .   *YES          *NO, *YES          
Convert CASxx operations . . . .   *YES          *NO, *YES          
Convert CAT operations . . . . .   *YES          *NO, *YES, *YES2   
Convert DOs to FORs  . . . . . .   *YES          *NO, *YES          
Convert LOOKUP operations  . . .   *YES          *NO, *YES          
Convert SCAN operations  . . . .   *YES          *NO, *YES

Convert *ENTRY PLIST . . . . . .   *YES          *NO, *YES, *YES2

Convert Subroutines to Procs . .   *NO           *NO, *YES

Convert CALLs and CALLBs . . . .   *YES          *NO, *YES, *YES2

Convert GOTO operations  . . . .   *YES          *NO, *YES

Compress expressions . . . . . .   *YES          *NO, *YES

Highlight comments . . . . . . .   *YES          *NO, *YES

Fixed-form comment designator  .   *SLASHES      *LEAVE, *ASTERISK,
*SLASHES  
Comment specification types  . .   *REMOVE       *LEAVE, *REMOVE

Comment designator on blanks . .   *REMOVE       *LEAVE, *REMOVE

Case for specification types . .   *LOWER        *LEAVE, *LOWER, *UPPER

Case for unchanged logic . . . .   *MIXED2       *LEAVE, *LOWER,
*UPPER...    
Case for changed and new logic     *MIXED2       *LOWER, *UPPER,
*MIXED...    
Case for in-line comments  . . .   *LOWER        *LEAVE, *LOWER, *UPPER

Case for right-hand comments . .   *LOWER        *LEAVE, *LOWER, *UPPER

Free-form indent nested logic  .   *INDENT2      *LEAVE, *INDENT0,
*INDENT1...
Document nested logic  . . . . .   *NO           *NO, *YES

Source date on converted lines     *KEEP         *KEEP, *TODAY, *ZEROS


If you're doing more than a handfull RPG III to RPG IV conversions, I
highly recommend it.

HTH,

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
  


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Thursday, September 21, 2006 9:53 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Converting RPG to RPG ILE

Have you noticed anything in their documentation about why to 
use their 
product?  The only thing I am looking for is why doing a 
simple CVTRPGSRC 
may be dangerous.  Just trying to help the OP with his "what 
to watch out 
for" query.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Lapeyre, Francis" <FLAPEYRE@xxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/21/2006 09:49 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
RE: Converting RPG to RPG ILE






Rob:

We use RPG Toolbox and it's very helpful. It will even convert to free
format and do things like get rid of some GOTOs (if they are 
in Factor 1
of ENDSR - it replaces the GOTO with LEAVESR). Sometimes I'll 
convert a
program on the side just to see the logic flow.

Not a vendor, just a happy user.

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Thursday, September 21, 2006 8:11 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Converting RPG to RPG ILE

We've done that a few times and it's worked ok.  Not sure if 
you need to

be concerned about mathematical precision or not.  You know, 
things like

the old MULT 10000.01 to convert dates, and that sort of genre.  We've
not 
used this but maybe they have something to throw into the mix:
http://www.linomasoftware.com/modx/products/rpgtoolbox

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Phil Kestenbaum" <pkestenbaum@xxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/21/2006 08:53 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Converting RPG to RPG ILE






HI,

I am converting a Production program written in RPG, to ILE using the
system conversion tool. It compiles fine and looks good. Is there any
special tests I should run or anything to be concerned with or is it
fine to just put it right into Production? 

 

Thank you,

 

Phil Kestenbaum


This message contains information proprietary to our company. It is 
intended to be read only by the individual or entity named above or
their 
designee.
Any distribution of this message or the information contained herein 
without written permission from our company is strictly prohibited. If
the 
reader of this message is not the intended recipient or an agent 
responsible for delivering it to the intended recipient, you 
are hereby 
notified that you have received this document in error and that any 
review, dissemination, distribution, or copying of this message is 
strictly prohibited. If you have received this communication 
in error, 
please notify us immediately by e-mail, and delete the 
original message.


-- 
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 thread ...
Follow-Ups:
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.