다른 프로그램 ALV DATA 가져오기(CL_SALV_BS_RUNTIME_INFO)

  DATA: GT_DATA TYPE TABLE OF ZCOS1010.

  DATA: LR_DATA TYPE REF TO DATA.
  FIELD-SYMBOLS: <FS_TABLE> TYPE ANY TABLE.

  CL_SALV_BS_RUNTIME_INFO=>SET( EXPORTING DISPLAY  = ABAP_FALSE
                                          METADATA = ABAP_FALSE
                                          DATA     = ABAP_TRUE ).

  SUBMIT ZCOR1010 WITH P_KOKRS EQ P_KOKRS
                  WITH P_BUKRS EQ P_BUKRS
                  WITH P_CURTP EQ '10'
                  WITH S_HRPER IN LR_HRPER
                  WITH P_NOT   EQ ABAP_TRUE
                  AND RETURN.

  TRY.
      CL_SALV_BS_RUNTIME_INFO=>GET_DATA_REF( IMPORTING R_DATA = LR_DATA ).

      IF LR_DATA IS NOT INITIAL.
        ASSIGN LR_DATA->* TO <FS_TABLE>.
        GT_DATA = CORRESPONDING #( <FS_TABLE> ).
      ENDIF.

    CATCH CX_SALV_BS_SC_RUNTIME_INFO.
      MESSAGE 'Unable to retrieve ALV data' TYPE 'E'.

  ENDTRY.

  CL_SALV_BS_RUNTIME_INFO=>CLEAR_ALL( ).

SUBMIT 구문을 활용해서 데이터를 가져오는 방법이다.

결과는 GT_DATA에 리턴받는다.

 

만약 마지막 CL_SALV_BS_RUNTIME_INFO=>CLEAR_ALL( ).

해주지 않으면 이 이후에 실행하는 프로그램들은 화면에 제대로 출력이 되지 않으니 런타임까지 클리어 해주길..