Can you please help fix this Update rule?

Question

Hi,
I have a field (field1) in an ODS (ODS1) and the same field1 is also in ODS2.
Once ODS2 is loaded with data, I would like to populate the same field1 in ODS1 through the UPDATE RROUTINE.
So I went to ODS1 and in the update rules, selected field1, and selected the update method as Routine. I then assigned a name to the update routine and got the code below.
Can help me modify this code to fill the field field1 in the ODS1 if the following is true:
key1 in ODS1 = Key1 in ODS2 AND
key2 in ODS1 = Key2 in ODS2 AND
key3 in ODS1 = Key3 in ODS2 AND
key4 in ODS1 = Key4 in ODS2 AND
Otherwise leave the field blank.
PROGRAM UPDATE_ROUTINE.
$$ begin of global - insert your declaration only below this line  -
TABLES: ...
DATA:   ...
$$ end of global - insert your declaration only before this line   -
FORM compute_data_field
  TABLES   MONITOR STRUCTURE RSMONITOR "user defined monitoring
  USING    COMM_STRUCTURE LIKE /BIC/Zaft_PPP
           RECORD_NO LIKE SY-TABIX
           RECORD_ALL LIKE SY-TABIX
           SOURCE_SYSTEM LIKE TPSMMM-TSTSYS
  CHANGING RESULT LIKE /BIC/ AABBTST00-field1
           RETURNCODE LIKE SY-SUBRC "Do not use!
           ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line        -
fill the internal table "MONITOR", to make monitor entries
result value of the routine
  RESULT = .
if abort is not equal zero, the update process will be canceled
  ABORT = 0.
$$ end of routine - insert your code only before this line         -
ENDFORM.
Thanks

Answer 1

Hi,
Lv_field1 is a local variable to which you would be assigning the value of the field1 from ODS2. So thats the reason after assigning field1 value to lv_field1 it assigned to Result.
The select statement should be below the following:
FORM compute_data_field
TABLES MONITOR STRUCTURE RSMONITOR "user defined monitoring
USING COMM_STRUCTURE LIKE /BIC/Zaft_PPP
RECORD_NO LIKE SY-TABIX
RECORD_ALL LIKE SY-TABIX
SOURCE_SYSTEM LIKE TPSMMM-TSTSYS
CHANGING RESULT LIKE /BIC/ AABBTST00-field1
RETURNCODE LIKE SY-SUBRC "Do not use!
ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line -
fill the internal table "MONITOR", to make monitor entries
<b>Select Statement</b>
result value of the routine
<b>RESULT = lv_field1</b>.
if abort is not equal zero, the update process will be canceled
ABORT = 0.
Also the table definition is for ODS2 from which you would be reading.
Regards,
Namrata