Konvertierung XML zu interne Tabelle - Versionsgeschichte

M1ch3lde: /* Codeschnipsel */

2026-01-18T18:55:35Z

Codeschnipsel

← Nächstältere Version		Version vom 18. Januar 2026, 20:55 Uhr
Zeile 36:		Zeile 36:
	window_title = lv_windows_title		window_title = lv_windows_title
	default_filename = 'C:\test.xml'		default_filename = 'C:\test.xml'
	initial_directory = 'C:\' CHANGING		initial_directory = 'C:\'
			CHANGING
	file_table = lt_filetable		file_table = lt_filetable
	rc = lv_anz_dat		rc = lv_anz_dat

M1ch3lde: /* Codeschnipsel */

2026-01-18T18:55:21Z

Codeschnipsel

← Nächstältere Version		Version vom 18. Januar 2026, 20:55 Uhr
Zeile 36:		Zeile 36:
	window_title = lv_windows_title		window_title = lv_windows_title
	default_filename = 'C:\test.xml'		default_filename = 'C:\test.xml'
	initial_directory = 'C:\'		initial_directory = 'C:\' CHANGING
	CHANGING
	file_table = lt_filetable		file_table = lt_filetable
	rc = lv_anz_dat		rc = lv_anz_dat

M1ch3lde: /* Parameter der Methode */

2026-01-18T18:29:11Z

Parameter der Methode

← Nächstältere Version		Version vom 18. Januar 2026, 20:29 Uhr
Zeile 2:		Zeile 2:

	=== Parameter der Methode ===		=== Parameter der Methode ===
			<syntaxhighlight lang="abap" line start="1">
	IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload		IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload
	IV_XML_FROM_APPLSERVER TYPE LOCALFILE OPTIONAL Pfad zur XML-Datei in AL11		IV_XML_FROM_APPLSERVER TYPE LOCALFILE OPTIONAL Pfad zur XML-Datei in AL11
	value( ET_ITAB ) TYPE TT_TAB_XML		value( ET_ITAB ) TYPE TT_TAB_XML
			</syntaxhighlight>

	=== Codeschnipsel ===		=== Codeschnipsel ===
	<syntaxhighlight lang="abap" line start="1">		<syntaxhighlight lang="abap" line start="1">

M1ch3lde: /* Codeschnipsel */

2021-08-12T07:04:51Z

Codeschnipsel

← Nächstältere Version		Version vom 12. August 2021, 09:04 Uhr
Zeile 19:		Zeile 19:
	iv_xml_as_upload = abap_false AND iv_xml_from_applserver IS NOT INITIAL.		iv_xml_as_upload = abap_false AND iv_xml_from_applserver IS NOT INITIAL.

	*== create the object		"== create the object
	CREATE OBJECT lo_xml_document.		CREATE OBJECT lo_xml_document.

	*== XML from Upload		"== XML from Upload
	IF iv_xml_as_upload = abap_true.		IF iv_xml_as_upload = abap_true.
	DATA: lt_filetable TYPE filetable,		DATA: lt_filetable TYPE filetable,
Zeile 42:		Zeile 42:
	READ TABLE lt_filetable INTO lv_filename INDEX 1.		READ TABLE lt_filetable INTO lv_filename INDEX 1.

	*== Upload xml file		"== Upload xml file
	lo_xml_document->import_from_file(		lo_xml_document->import_from_file(
	EXPORTING		EXPORTING
Zeile 51:		Zeile 51:
	CHECK lv_subrc = 0.		CHECK lv_subrc = 0.

	*== Convert to xstring		"== Convert to xstring
	CALL METHOD lo_xml_document->render_2_xstring		CALL METHOD lo_xml_document->render_2_xstring
	IMPORTING		IMPORTING
Zeile 62:		Zeile 62:
	ELSEIF iv_xml_from_applserver IS NOT INITIAL.		ELSEIF iv_xml_from_applserver IS NOT INITIAL.

	*== Read XML from applserver		"== Read XML from applserver

	OPEN DATASET iv_xml_from_applserver FOR INPUT IN BINARY MODE.		OPEN DATASET iv_xml_from_applserver FOR INPUT IN BINARY MODE.
Zeile 78:		Zeile 78:
	ENDIF.		ENDIF.

	*== Convert XML to itab		"== Convert XML to itab

	DATA: lt_return TYPE TABLE OF bapiret2.		DATA: lt_return TYPE TABLE OF bapiret2.

M1ch3lde am 12. August 2021 um 07:04 Uhr

2021-08-12T07:04:32Z

← Nächstältere Version		Version vom 12. August 2021, 09:04 Uhr
Zeile 2:		Zeile 2:

	=== Parameter der Methode ===		=== Parameter der Methode ===

	IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload		IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload
	IV_XML_FROM_APPLSERVER TYPE LOCALFILE OPTIONAL Pfad zur XML-Datei in AL11		IV_XML_FROM_APPLSERVER TYPE LOCALFILE OPTIONAL Pfad zur XML-Datei in AL11
	value( ET_ITAB ) TYPE TT_TAB_XML		value( ET_ITAB ) TYPE TT_TAB_XML

	=== Codeschnipsel ===		=== Codeschnipsel ===
			<syntaxhighlight lang="abap" line start="1">

	TYPES tyt_tab_xml TYPE TABLE OF smum_xmltb.		TYPES tyt_tab_xml TYPE TABLE OF smum_xmltb.

Zeile 94:		Zeile 91:

	et_itab = lt_xml_tab.		et_itab = lt_xml_tab.
			</syntaxhighlight>

M1ch3lde: Die Seite wurde neu angelegt: „Kategorie:Codeschnipsel === Parameter der Methode === IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload IV_XML_FROM_APPLSERVER TYPE LOCALFILE OP…“

2021-07-18T14:07:02Z

Die Seite wurde neu angelegt: „Kategorie:Codeschnipsel === Parameter der Methode === IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload IV_XML_FROM_APPLSERVER TYPE LOCALFILE OP…“

Neue Seite

[[Kategorie:Codeschnipsel]]

=== Parameter der Methode ===

IV_XML_AS_UPLOAD TYPE CHAR01 OPTIONAL X = XML als Upload
IV_XML_FROM_APPLSERVER TYPE LOCALFILE OPTIONAL Pfad zur XML-Datei in AL11
value( ET_ITAB ) TYPE TT_TAB_XML

=== Codeschnipsel ===

TYPES tyt_tab_xml TYPE TABLE OF smum_xmltb.

DATA: lv_xml_xstring TYPE xstring,
lt_xml_tab TYPE TABLE OF smum_xmltb,
lv_filename TYPE localfile,
lo_xml_document TYPE REF TO cl_xml_document,
lv_subrc TYPE sy-subrc,
lv_size TYPE sy-tabix.

CHECK iv_xml_as_upload = abap_true AND iv_xml_from_applserver IS INITIAL OR
iv_xml_as_upload = abap_false AND iv_xml_from_applserver IS NOT INITIAL.

*== create the object
CREATE OBJECT lo_xml_document.

*== XML from Upload
IF iv_xml_as_upload = abap_true.
DATA: lt_filetable TYPE filetable,
lv_anz_dat TYPE i,
lv_windows_title TYPE string.
lv_windows_title = TEXT-001.

cl_gui_frontend_services=>file_open_dialog(
EXPORTING
window_title = lv_windows_title
default_filename = 'C:\test.xml'
initial_directory = 'C:\'
CHANGING
file_table = lt_filetable
rc = lv_anz_dat
EXCEPTIONS
OTHERS = 5 ).

READ TABLE lt_filetable INTO lv_filename INDEX 1.

*== Upload xml file
lo_xml_document->import_from_file(
EXPORTING
filename = lv_filename
RECEIVING
retcode = lv_subrc ).

CHECK lv_subrc = 0.

*== Convert to xstring
CALL METHOD lo_xml_document->render_2_xstring
IMPORTING
retcode = lv_subrc
stream = lv_xml_xstring
size = lv_size.

CHECK lv_subrc = 0.

ELSEIF iv_xml_from_applserver IS NOT INITIAL.

*== Read XML from applserver

OPEN DATASET iv_xml_from_applserver FOR INPUT IN BINARY MODE.
READ DATASET iv_xml_from_applserver INTO lv_xml_xstring.
CLOSE DATASET iv_xml_from_applserver.

CALL METHOD lo_xml_document->parse_xstring
EXPORTING
stream = lv_xml_xstring
RECEIVING
retcode = lv_subrc.

CHECK lv_subrc = 0.

ENDIF.

*== Convert XML to itab

DATA: lt_return TYPE TABLE OF bapiret2.

CALL FUNCTION 'SMUM_XML_PARSE'
EXPORTING
xml_input = lv_xml_xstring
TABLES
xml_table = lt_xml_tab
return = lt_return.
CHECK sy-subrc = 0.

et_itab = lt_xml_tab.