Добрый день уважаемые ABAPer-ы. Вот не получается что то у меня даблклик, видимо всё таки делаю что то не так: Объявляю классы:
DATA: gc_alv_table TYPE REF TO cl_salv_table,
gc_columns TYPE REF TO cl_salv_columns_table,
gc_colwork TYPE REF TO cl_salv_column_table,
gc_functions TYPE REF TO cl_salv_functions,
gc_display TYPE REF TO cl_salv_display_settings,
gr_table type ref to cl_salv_table.
class lcl_handle_events definition deferred.
data: gr_events type ref to lcl_handle_events.
class lcl_handle_events definition.
public section.
methods:
on_double_click for event double_click of cl_salv_events_table
importing row column.
endclass. "lcl_handle_events DEFINITION
*---------------------------------------------------------------------*
* CLASS lcl_handle_events IMPLEMENTATION
class lcl_handle_events implementation.
method on_double_click.
perform double_click using row column.
endmethod. "on_double_click
endclass.
выше у меня идут объявления данных, их типов, записей и таблиц, я их не стал выкладывать, поскольку программка работает, т.е. выводит табличку в соответствии с теми классами которые я использовал на примерах приводимых здесь, но вот именно даблклик не пашет, видимо у меня догонялки не хватает додумать что я не так делаю. Затем у меня идёт start of selection, потом выводится табличка на экран и дальше идёт perform double_click
FORM double_click using i_row type i
i_column type lvc_fname.
data: lr_selections type ref to cl_salv_selections,
ls_cell type salv_s_cell.
CASE i_column.
WHEN 'IM_LIFNR' " Подробно, документы
OR 'IM_BUKRS'.
lr_selections = gr_table->get_selections( ).
ls_cell = lr_selections->get_current_cell( ).
read table im_tab index ls_cell-row.
CLEAR wa.
wa-program = 'SAPMF02K'.
wa-dynpro = '0106'.
wa-dynbegin = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'BDC_OKCODE'.
wa-fval = '/00'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-LIFNR'.
wa-fval = im_tab-im_lifnr. "Vendor
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-BUKRS'.
wa-fval = im_tab-im_bukrs. "Company code
APPEND wa TO bdcdata.
*General data
CLEAR wa.
wa-fnam = 'RF02K-D0110'. "Address
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-D0120'. "Control
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-D0130'. "Payment transactions
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'WRF02K-D0380'. "contact person
wa-fval = 'X'.
APPEND wa TO bdcdata.
*Company code data
CLEAR wa.
wa-fnam = 'RF02K-D0210'. "account info
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-D0215'. "Payment transactions
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-D0220'. "correspondence
wa-fval = 'X'.
APPEND wa TO bdcdata.
CLEAR wa.
wa-fnam = 'RF02K-D0610'. "With holding tax
wa-fval = 'X'.
APPEND wa TO bdcdata.
CALL TRANSACTION 'FK03' USING bdcdata MODE 'E'.
ENDCASE.
ENDFORM.
Есть у кого какие мысли что именно я не так делаю?? Буду весьма признателен за помощь, а то сам наверное не разберусь.