report  zunicode_025.
data: cp_tab  type         nls_langu_cp_tab,
      l_wa    type         nls_langu_cp_line,
      cc      type ref to  cl_nls_struc_container.

*
data:  begin of downtab occurs 100,
        content(500),
       end of downtab.

data:  begin of head occurs 100,
*         header(1),
         txjcd(6),
*         aa(20),
        end of head.

*head-header = '1'.
head-txjcd = '가나다라마'.
*head-aa = '아자차'.
append head.

* Non Unicode(한글 2바이트로 인식)
l_wa-langu = '3'.
l_wa-codepage = '8500'.

insert l_wa into table cp_tab.

cc = cl_nls_struc_container=>create( cp_tab = cp_tab ).

try.
    call method cc->struc_to_cont
      exporting
        struc = head
        langu = '3'
      importing
        cont  = downtab-content.
  catch cx_sy_conversion_codepage .
  catch cx_parameter_invalid_range .
endtry.

append downtab.

loop at downtab.
  write : /1(100) downtab-content.

endloop.