This report uses the service BAPI BapiService.MessageGetDetail(), to display the short text and the long text of error messages.

*------------------------------------------------------------------------*
* read a message short and long text using the BAPI *
* BAPI_MESSAGE_GETDETAIL of the object BapiService. *
*------------------------------------------------------------------------*

DATA : MY_ID LIKE BAPIRET2-ID,

MY_NUMBER LIKE BAPIRET2-NUMBER,

MY_TEXTFORMAT LIKE BAPITGA-TEXTFORMAT,

MY_MESSAGE_V1 LIKE BAPIRET2-MESSAGE_V1,

MY_MESSAGE LIKE BAPIRET2-MESSAGE,

MY_RETURN TYPE BAPIRET2.

DATA BEGIN OF MY_TEXT OCCURS 1.

INCLUDE STRUCTURE BAPITGB.

DATA END OF MY_TEXT.

MOVE 'FI' TO MY_ID. "message id of message to read

MOVE '024' TO MY_NUMBER. "message number of message to read

MOVE 'ASC' TO MY_TEXTFORMAT. "text format, here ASCII

MOVE '0001' TO MY_MESSAGE_V1. "text to fill into message

CALL FUNCTION 'BAPI_MESSAGE_GETDETAIL'

EXPORTING

ID = MY_ID

NUMBER = MY_NUMBER

* LANGUAGE = SY-LANGU

TEXTFORMAT = MY_TEXTFORMAT

MESSAGE_V1 = MY_MESSAGE_V1

* MESSAGE_V2 =

* MESSAGE_V3 =

* MESSAGE_V4 =

IMPORTING

MESSAGE = MY_MESSAGE

RETURN = MY_RETURN

TABLES

TEXT = MY_TEXT

.

WRITE : / 'Input' COLOR 5.

WRITE : / 'my_id...........:', MY_ID.

WRITE : / 'my_number.......:', MY_NUMBER.

WRITE : / 'my_textformat...:', MY_TEXTFORMAT.

WRITE : / 'my_message_v1...:', MY_MESSAGE_V1.

WRITE : / 'Output' COLOR 5.

WRITE : / 'my_message........:', MY_MESSAGE.

WRITE : / 'my_return.........:', MY_RETURN.

WRITE : / 'Text output' COLOR 5.

LOOP AT MY_TEXT.

WRITE : / MY_TEXT.

ENDLOOP.