COMO COLOCAR MENSAGEM NA CAIXA DE MENSAGENS NA TRANSAÇÃO MIRO

terça-feira, 7 de maio de 2013 0 comentários


Badi INVOICE_UPDATE
Method CHANGE_AT_SAVE
*Constante onde Tem o Campo em Tela que você deseja validar!> CONSTANTS: c_vorgang1(23) TYPE c VALUE '(SAPLMR1M)RM08M-VORGANG'.
FIELD-SYMBOLS: <fs_vorgang1> TYPE ANY.
ASSIGN (c_vorgang1) TO <fs_vorgang1>.
DATA: wa_errtab TYPE mrm_errprot.
IF <fs_vorgang1> = '2'. "Credit Mem
* Aqui Ira preencher a Tabela de mensagens
  
CLEAR wa_errtab.
  wa_errtab
-msgty = 'E'.
  wa_errtab
-msgid = 'ZXX'.
  wa_errtab
-msgno = '045'.
  
wa_errtab-source = 'Q'.
  
APPEND wa_errtab TO gt_errtab.
  
CALL FUNCTION 'MRM_PROT_FILL'
    
TABLES
      t_errprot 
= gt_errtab.
ENDIF.
A FM: MRM_PROT_FILL você irá preencher a tabela de mensagens.

0 comentários:

Postar um comentário