Submit後取得報表內容LIST_FROM_MEMORY

DATA : BEGIN OF fs,
         col1 TYPE string,
         col2 TYPE string,
         col3 TYPE string,
         col4 TYPE string,
         col5 TYPE string,
         col6 TYPE string,
         col7 TYPE string,
         col8 TYPE string,
         col9 TYPE string,
         col10 TYPE string,
         col11 TYPE string,
         col12 TYPE string,
       END OF fs.
DATA gt_coois LIKE TABLE OF fs WITH HEADER LINE.   
DATA list_tab TYPE TABLE OF abaplist.
  DATA: BEGIN OF ascilist OCCURS 100,
          line TYPE c LENGTH 1000,
        END OF ascilist.

  SUBMIT ppio_entry
    WITH p_sc1100 = lw_sc1100
    WITH s_werks IN s_werks
    WITH s_isten IN s_gltri
    WITH s_aufnr IN s_aufnr
    WITH s_matnr IN s_matnr
    WITH s_arbpl IN lr_arbpl
    EXPORTING LIST TO MEMORY
                AND RETURN.

  CALL FUNCTION 'LIST_FROM_MEMORY'
    TABLES
      listobject = list_tab
    EXCEPTIONS
      not_found  = 1
      OTHERS     = 2.

  IF sy-subrc = 0.

    CALL FUNCTION 'LIST_TO_ASCI'
*   EXPORTING
*     LIST_INDEX               = -1
*     WITH_LINE_BREAK          = ' '
*   IMPORTING
*     LIST_STRING_ASCII        =
*     LIST_DYN_ASCII           =
      TABLES
        listasci   = ascilist
        listobject = list_tab
*   EXCEPTIONS
*       EMPTY_LIST = 1
*       LIST_INDEX_INVALID       = 2
*       OTHERS     = 3
      .

    LOOP AT ascilist FROM 5.
      SPLIT ascilist-line AT '|' INTO fs-col1 fs-col2 fs-col3 fs-col4 fs-col5 fs-col6 fs-col7 fs-col8 fs-col9 fs-col10 fs-col11 fs-col12.
      APPEND fs TO gt_coois.
      CLEAR fs.
    ENDLOOP.

Submit coois

清單與配置變數
  DATA: lw_sc1100    TYPE ppio_entry_sc1100.
  lw_sc1100-ppio_listtyp = 'PPIOO000'.    "作業
  lw_sc1100-alv_variant = '/00000000001'.      "配置

  SUBMIT ppio_entry
    WITH p_sc1100 = lw_sc1100