Moving arrays in Free Form

[Fooch]

I know MoveA cannot be used in Free, and I know you should use %SUBARR to move arrays, but I have a field that is 30 long and filled with 10 values, all 3 long. I have a DIM(10) array size 3A and I want to move the value in the field across all the elelments in the array but I can't get it to work. Say the field has '111222333444555666777888999000' and I try to get it in the array, the best I can do, every element has '111' in it. Any way to write this over the array as if it was just another field, so each element will have the next 3? i.e. '111', '222', '333', '444'...

 

[bwtc]

We are on v5r2. From what I understand, v5r3 supports movea.

What I've been doing to "get around" the problem & still make things "look pretty" by not having a combo of /Free & fixed is call a subprodecure to perform the MOVEA.

 

[bwtc]

Sorry, let me clarify -- v5r3 supports /free movea

 

[arrow483]

You could also just put the array in a data structure, and define a field over it with OVERLAY.