Re: Using %SUBAR to load array from a field

That would work, but I was hoping that there was a real BIF that replaced the MOVEA op code.

Thanks,
 
Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2 
IBM  Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM  Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3
  
 






________________________________
From: Mark Walter <mwalter@xxxxxxxxxxxxxxx>
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Sent: Tue, June 1, 2010 10:20:08 AM
Subject: RE: Using %SUBAR to load array from a field

If I'm understanding you, you'd probably want to use %SUBST of the field to load the array.

for x = 1 to 24;
    myArray(x) = %subst(myField:x:1);
endfor;

Mark D. Walter
Business to Business Data Integration Specialist
Certified IBM System I Specialist
Paragon Consulting Services, Inc.
mwalter@xxxxxxxxxxxxxxx
717-764-7909 Ext. (1)26


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jeff Young
Sent: Tuesday, June 01, 2010 9:57 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Using %SUBAR to load array from a field

I have an array of 24 elements that I need to load from a field.
In fixed form, I would use the MOVEA to do this.
In Free Form, I am attempting to use the %SUBARR BIF.
However, what I end up with is all elements of my array set to the same value, which is the first element of the array.
The statement is coded as follows:
 %SubArr(Lines : 1 : %Elem(Lines)) = XsScrn;
Lines is defined as 24 entries
XsScrn is a field from a file that is 1920.

What am I missing?

Thanks,

Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2 
IBM  Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM  Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3