DATA: lt_message TYPE STANDARD TABLE OF bapiret2,


  ls_message TYPE bapiret2.

  ls_message-id         = 'FB'.


  ls_message-number     = '001'.


  ls_message-type       = 'S'.


  APPEND ls_message to lt_message.

  ls_message-number     = '002'.

  APPEND ls_message to lt_message.


  CALL FUNCTION 'MESSAGES_INITIALIZE'.


  LOOP AT lt_message INTO ls_message.


    CALL FUNCTION 'MESSAGE_STORE'


      EXPORTING


        arbgb                   = ls_message-id


        exception_if_not_active = space


        msgty                   = ls_message-type


        msgv1                   = ls_message-message_v1


        msgv2                   = ls_message-message_v2


        msgv3                   = ls_message-message_v3


        msgv4                   = ls_message-message_v4


        txtnr                   = ls_message-number


      EXCEPTIONS


        message_type_not_valid  = 1


        not_active              = 2


        OTHERS                  = 3.


  ENDLOOP.

  CALL FUNCTION 'MESSAGES_SHOW'.




Serkan AKKAVAK

Computer Engineer

SAP Department Deputy Manager

Contact : serkurumsal@yandex.com