Re: Need OCCURS when defining data structures

As I said, I haven't tested this today but I have used this technique, or something very much like it, in the past.

http://tinyurl.com/62fffy

This page has examples. Look particularly at the second example:

CL0N01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq....
*C MOVEA ARRX ARRY(3)*
* Array-to-array move with index result field.

This appears to me to be exactly what he is trying to do?



M. Lazarus wrote:

Booth,

I'm pretty sure that this will NOT work. It will probably end up with the entire array containing the value in element 1.

-mark

At 2/3/09 03:40 PM, you wrote:

Does this do what you want done?

C MOVEA ARRAY1 ARRAY1(2)
C EVAL ARRAY(1) = NewValue


I haven't tested this. You might have to define a second array, but I
believe not.

James Newman, CDP wrote:

I'm on a V5R2 machine and rewriting a program that currently uses

60 element

arrays when processing records. As part of the processing I have to move
element 59 to element 60, 58 to 59, etc and put the newly read record in
element 1. A friend (thanks Marshall) suggested that instead of using
arrays, define the arrays as data structures and move the data structure
instead. This should be much faster. But do I have to define each element
as part of the larger data structure? I guess there's no "OCCURS X TIMES"
in RPG, eh?

TIA