Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Submit ME2N and return cannot get the fields from asscount assignment button

siongchao_ng
Contributor
0 Kudos
427

Hi all,

I am submitting rm06en00 WITH SELECTION-TABLE lt_seltab AND RETURN. (basically calling ME2N)

Now in ME2N there are fields hidden in the account assignment button. I need to get the ZEKKN field value.

I need to click the account assignment button.

The ZEKKN field value is here (circled)

My <lt_data> do not have the ZEKKN field. May I know how to get the return field?

data: lt_seltab TYPE table OF rsparams,
ls_seltab LIKE LINE OF lt_seltab.

DATA: lt_abaplist TYPE TABLE OF abaplist.
DATA ls_abaplist TYPE abaplist.

DATA: ls_data TYPE REF TO data.
DATA: ls_data1 TYPE REF TO data.
DATA: ls_data24 TYPE REF TO data.


FIELD-SYMBOLS: <lt_data> TYPE table,
<lt_data1> TYPE table,
<lt_data24> TYPE table,
<l_data> TYPE data,
<fs_docu> TYPE any,
<l_wtlief> TYPE any,
<l_netpr> TYPE any,
<l_waers> TYPE any.


gwa_output-ebeln = '4509002874'.
gwa_output-ebelp = '00001'.

CLEAR lt_seltab.

ls_seltab-selname = 'S_EBELN'. "Parameter on selection screen of submitted report
ls_seltab-kind = 'S'.
ls_seltab-sign = 'I'.
ls_seltab-option = 'EQ'.
ls_seltab-low = gwa_output-ebeln.

APPEND ls_seltab TO lt_seltab.

ls_seltab-selname = 'LISTU'. "Parameter on selection screen of submitted report
ls_seltab-kind = 'S'.
ls_seltab-sign = 'I'.
ls_seltab-option = 'EQ'.
ls_seltab-low = 'ZBEST'.

APPEND ls_seltab TO lt_seltab.
*
cl_salv_bs_runtime_info=>set(
display = abap_false
metadata = abap_false
data = abap_true ).
*
** call ME2N program and return back its end result table to be used here!!!
SUBMIT rm06en00 WITH SELECTION-TABLE lt_seltab AND RETURN.

TRY.
cl_salv_bs_runtime_info=>get_data_ref(
IMPORTING r_data = ls_data ).
ASSIGN ls_data->* TO <lt_data>.
* MESSAGE 'Data Retrieved' TYPE 'S'.
UNASSIGN <l_data>.
READ TABLE <lt_data> ASSIGNING <l_data> WITH KEY ('EBELN') = gwa_output-ebeln
('EBELP') = gwa_output-ebelp.
IF sy-subrc = 0.
UNASSIGN <l_wtlief>.
UNASSIGN <l_netpr>.
UNASSIGN <l_waers>.
ASSIGN COMPONENT 'WTLIEF' OF STRUCTURE <l_data> TO <l_wtlief>.
ASSIGN COMPONENT 'NETPR' OF STRUCTURE <l_data> TO <l_netpr>.
ASSIGN COMPONENT 'WAERS' OF STRUCTURE <l_data> TO <l_waers>.
IF <l_wtlief> IS ASSIGNED.

ENDIF.
ENDIF.

*** must clear else calling program ALV WONT display!!!!
cl_salv_bs_runtime_info=>clear_all( ).


CATCH cx_salv_bs_sc_runtime_info.
* MESSAGE 'Unable to retrieve data' TYPE 'E'.
ENDTRY.
0 REPLIES 0