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!> CONSTANTSc_vorgang1(23TYPE c VALUE '(SAPLMR1M)RM08M-VORGANG'.
FIELD-SYMBOLS<fs_vorgang1> TYPE ANY.
ASSIGN (c_vorgang1TO <fs_vorgang1>.
DATAwa_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