XML transformation -- abap

Question

Hi Experts, I need help with this XSLT for call transformation. I have defined an internal table and intend to use it as a source for Call Tranformation. But I have Problems to defining my internal table to get the resut of the function transformation.(SAP 4.7)
In my case i have a xml with attibutes and i can't store these attibutes in internal table.
Hope to hear from any of u soon!
CMA
<--XSLT--
>
<xsl:transform xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:sap="http://www.sap.com/abapxml" version="1.0">
  <xsl:template match="//Catalog">
    <asx:abap xmlns:asx="http://www.sap.com/abapxml">
      <asx:values>
        <CATALOG>
          <!-- Boucle catalogue -->
          <xsl:for-each select="EnTete">
            <ENTETE>
              <EMETTEUR>
                <xsl:value-of select="Emetteur"/>
              </EMETTEUR>
              <DATEPUBLICATION>
                <xsl:value-of select="DatePublication"/>
              </DATEPUBLICATION>
              <!-- Suite -->
              <xsl:for-each select="Univers">
                <UNIVERS>
                  <LIBELLE>
                    <xsl:value-of select="@libelle"/>
                  </LIBELLE>
                  <OBJREF>
                    <xsl:value-of select="@objref"/>
                  </OBJREF>
                  <OBJID>
                    <xsl:value-of select="@objid"/>
                  </OBJID>
                  <EMETTEUR>
                     <xsl:value-of select="Emetteur"/>
                 </EMETTEUR>
                </UNIVERS>
              </xsl:for-each>
            </ENTETE>
          </xsl:for-each>
          <!-- ENTETE-->
        </CATALOG>
      </asx:values>
    </asx:abap>
  </xsl:template>
</xsl:transform>
<--XML--
>
<?xml version="1.0" encoding="UTF-8"?>
<asx:abap xmlns:asx="http://www.sap.com/abapxml">
<asx:values>
<Catalog>
     <EnTete>
          <Emetteur>UGAP</Emetteur>
          <DatePublication>27/06/2007 09:20:02</DatePublication>
              <Univers libelle="Nettoyage, hygine et entretien"  objref="08" objid="374417o.bemp" >
                 <Emetteur>UGAP</Emetteur>
              </Univers>
           <Univers libelle="Nettoyage, hygine et entretien"  objref="09" objid="374417o.bemp" >
                 <Emetteur>UGAP</Emetteur> 
              </Univers>
</EnTete>       
</Catalog>
</asx:values>
</asx:abap>
<--abap--
>
TYPES: BEGIN OF t_universs,
       libelle(35),
       objref(35),
       objid(35),
      boutique  TYPE t_boutique,
       END OF t_universs.
TYPES: t_univers TYPE t_universs OCCURS 0.
               UNIVERS                 *
TYPES: BEGIN OF t_entetes,
            Emetteur(20),
            DatePublication(30),
            UNIVERS  TYPE t_univers,
         END OF t_entetes.
*TYPES: t_entete TYPE t_entetes OCCURS 0.
DATA: it_data    TYPE STANDARD TABLE OF t_entetes,
      wa_data    TYPE t_entetes.
PARAMETER p_file(200) DEFAULT '/tmp/catalogue4.xml' LOWER CASE .
start-of-selection.
DATA: dsn(20) VALUE '/usr/catalogue2.xml',
      msg(100).
data : l_sysubrc like sy-subrc.
*OPEN DATASET p_file FOR INPUT MESSAGE msg
                IN TEXT MODE ENCODING DEFAULT.
OPEN DATASET p_file FOR INPUT IN BINARY MODE.
IF sy-subrc = 0.
CLEAR : gv_read_xml.
clear l_sysubrc.
READ DATASET p_file INTO gv_read_xml.
Transformation XML en ABAP-DATA
PERFORM check_xml USING gv_read_xml.
CLOSE DATASET p_file.
ENDIF.
*& Form check_xml
FORM check_xml USING p_xml TYPE string.
DATA: cx_runtime_error TYPE REF TO cx_xslt_runtime_error.
DATA: cx_format_error TYPE REF TO cx_xslt_format_error.
DATA: err_text TYPE string.
DATA: lt_xml TYPE STANDARD TABLE OF typ_xml,
      ls_xml TYPE typ_xml,
      source_xml TYPE string,
      lt_result_xml TYPE abap_trans_resbind_tab,
      ls_result_xml TYPE abap_trans_resbind.
TRY.
CALL TRANSFORMATION ZUGAP
SOURCE XML p_xml
RESULT CATALOG = it_data.
ENDTRY.
LOOP AT it_data INTO wa_data.
ENDLOOP.
i'm wonder if is it possible to get attribute from xml with abap function transformation...
Hope to hear from any of u soon!

Answer 1

Hi Marcelo,
Thanks a lot for your reply, your code is very usefull but my problem is located around the XSLT file.
With my progam (abap), I can't read the attibutes from a XML file correctly because the XSLT have not the suitable tags.
In my XML i have 2 rows of "Univers" and after use the function transformation from abap i can store only 1 rows in internal table   :
<Catalog>
     <EnTete>
          <Emetteur>UBB</Emetteur>
              <b><Univers libelle="Nettoyage, hygine et entretien"  objref="08">
              </Univers>
              <Univers libelle="Nettoyage, hygine et entretien"  objref="09">
              </Univers></b>     
              </EnTete>       
</Catalog>
XSLT :
<xsl:for-each select="EnTete">
            <ENTETE>
              <EMETTEUR>
                <xsl:value-of select="Emetteur"/>
              </EMETTEUR>
               <xsl:for-each select="Univers">
                <UNIVERS>
                  <UNIVERS1>
                    <LIBELLE> <xsl:value-of select="@libelle"/></LIBELLE>
                    <OBJREF> <xsl:value-of select="@objref"/>  </OBJREF>
                  </UNIVERS1>
                </UNIVERS>
               </xsl:for-each>
            </ENTETE>
          </xsl:for-each>
My question is : How can i do to define attributes in XSLT to allow read them by a program abap ?
In my example, the program abap get only 1 attribute in my iternal table, what is the suitable syntax in the xslt to read all the attributes  ?
Hope to hear from any of u soon!
Christophe.