REPORT zlm_xml_02
.
*&---------------------------------------------------------------------*
*&声明及定义部分
*&---------------------------------------------------------------------*
TYPE-POOLS
: ixml
.
****声明存放ＸＭＬ文件的结构
TYPES
:
BEGIN
OF xml_line
,
data
(
256
)
TYPE
x
,
END
OF xml_line
.
****声明对象
DATA
: l_ixml
TYPE
REF
TO if_ixml
,
l_streamfactory
TYPE
REF
TO if_ixml_stream_factory
,
l_ostream
TYPE
REF
TO if_ixml_ostream
,
l_renderer
TYPE
REF
TO if_ixml_renderer
,
l_document
TYPE
REF
TO if_ixml_document
.
****声明ＸＭＬ元素
DATA
:l_element_inpot
TYPE
REF
TO if_ixml_element
,
l_element_matnr
TYPE
REF
TO if_ixml_element
,
l_element_art
TYPE
REF
TO if_ixml_element
,
l_element_prueflos
TYPE
REF
TO if_ixml_element
,
l_element_budat
TYPE
REF
TO if_ixml_element
,
l_element_losmenge
TYPE
REF
TO if_ixml_element
,
l_element_enstehdat
TYPE
REF
TO if_ixml_element
,
l_value
TYPE string
.
****声明存放ＸＭＬ文件的内表以及字节数
DATA
: l_xml_table
TYPE
TABLE
OF xml_line
,
l_xml_size
TYPE
i
,
l_rc
TYPE
i
,
flag
TYPE string
.
****声明数据内表
DATA
:
BEGIN
OF i_data
OCCURS
0
,
matnr
LIKE qals
-matnr
,
prueflos
LIKE qals
-prueflos
,
art
