XSLT-ABAP using Call Transformation

Question

Hello Friends,
I am new to this XSLT-ABAP transformation. I went through the blogs and forums and got a fair bit of idea on this. Now, i am trying to create a simple program/ xslt transformation to test the scenario. Once this is successfull i need to implement this in our project.
I am not sure, where and what i am doing wrong. Kindly check the below given XSLT/ XML/ ABAP Program and correct me.
My XML File looks as given below:
  <?xml version="1.0" encoding="utf-8" ?>
- <List>
- <ITEM>
  <ITEMQUALF>ITEM1</ITEMQUALF>
  <MATERIAL>MAT1</MATERIAL>
  </ITEM>
- <ITEM>
  <ITEMQUALF>ITEM2</ITEMQUALF>
  <MATERIAL>MAT2</MATERIAL>
  </ITEM>
- <ITEM>
  <ITEMQUALF>ITEM3</ITEMQUALF>
  <MATERIAL>MAT3</MATERIAL>
  </ITEM>
  </List>
My XSLT Transformation looks as given below:
<xsl:transform xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:sap="http://www.sap.com/sapxsl" version="1.0">
  <xsl:strip-space elements="*"/>
  <xsl:template match="*">
    <List>
      <xsl:for-each select="ITEM">
        <xsl:element name="ITEM">
          <xsl:element name="ITEMQUALF">
            <xsl:value-of select="ITEMQUALF"/>
          </xsl:element>
          <xsl:element name="MATERIAL">
            <xsl:value-of select="MATERIAL"/>
          </xsl:element>
        </xsl:element>
      </xsl:for-each>
    </List>
  </xsl:template>
</xsl:transform>
My ABAP program looks as below:
REPORT  ztest_ram.
TYPES:
  BEGIN OF ty_test,
    itemqualf TYPE char10,
    material  TYPE char10,
  END OF ty_test,
  ty_t_test TYPE STANDARD TABLE OF ty_test.
DATA:
  l_xml       TYPE REF TO cl_xml_document,
  t_test      TYPE ty_t_test,
  wa_person   TYPE LINE OF ty_t_test,
  t_xml_out   TYPE string,
  v_retcode   TYPE sy-subrc,
  v_totalsize TYPE i.
DATA: gs_rif_ex     TYPE REF TO cx_root,
      gs_var_text   TYPE string.
* Create object
CREATE OBJECT l_xml.
* Call method to import data from file
CALL METHOD l_xml->import_from_file
  EXPORTING
    filename = 'C:\xml\xml_test.xml'
  RECEIVING
    retcode  = v_retcode.
* Call method to Render into string
CALL METHOD l_xml->render_2_string
  IMPORTING
    retcode = v_retcode
    stream  = t_xml_out
    size    = v_totalsize.
* Call Transformation
TRY.
    CALL TRANSFORMATION (`ZXSLT_RAM`)
            SOURCE XML t_xml_out
            RESULT     outtab = t_test.
  CATCH cx_root INTO gs_rif_ex.
    gs_var_text = gs_rif_ex->get_text( ).
    MESSAGE gs_var_text TYPE 'E'.
ENDTRY.
When i run this ABAP program to fetch the data from XML in to Internal table, i get the error message:
Incorrect element List for XML-ABAP transformation
I am really not sure how to proceed further. Could any one help me on this?
Note: Please do not paste the same links, as i have gone through most of them.
Thank you.
Best Regards,
Ram.

Answer 1

UPDATE, works now.
ABAP:
method IF_HTTP_EXTENSION~HANDLE_REQUEST.
*THIS METHOD IS AN HTTP INTERFACE FOR A
*SICF WEB SERVICE HANDLER. IT RECEIVES AN XML PAYLOAD,
*READS IT INTO AN XSTRING, THEN TRANSFORMS THE
*XSTRING INTO ABAP DATA USING AN ABAP XSLT
*TRANSFORMATION PROGRAM
*Process incoming xml Request
     data: lxs_request TYPE xstring.
     lxs_request = server->request->get_data( ).
*BUILD DATA TYPES
TYPES: BEGIN OF ccw_line,
   field11 TYPE STRING,
   field22 TYPE STRING,
   END OF ccw_line.
TYPES: BEGIN OF ccw_head,
   field1 TYPE STRING,
   field2 TYPE STRING,
   lines TYPE STANDARD TABLE OF ccw_line WITH DEFAULT KEY,
   END OF ccw_head.
DATA: ccw_heads type STANDARD TABLE OF ccw_head,
       xccw_heads TYPE ccw_head.
DATA: ccw_lines TYPE STANDARD TABLE OF ccw_line,
       zccw_lines TYPE ccw_line.
DATA: lr_transformation_error TYPE REF TO cx_transformation_error.
DATA: err_text TYPE string.
*CALL TRANSFORMATION
TRY.
   CALL TRANSFORMATION zccwpayload_prg
   SOURCE XML lxs_request
   RESULT OUTPUT = ccw_heads.   "RESULT PARAMETER ("OUTPUT") NAME MUST EQUAL TRANSFORMED XML ROOT eg <OUTPUT>XML DATA...</OUTPUT>
* RESULT XML my_xml_result.    "THIS CAN BE USED IF YOU WANT TO RETURN XML INSTEAD OF ABAP DATA
   CATCH cx_xslt_exception INTO lr_transformation_error.
   err_text = lr_transformation_error->get_text( ).
   server->response->set_cdata( err_text ).
ENDTRY.
*SAVE TO DATABASE
*BUILD RESPONSE
call METHOD server->response->set_cdata
     EXPORTING
         DATA = err_text.
endmethod.
XML SOURCE:
<?xml version="1.0" encoding="ISO-8859-1"?>
<HEADS> <!--MATCH ON THIS IN XSLT!!!-->
      <HEAD><!-- FOR-EACH ON THIS-->
            <headval1>myHeader</headval1>
            <LINES>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
            </LINES>
      </HEAD>
      <HEAD>
            <headval1>myHeader</headval1>
            <LINES>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
            </LINES>
      </HEAD>
      <HEAD>
            <headval1>myHeader</headval1>
            <LINES>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
                  <Line>
                        <lineval1>myLine</lineval1>
                  </Line>
            </LINES>
      </HEAD>
</HEADS>
XSLT PROGRAM:
<xsl:transform xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:sap="http://www.sap.com/sapxsl" version="1.0">
   <xsl:output encoding="UTF-8" indent="yes" method="xml"/>
   <xsl:template match="/HEADS"><!--This should be the root name of your source XML eg <HEADS>xml data...</HEADS> if you don't have a single root match on "/" -->
     <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
       <asx:values>
         <OUTPUT><!--MUST be all caps, MUST match CALL TRANSFORMATION RESULTS parameter name (RESULTS OUTPUT = myABAPDataStructure), and MUST not contain an underscore!!!-->
           <xsl:for-each select="HEAD">
             <HEAD>            <!--ALL CAPS!!!-->
               <FIELD1>
                 <xsl:value-of select="headval1"/>
               </FIELD1>
               <FIELD2>
                 <xsl:value-of select="headval1"/>
               </FIELD2>
               <LINES>
                 <xsl:for-each select="LINES/Line">
                   <LINE>
                     <FIELD11>
                       <xsl:value-of select="lineval1"/>
                     </FIELD11>
                     <FIELD22>
                       <xsl:value-of select="lineval1"/>
                     </FIELD22>
                   </LINE>
                 </xsl:for-each>
               </LINES>
             </HEAD>
           </xsl:for-each>
         </OUTPUT>
       </asx:values>
     </asx:abap>
   </xsl:template>
</xsl:transform>
SAMPLE OF TRANSFORMED XML (MATCHES ABAP DATA STRUCTURE):
IF YOU TEST () YOUR TRANSFORMATION (IN XSLT_TOOL) WITH THE SAMPLE FILE AND IT DOESN'T LOOK LIKE THIS, YOUR TRANSFORMATION WILL FAIL. TAGS MUST BE ALL CAPS!!!!
<?xml version="1.0" encoding="UTF-8"?>
<asx:abap version = "1.0" xmlns:asx = "http://www.sap.com/abapxml">
      <asx:values>
            <OUTPUT>
                  <HEAD>
                        <FIELD1>myHeader</FIELD1>
                        <FIELD2>myHeader</FIELD2>
                        <LINES>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                        </LINES>
                  </HEAD>
                  <HEAD>
                        <FIELD1>myHeader</FIELD1>
                        <FIELD2>myHeader</FIELD2>
                        <LINES>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                        </LINES>
                  </HEAD>
                  <HEAD>
                        <FIELD1>myHeader</FIELD1>
                        <FIELD2>myHeader</FIELD2>
                        <LINES>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                              <LINE>
                                    <FIELD11>myLine</FIELD11>
                                    <FIELD22>myLine</FIELD22>
                              </LINE>
                        </LINES>
                  </HEAD>
            </OUTPUT>
      </asx:values>
</asx:abap>