:rtfm: report  z_download_docx.

parameters: p_docid like /ipro/tdocmnt-docmnt_id.
parameters: p_cntnt like /ipro/tdocmnt-content.
parameters: p_outdf like /ipro/toutdef-otype.

* implicit constant definition for context node content
types:
   begin of element_content,
     content  type /ipro/tcontent-content,
     content_object  type ref to /ipro/if_content,
     content_lbl  type string,
   end of element_content,
   elements_content type
      standard table of element_content
      with default key.

data:
   lt_content      type elements_content,
   lt_contents     type /ipro/tt_contents,
   lo_content      type ref to /ipro/if_content,
   ls_sel_content  like line of lt_content,
   lr_docb_factory type ref to /ipro/if_docb_factory,
   lr_model        type ref to /ipro/if_model,
   lx_notfound     type ref to /ipro/cx_serializer_failed_at,
   lo_output               type ref to /ipro/if_output.

data: piv_name type string.
move p_cntnt to piv_name.
call function '/IPRO/CONTENT_FACTORY'
   exporting
     piv_name     = piv_name
   importing
     pet_contents = lt_contents.

read table lt_contents into lo_content index 1.
lr_docb_factory = lo_content->get_docb_factory( ).

check lr_docb_factory is not initial.
lr_model = lr_docb_factory->lookup( piv_docmnt_id = p_docid
                                     piv_version = 1 ).
if lr_model is initial.
   try.
       lr_model ?=
         lr_docb_factory->open( piv_docmnt_id = p_docid
                                piv_docmnt_version = 1 ).
     catch /ipro/cx_serializer_failed_at into lx_notfound.
       exit.
     catch /ipro/cx_action_noauth
           /ipro/cx_action_illegal.
       exit.
   endtry.
endif.

if lr_model is bound.
   lo_output ?= lr_model.
endif.

data: ls_doc                  type /ipro/s_output.

if lo_output is bound.
   try.
       lo_output->enable( p_outdf ).
       ls_doc = lo_output->generate( p_outdf ).
     catch /ipro/cx_output_otype_invalid.
     catch /ipro/cx_output_gen_failed.
   endtry.
endif.

data:
   lv_file_len type i,
   out_tab     type standard table of tbl1024.

call function 'SCMS_XSTRING_TO_BINARY'
   exporting
     buffer          = ls_doc-data
*   APPEND_TO_TABLE = ' '
   importing
     output_length   = lv_file_len
   tables
     binary_tab      = out_tab.

call function 'GUI_DOWNLOAD'
   exporting
     bin_filesize = lv_file_len
     filename     = 'd:\1.docx.'
     filetype     = 'BIN'
   tables
     data_tab     = out_tab
   exceptions
     others       = 22.

if sy-subrc <> 0.
* Implement suitable error handling here
endif.