## MOVEA opcode problem

2900 pts.
Tags:
AS/400
RPG
Hi all,
``` SCRFG     IFEQ ' '
MOVEA*ALL'0'   *IN
ELSE
MOVEA'00000'   *IN,30
MOVEA'00000'   *IN,35
MOVEA'00000'   *IN,40
MOVEA'00000'   *IN,45
MOVEA'00000'   *IN,50
MOVEA'00000'   *IN,55
MOVEA'0000000' *IN,60
MOVEA'000000'  *IN,81
MOVE '0'       *IN98
MOVE '0'       *IN99
END
1. What is *IN?
2. Are 30, 35 ... are indicators or what?
3. If they are indicators then why different number of *zeros are passed to them?
Thanks,```

Thanks. We'll let you know when a new response is added.

## Discuss This Question: 2 Replies

Thanks. We'll let you know when a new response is added.
• *in is the indicator array containing 99 elements *in01 through *in99

MoveA moves data into an array as opposed to moving it to individual fields

MOVEA*ALL'0'   *IN   puts zero in all positions of the *IN array          MOVEA'00000'   *IN,30 changes the values in 5 fields because '00000' is 5 long the updated set starts with *in30

so it's the same as saying *in30 = 0 *in31=0 *in32=0 *in33=0 *in34=0