[ABAP]MEMORY-ID 안쓰고 SUBMIT 데이터 가져오기(cl_salv_bs_runtime_info)

MB5B (전기일 재고) 스탠다드 결과 가져오는 예시

REPORT zmb5b.

DATA: lr_pay_conf_data TYPE REF TO data,
lr_pay_conf_data1 TYPE REF TO data.

FIELD-SYMBOLS:
<lt_pay_conf_data> TYPE STANDARD TABLE,
<ls_pay_conf_data> TYPE any,
<lv_field> TYPE any,

<lt_pay_conf_data1> TYPE STANDARD TABLE,
<ls_pay_conf_data1> TYPE any,
<lv_field1> TYPE any.

DATA : s_matnr TYPE RANGE OF matnr,
      ls_werks TYPE RANGE OF werks,
      s_datum TYPE RANGE OF datum,
      wa_matnr LIKE LINE OF s_matnr,
      wa_werks LIKE LINE OF ls_werks,
      wa_datum LIKE LINE OF s_datum.

DEFINE set_range.
  &1-sign = &2.
  &1-option = &3.
  &1-low = &4.
  append &1 to &5.
END-OF-DEFINITION.

set_range wa_matnr 'I' 'EQ' '100639' s_matnr.
set_range wa_werks 'I' 'EQ' '1000' ls_werks.
set_range wa_datum 'I' 'EQ' '20220630' s_datum.
CLEAR : lr_pay_conf_data.
cl_salv_bs_runtime_info=>set( EXPORTING display = abap_false
                                        metadata = abap_false
                                        data = abap_true ).

SUBMIT rm07mlbd USING SELECTION-SCREEN 1000
                WITH matnr IN s_matnr
                WITH werks IN ls_werks
                WITH datum IN s_datum
                WITH lgbst EQ 'X'
                WITH bwbst EQ ''
                WITH sbbst EQ ''
                WITH pa_sumfl EQ 'X' AND RETURN.

cl_salv_bs_runtime_info=>get_data_ref( IMPORTING r_data = lr_pay_conf_data ).
ASSIGN lr_pay_conf_data->* TO <lt_pay_conf_data>.
CL_SALV_BS_RUNTIME_INFO=>CLEAR_ALL( ).