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


  • Subject: RE: DB2/400 Rerference file
  • From: Rob Berendt <rob@xxxxxxxxx>
  • Date: Mon, 28 Sep 1998 10:31:58 -0500

RPGIII code is easy and fun to convert to RPG ILE code.  It might be a good way 
to learn some
of the simple ways of doing stuff in RPG ILE.

Unsupported items in RPG ILE are pretty much limited to the opcodes FREE and 
DEBUG.

Steps to convert RPGIII to ILE - bare minimum.
CRTSRCPF FILE(lib/QRPGLESRC) RCDLEN(112)  - note new record length
CRTDUPOBJ OBJ(QARNCVTLOG) 
          FROMLIB(QRPGLE) 
          OBJTYPE(*FILE)  
          TOLIB(lib)      
          NEWOBJ(QRNCVTLG) - note spelling of new object differs
CVTRPGSRC FROMFILE(lib/QRPGSRC)
          FROMMBR(pgmname)     
          TOFILE(lib/QRPGLESRC)
          LOGFILE(lib/QRNCVTLG)
RUNQRY QRY(*NONE)             
       QRYFILE((lib/QRNCVTLG)) - checks for errors during the conversion
I recommend creating custom PDM options.  To do so perform the following steps:
WRKMBRPDM FILE(lib/QRPGSRC)
F16=User options
F6=Create
   Option  . . . . . . . . .   LE   Value to change to
   Command . . . . . . . . .   CVTRPGSRC FROMFILE(&L/&F) FROMMBR(&N) TOFILE(&L/Q
RPGLESRC) LOGFILE(&L/QRNCVTLG) /* Convert a RPGIII source file to RPGILE */     
F6=Create
   Option  . . . . . . . . .   LQ   Value to change to
   Command . . . . . . . . .   RUNQRY QRYFILE((&L/QRNCVTLG)) /* Read the RPG to
RPGILE conversion log */                                                       





Mary_Koetting@mail.mchcp.org on 09/26/98 03:04:35 PM
Please respond to MIDRANGE-L@midrange.com@Internet
To:     MIDRANGE-L@midrange.com@Internet
cc:      
Subject:        RE: DB2/400 Rerference file

What would you do if you had legacy code with a mix of internally and
externally described files in RPG III and COBOL that needs to be Y2K
compliant.

I want to externally describe all the data files and maybe convert the RPG
III to RPG IV if it is easily done. 

No one in our shop is a seasoned RPG programmer but if RPG IV will accept
all the RPG III code, we don't have anything to unlearn because we didn't
know it in the first place for the most part. We are going to have this code
for sometime and I would like to do it as right as we can. 

I think there is a command that converts the RPG III to RPG IV but have no
idea what statements are no longer valid when you convert. If someone knows
of a list of differences I would appreciate it. Thanks.  

-----Original Message-----
From: boothm@ibm.net [mailto:boothm@ibm.net]
Sent: Saturday, September 26, 1998 12:42 PM
To: MIDRANGE-L@midrange.com
Subject: Re: DB2/400 Rerference file


Is the day of the reference file dead?   RPGIV, 10 character field names,
PREFIX, and other keywords are making the usefulness of the Reference file
fall by the wayside.  In other words, what if you just left the file as-is
and move on?  This is of course no more than one opinion. 




In <56618D912F50D211BC3200A0C96F981F02E80F@mail.mchcp.org>, on 09/26/98 
   at 11:49 AM, Mary Koetting <Mary_Koetting@mail.mchcp.org> said:

>Is there any way to tell if a data field in a reference file is never
>referenced?

>We have a huge field reference file that needs cleaned up and other than
>starting with an empty file and adding data fields as they are
>referenced, I can't think of another way. It seems to be the only way but
>with thousands of fields it could be a tremendous task.

>S

-- 
-----------------------------------------------------------
boothm@ibm.net
Booth Martin
-----------------------------------------------------------

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.