#1
|
|||
|
|||
Program Update_routine
Hola a todos!! Algún alma caritativa me podría traducir un poquito lo que me está queriendo decir este programita, por favor?
![]() 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. |
![]() |
Herramientas | Buscar en Tema |
Desplegado | |
|
|