Re: Question on defining Alternating Array

I don't think it will work this way. For one thing your overlay array is going to cover GL_Account_01 thru _05 - and that's assuming that Account and Amount are the same size which I doubt.

As a minimum you need to define all Accounts before the Amounts. You will also need a group field in order to redefine the Amounts as an array. Like so: (in free form 'cos I I can't align while I don't have an editor available.

dcl-ds GL_Stuff;
Account_01 Like(x);
Account_nn Like(x);

Amounts;
Amount_01 Like(y) Overlay(Amounts);
Amount_nn Like(y) Overlay(Amounts: *Next);

Account_Array Like(x) Dim(nn) Pos(1);
Amount_Array Like(y) Dim(nn) Overlay(Amounts);
end-ds;

Even if you do it this way I'm not convinced the Alt will work - not sure why you want to use that it seems to buy so little but that's just me probably.

Sorry - can't try it out - no system access right this minute.


On 2014-07-09, at 11:11 AM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

All,
I have a DS that contains 20 fields:
GL_Number_01 10A
GL_Account_01 10A


After defining each of the 10 occurrences as sub fields, I then define the
arrays using the following code:
GL_Account Overlay(GL_DS) Dim(10)
GL_Amount Dim(10) Alt(GL_Account)

I am receiving the following error:
RNF3442: The parameter GL_ACCOUNT for keyword ALT is not valid; keyword is
ignored.

What am I missing?


The actual code is at: http://code.midrange.com/012d0ccc4e.htm
<http://code.midrange.com/012d0ccc4e.html>
Jeff Young
Sr. Programmer Analyst
--
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.

Jon Paris

www.partner400.com
www.SystemiDeveloper.com