SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Remove BCS usage (#4693)

Browse Source 
Closes #4440

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2021-04-10 11:13:35 +02:00 committed by GitHub
parent 086a23daca
commit d9f4ee7a54
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 23 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
src/xml/zcl_abapgit_xml_output.clas.testclasses.abap
View File

@ -45,15 +45,18 @@ CLASS ltcl_xml_output IMPLEMENTATION.
exp = ls_result ). exp = ls_result ).
ENDMETHOD. ENDMETHOD.
METHOD render_xml_string. METHOD render_xml_string.
DATA: ls_input TYPE ty_old, DATA: ls_input TYPE ty_old,
lv_value TYPE string, lv_value TYPE string,
lv_xml TYPE string, lv_xml TYPE string,
lo_output TYPE REF TO zcl_abapgit_xml_output, lo_output TYPE REF TO zcl_abapgit_xml_output,
lo_conv_in_string TYPE REF TO cl_abap_conv_in_ce, lo_conv_in_string TYPE REF TO cl_abap_conv_in_ce,
lv_encoding TYPE abap_encoding, lo_conv_out_string TYPE REF TO cl_abap_conv_out_ce,
lv_xstring TYPE xstring. lv_encoding TYPE abap_encoding,
lv_xstring TYPE xstring,
lv_bom TYPE xstring.
ls_input-foo = '2'. ls_input-foo = '2'.
ls_input-bar = 'A'. ls_input-bar = 'A'.
@ -72,19 +75,22 @@ CLASS ltcl_xml_output IMPLEMENTATION.
lv_xml = lo_output->zif_abapgit_xml_output~render( ). lv_xml = lo_output->zif_abapgit_xml_output~render( ).
lv_encoding = cl_abap_codepage=>sap_codepage( `UTF-16LE` ). lv_encoding = cl_abap_codepage=>sap_codepage( `UTF-16LE` ). "4103
TRY. lo_conv_out_string = cl_abap_conv_out_ce=>create(
lv_xstring = cl_bcs_convert=>string_to_xstring( encoding = lv_encoding
iv_string = lv_value ignore_cerr = 'X' ).
iv_codepage = lv_encoding
iv_add_bom = 'X' ). lo_conv_out_string->write( data = lv_value ).
CATCH cx_bcs.
ENDTRY. lv_xstring = lo_conv_out_string->get_buffer( ).
lv_bom = cl_abap_char_utilities=>byte_order_mark_little. "UTF-16LE, 4103
CONCATENATE lv_bom lv_xstring INTO lv_xstring IN BYTE MODE.
lo_conv_in_string = cl_abap_conv_in_ce=>create( lo_conv_in_string = cl_abap_conv_in_ce=>create(
encoding = lv_encoding encoding = lv_encoding
input = lv_xstring ). input = lv_xstring ).
lo_conv_in_string->read( IMPORTING data = lv_value ). lo_conv_in_string->read( IMPORTING data = lv_value ).