Re: RPG400 same fields name of Input and Output files Update & Write question

["Raul A. Jager W." <raul@xxxxxxxxxx>]

To avoid "move" you can define the input file twice (with different 
names, you can "create alias") and then read input, chain output, chain 
input alias, update output.

It is a lot clearer if you use rpg free.  The input file can also be 
"primary", then you dont need the read.

Gary Choi wrote:

> Hi,
>
> I have a simply RPG with one Input file A, one output file B and they have same fields names KEY, FIELD1, FIELD2
>
> Here is the code:
>
> *LOVAL SETLL A
> 1 DOWEQ 1
> READ A 99
> 99 LEAVE
>
> WRITE B
>
>
> ENDDO
>
> Without any MOVE (no rename of file B FIELD1 & FIELD2) it can write to file B
>
> However, for update operation
>
>
> *LOVAL SETLL A
> 1 DOWEQ 1
> READ A 99
> 99 LEAVE
>
> (MOVE FIELD1#TMP)
>
> KEY CHAIN B 98
> (MOVE #TMP FIELD1)
>
> N98 UPDATE B
>
>
> ENDDO
>
> Without any MOVE in (...), can reading every records in file A update FIELD1 & FIELD2 in file B of the matching key of file B?
> Further, if I add  MOVE FIELD1 #TMP before CHAIN, and N98 MOVE #TMP FIELD1 after CHIAN, can it only update FIELD1 in file B with value of FIELD1 in file A? and FIELD2 is unchanged in file B?
>
>
> Thanks
>
> CHOI
>