SET ORDER TO Field1B IN TABLE_B SELECT TABLE_A SET RELATION TO Number INTO TABLE_B SCAN FOR Amount<>0 IF FOUND("TABLE_B") REPLACE Field2B WITH TABLE_A.Amount IN Table_B ENDIF ENDSCANIs there any reason you are using !EOF("Table_B") instead of FOUND("TABLE_B")?
>>SELECT TABLE_A >>SCAN FOR Amount<>0 >> STORE Number TO xNbr >> SELECT TABLE_B >> LOCATE FOR Field1B=xNbr >> * To be safe you should check here if the record is found or not >> REPLACE Field2B WITH TABLE_A.Amount >>ENDSCAN >>>
IF !EOF("Table_B") >REPLACE Field2B WITH TABLE_A.Amount IN Table_B >ENDIF