RE: QRG4111 Record-Format-Name defined more than once

Hi Martin

I tried that and it made no difference, but I have just found the
problem. I had the field renaming I-specs defined after some data
structures, so the compiler was taking the new record format name as the
name of a data structure. Moving that block of I-specs up above the
data structures allowed the program to compile.

It's amazing how much gets taken for granted when coding in RPG IV -
we've never had it so good :-)

Thanks for the help.

All the best

Jonathan


Hillier, Martin <Martin.Hillier@xxxxxxxxxx> wrote :

Hi Jonathan,

Have you tried renaming the first record format to something else?

Cheers,
Martin


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jonathan Mason
Sent: 01 July 2009 09:04
To: rpg400-l@xxxxxxxxxxxx
Subject: QRG4111 Record-Format-Name defined more than once

I have been given the unenviable task of having to fix a bug in an
RPG/400 program and am getting a QRG4111 (Record Format Name defined
more than once) error.

As part of the fix I have to read from an additional logical file that
has the same record format and field names as another file in the
program. On the F-spec I have renamed the record format and have also
included I-specs that rename the fields. For example:

FF0311QZ IF E K DISK
F I0311 KRENAMEQZ0311
..
..
IQZ0311
I RPKCO QZKCO
I RPAN8 QZAN8
I RPDCT QZDCT
..

I have checked the compile listing and it shows the record format
being renamed and also the list of fields read in for format QZ0311
with their RPxxxx names. However, the compiler generates the QRG4111
as it hits the I-spec with the record format name defined.

There are other programs (generated by Synon) that we have which
error as soon successfully rename the fields on the record, but these
record name at the same time.

don't rename the Am I missing something here or is there a limitation
within a renamed record format?

Thanks

Jonathan


_______________________________________________________
This message was sent using NOCC v1.14 webmail software
_______________________________________________________




--
This is the RPG programming on the IBM i / System i (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.

--------------------------------------------------------

on renaming fields This message (including any attachments) is only
for the use of the person(s) for whom it is intended. It may contain
Mattel confidential and/or trade secret information. If you are not
the intended recipient, you should not copy, distribute or use this
information for any purpose, and you should delete this message and
--
inform the sender immediately. This is the RPG programming on the IBM
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.

Jonathan Mason
iSeries Consultant
www.astradyne-uk.com


_______________________________________________________
This message was sent using NOCC v1.14 webmail software
_______________________________________________________