viernes, 8 de marzo de 2013

Texto de mensaje.

Para tener el texto de un mensaje de forma entendible 'MESSAGE_TEXT_BUILD'. En mi caso tengo una tabla p_mensajes_out  TYPE   zws_mensajes_t con los datos necesarios.

  DATA : p_mensajes_out TYPE  zws_mensajes_t.

  
CONCATENATE sy-datum sy-uzeit INTO p_idpersona .
*
  
DATAwa_mensajes_out TYPE zws_mensajes_l.
*
  wa_mensajes_out
-msgty 'I'.
*  WA_MENSAJES_OUT-TEXT = 'xxx'.
  wa_mensajes_out
-arbgb 'VF'.
  wa_mensajes_out
-txtnr '006'.
  wa_mensajes_out
-msgv1 'SRG'.
*wa_mensajes_out-MSGV2
*wa_mensajes_out-MSGV3
*wa_mensajes_out-MSGV4
*
  
CALL FUNCTION 'MESSAGE_TEXT_BUILD'
    
EXPORTING
      msgid               
wa_mensajes_out-arbgb
      msgnr               
wa_mensajes_out-txtnr
      msgv1               
wa_mensajes_out-msgv1
      msgv2               
wa_mensajes_out-msgv1
      msgv3               
wa_mensajes_out-msgv1
      msgv4               
wa_mensajes_out-msgv1
    
IMPORTING
      message_text_output 
wa_mensajes_out-text.
*
  
APPEND wa_mensajes_out TO p_mensajes_out.