Code: Alles auswählen.
METHOD on_data_changed.
CLEAR: t_modi. REFRESH t_modi.
* Modified Fields list.
t_modi = er_data_changed->mt_mod_cells.
LOOP AT t_modi INTO w_modi.
case w_modi-FIELDNAME.
*-
when 'NETWR' .
READ TABLE wp INTO wa_wp INDEX w_modi-row_id.
IF sy-subrc = 0.
add w_modi-value to wa_wp-NETWR.
MODIFY wp FROM wa_wp INDEX w_modi-row_id
TRANSPORTING TOTAL.
ENDIF.
* *
*
*
*
endcase.
clear: x_row, x_roid, w_row, w_col, w_value, x_col.
CALL METHOD a1->GET_CURRENT_CELL
IMPORTING
E_ROW = w_row
E_VALUE = w_value
E_COL = w_col
ES_ROW_ID = x_row
ES_COL_ID = x_col
ES_ROW_NO = x_roid.
CALL METHOD a1->refresh_table_display.
call method a1->set_current_cell_via_id
EXPORTING
is_row_no = x_roid
is_column_id = x_col.
ENDMETHOD.