DATA: mime      TYPE STANDARD TABLE OF w3mime WITH HEADER LINE.
DATA lv_bytelen TYPE i.
DATA lv_lines   TYPE i.
DATA lv_value_len TYPE wwwparams-value.
DATA: lo_document TYPE REF TO cl_xlsx_document.
DATA: lo_workbook       TYPE REF TO cl_xlsx_workbookpart,
      lo_wordsheetparts TYPE REF TO cl_openxml_partcollection,
      lo_wordsheetpart  TYPE REF TO cl_openxml_part,
      lo_sheet_content  TYPE xstring,
      lo_xml_document   TYPE REF TO cl_xml_document.

CONSTANTS lc_template_name TYPE w3objid VALUE 'ZJDTEST'.

START-OF-SELECTION.
  IMPORT mime FROM DATABASE wwwdata(mi) ID lc_template_name.
  DESCRIBE TABLE mime[] LINES lv_lines.

  CALL FUNCTION 'WWWPARAMS_READ'
    EXPORTING
      relid  = 'MI'
      objid  = lc_template_name
      name   = 'filesize'
    IMPORTING
      value  = lv_value_len
    EXCEPTIONS
      OTHERS = 1.

  lv_bytelen = lv_value_len.

  CALL METHOD cl_rswad_convert=>w3mime_to_xstring(
    EXPORTING
      i_bytelen = lv_bytelen
      i_t_table = mime[]
    IMPORTING
      e_xstring = DATA(lv_xstring) ).


  lo_document = cl_xlsx_document=>load_document( lv_xstring ).
  lo_workbook = lo_document->get_workbookpart( ).
  lo_wordsheetparts = lo_workbook->get_worksheetparts( ).
  lo_wordsheetpart = lo_wordsheetparts->get_part( 0 ).
  lo_sheet_content = lo_wordsheetpart->get_data( ).

  CREATE OBJECT lo_xml_document.
  lo_xml_document->parse_xstring( lo_sheet_content ).
  lo_xml_document->display( ).