ABAP Mapping with multiple records

Hi Thanks for the reply.

But actually these threads do not sufficient for my requriement.

I written the following code and it is working fine for one single record. But I want to change this code to work for multiple records which I am not able to do as I am new to Object Oriented.

method IF_MAPPING~EXECUTE.

• initialize iXML

type-pools: ixml.

class cl_ixml definition load.

• create main factory

data: ixmlfactory type ref to if_ixml.

ixmlfactory = cl_ixml=>create( ).

• create stream factory

data: streamfactory type ref to if_ixml_stream_factory.

streamfactory = ixmlfactory->create_stream_factory( ).

• create input stream

data: istream type ref to if_ixml_istream.

istream = streamfactory->create_istream_xstring( source ).

• parse input document =================================================

• initialize input document

data: idocument type ref to if_ixml_document.

idocument = ixmlfactory->create_document( ).

• parse input document

data: iparser type ref to if_ixml_parser.

iparser = ixmlfactory->create_parser( stream_factory = streamfactory

istream = istream

document = idocument ).

iparser->parse( ).

• get message content of tag <empno>

data: incode type ref to if_ixml_node_collection.

data: incode1 type ref to if_ixml_node_collection.

data: incode2 type ref to if_ixml_node_collection.

data: incode3 type ref to if_ixml_node_collection.

data: incode4 type ref to if_ixml_node_collection.

data: incode5 type ref to if_ixml_node_collection.

data: incode6 type ref to if_ixml_node_collection.

data: incode7 type ref to if_ixml_node_collection.

data: incode8 type ref to if_ixml_node_collection.

data: incode9 type ref to if_ixml_node_collection.

incode = idocument->get_elements_by_tag_name( 'empno' ).

incode1 = idocument->get_elements_by_tag_name( 'empname' ).

incode2 = idocument->get_elements_by_tag_name( 'address1' ).

incode3 = idocument->get_elements_by_tag_name( 'address2' ).

incode4 = idocument->get_elements_by_tag_name( 'address3' ).

incode5 = idocument->get_elements_by_tag_name( 'zipcode' ).

incode6 = idocument->get_elements_by_tag_name( 'mailid' ).

incode7 = idocument->get_elements_by_tag_name( 'phoneno' ).

incode8 = idocument->get_elements_by_tag_name( 'country' ).

incode9 = idocument->get_elements_by_tag_name( 'city' ).

• get XI header data (here: "Sender Service")

data: l_sender_service type string.

l_sender_service = param->get( if_mapping_param=>sender_service ).

• add trace (appears in message monitoring)

data: l_trace type string.

concatenate 'Sender Service = ' l_sender_service into l_trace.

trace->trace( level = '1'

message = l_trace ).

• build up output document =============================================

• create output document

data: odocument type ref to if_ixml_document.

odocument = ixmlfactory->create_document( ).

• create element 'SenderService' and add it to the document

data: msgtype type ref to if_ixml_element.

msgtype = odocument->create_simple_element( name = 'record'

parent = odocument ).

• create element 'SenderService' and add it to the output document

data: elementsender type ref to if_ixml_element.

elementsender = odocument->create_simple_element( name = 'SenderService'

value = l_sender_service

parent = msgtype ).

• add node to the output document

data: outcode type ref to if_ixml_node.

data: outcode1 type ref to if_ixml_node.

data: outcode2 type ref to if_ixml_node.

data: outcode3 type ref to if_ixml_node.

data: outcode4 type ref to if_ixml_node.

data: outcode5 type ref to if_ixml_node.

data: outcode6 type ref to if_ixml_node.

data: outcode7 type ref to if_ixml_node.

data: outcode8 type ref to if_ixml_node.

data: outcode9 type ref to if_ixml_node.

outcode = incode->get_item( index = 0 ).

outcode1 = incode1->get_item( index = 0 ).

outcode2 = incode2->get_item( index = 0 ).

outcode3 = incode3->get_item( index = 0 ).

outcode4 = incode4->get_item( index = 0 ).

outcode5 = incode5->get_item( index = 0 ).

outcode6 = incode6->get_item( index = 0 ).

outcode7 = incode7->get_item( index = 0 ).

outcode8 = incode8->get_item( index = 0 ).

outcode9 = incode9->get_item( index = 0 ).

data irc type i.

irc = msgtype->append_child( outcode ).

irc = msgtype->append_child( outcode1 ).

irc = msgtype->append_child( outcode2 ).

irc = msgtype->append_child( outcode3 ).

irc = msgtype->append_child( outcode4 ).

irc = msgtype->append_child( outcode5 ).

irc = msgtype->append_child( outcode6 ).

irc = msgtype->append_child( outcode7 ).

irc = msgtype->append_child( outcode8 ).

irc = msgtype->append_child( outcode9 ).

• render document ======================================================

• create output stream

data: ostream type ref to if_ixml_ostream.

ostream = streamfactory->create_ostream_xstring( result ).

• create renderer

data: renderer type ref to if_ixml_renderer.

renderer = ixmlfactory->create_renderer( ostream = ostream

document = odocument ).

irc = renderer->render( ).

endmethod.

Can anybody help me making these changes.

Thanks in advance.

Shylesh