yes...
this did compile as late as August 2018... (that would have been V7R2)...
we are now on V7R3...
this is SQLRPGLE, and the first compile doesn't have the error, it is on
the 2nd compile...



On Wed, Jan 9, 2019 at 9:15 AM Brian May <bmay@xxxxxxxxxxxxxxxxx> wrote:

Yep, the keyword is unnecessary. You are saying it allowed you to compile
like that at one time in free format?

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Gerald
Magnuson
Sent: Wednesday, January 9, 2019 9:12 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <
rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: qualified DS within a qualified DS

SQLRPGLE program..

2307 dcl-ds return_array Qualified;

2308 count_articles int(5) ;

2309 dcl-ds articles dim(999) Qualified;

====> aaaaaaaaa

NF0202 20 a 003300 KEYWORD NOT ALLOWED FOR A NESTED DATA STRUCTURE
SUBFIELD.
2310 id int(10);

2311 itemNumber char(15);

2312 assetId char(15);

2313 userId char(64);

2314 vinNumber char(18);

2315 articleId int(10);

2316 systemId int(5);

2317 typeId int(5);

2318 articleSecondaryId char(15);

2319 description char(30);

2320 count_locations int(5) ;

2321 dcl-ds locations Dim(20) Qualified;

====> aaaaaaaaa
NF0202 20 a 004500 KEYWORD NOT ALLOWED FOR A NESTED DATA STRUCTURE
SUBFIELD.
2322 locationId int(10);

2323 locationLabel char(64);


On Wed, Jan 9, 2019 at 9:08 AM Brian May <bmay@xxxxxxxxxxxxxxxxx> wrote:

Can you provide a code sample? The substructures of a Complex Data
Structure are inherently qualified. I have never tried explicitly
specifying the qualified keyword for the substructures.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Gerald Magnuson
Sent: Wednesday, January 9, 2019 9:05 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <
rpg400-L@xxxxxxxxxxxx>
Subject: qualified DS within a qualified DS

I have some code that is now not compiling because I have a Qualified
DS within another Qualified DS....
It has been a while since I have compiled this code, so I take it we
shouldn't do this anymore???
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email:
RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list
options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email:
RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list
options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com


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-2019 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].