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



I second this approach
Any and every RPG III program that I have touched - no matter how small the change - I have converted to RPG IV immediately

Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Thursday, August 15, 2013 8:10 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Renaming Fields in RPG400

I'd convert to RPG IV...

In fact, any RPG III program I have to touch gets converted to RPG IV.
It's silly not to do so IMHO.

But I suppose you could always rename the fields via a DDS logical.

Charles


On Thu, Aug 15, 2013 at 7:15 AM, Jonathan Mason
<Jonathan.Mason@xxxxxxxxxxx>wrote:

I am currently modifying an RPG400 program and need to read an
external file that, unfortunately, has field names longer than six
characters. I have tried renaming the fields in the I-specs, but get
compiler error
QRG4052 ("FIELD NAME EXCEEDS SIX CHARACTERS IN LENGTH AND IS NOT
RENAMED") as soon as the compiler tries to bring in the external definitions:

The section of code and errors look like this:

FSYSPARMSIF E K DISK
...
...
IPARMREC 01
I PARMFLD1 @KEY1
I PARMFLD2 @KEY2
I PARMFLD3 @KEY3
I PARMDATA @DATA

* 4052 PARMFLD1 FIELD NAME EXCEEDS SIX CHARACTERS IN LENGTH
AND IS NOT RENAMED.
* 4052 PARMFLD2 FIELD NAME EXCEEDS SIX CHARACTERS IN LENGTH
AND IS NOT RENAMED.
* 4052 PARMFLD3 FIELD NAME EXCEEDS SIX CHARACTERS IN LENGTH
AND IS NOT RENAMED.
* 4052 PARMDATA FIELD NAME EXCEEDS SIX CHARACTERS IN LENGTH
AND IS NOT RENAMED.

I have searched the net and the archives to no avail, all the examples
I find are either ILE or using field names of six or less characters.
I know I can convert the source to RPG IV or call an RPG IV program to
do the read, but was wondering if there is a way round this.

Thanks in advance

Jonathan


________________________________
Proud partner of The Ageas Bowl and the Ageas Salisbury International
Arts Festival.

Registered Address: Ageas House Tollgate Eastleigh Hampshire SO53 3YA
Registered Number: 354568 England Authorised by the Prudential
Regulation Authority and regulated by the Financial Conduct Authority
and the Prudential Regulation Authority

This e-mail together with any attachments are intended for the
addressee only and may be private and confidential. If you are not the
intended recipient, or the person responsible for delivering it to the
intended recipient, you must not open any attachments, or copy,
disclose, distribute, retain or use this e-mail, including any
attachments, in any way whatsoever; please return it to us immediately
using the reply facility on e-mail.

Consider the environment and think before you print this email.
--
This is the RPG programming on the IBM i (AS/400 and 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 IBM i (AS/400 and 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.


Disclaimer: This message contains confidential information and is intended only for the individual named. If you are not the named addressee you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately by e-mail if you have received this e-mail by mistake and delete this e-mail from your system. E-mail transmission cannot be guaranteed to be secure or error-free as information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or contain viruses. The sender therefore does not accept liability for any errors or omissions in the contents of this message, which arise as a result of e-mail transmission. If verification is required please request a hard-copy version. Any views or opinions presented are solely those of the author and do not necessarily represent those of the company.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

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.