Program Update_routine

[manusap]

Hola a todos!! Algún alma caritativa me podría traducir un poquito lo que me está queriendo decir este programita, por favor?:confused: Son unas updates rules que quiero entender en BW.
Muchas gracias!!!
Saludos


PROGRAM UPDATE_ROUTINE.
*$*$ begin of global - insert your declaration only below this line *-*
* TABLES: ...
DATA i TYPE n.
DATA: i_calyear LIKE scal-year,
i_week LIKE scal-week,
e_mweek LIKE sy-tabix,
i_date LIKE scal-date.
*$*$ 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/CS8ZSMISOO3
RECORD_NO LIKE SY-TABIX
RECORD_ALL LIKE SY-TABIX
SOURCE_SYSTEM LIKE RSUPDSIMULH-LOGSYS
CHANGING RESULT LIKE /BIC/VZSMISOSC1T-/BIC/ZNO_ORHD
RETURNCODE LIKE SY-SUBRC
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 = 1.
* if the returncode is not equal zero, the result will not be updated
RETURNCODE = 0.
* 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.