FM show message log

CALL FUNCTION 'MESSAGES_INITIALIZE'.
  CLEAR :L_R_RETURN,P_G_F_ERROR.
  LOOP AT P_G_T_RETURN  INTO L_R_RETURN .
    CALL FUNCTION 'MESSAGE_STORE'
      EXPORTING
        ARBGB = L_R_RETURN-ID
        MSGTY = L_R_RETURN-TYPE
        TXTNR = L_R_RETURN-NUMBER
        MSGV1 = L_R_RETURN-MESSAGE_V1
        MSGV2 = L_R_RETURN-MESSAGE_V2
        MSGV3 = L_R_RETURN-MESSAGE_V3
        MSGV4 = L_R_RETURN-MESSAGE_V4
        ZEILE = L_R_RETURN-ROW.
  ENDLOOP.
  IF P_G_F_ERROR EQ G_C_X.
    CALL FUNCTION 'MESSAGES_SHOW'.
  ENDIF.
  CALL FUNCTION 'MESSAGES_INITIALIZE'.