CE PLUS - Nota 011113
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 20/04/2011 00:00:00
Data/Hora Última Alteração: 26/04/2011 15:09:04
Descrição da Nota: AO DAR ERRO NA BAPI DA MIRO, PROGRAMA NÃO REALIZAVA ROLLBACK.
Sintoma
Ao dar algum erro durante a execução da BAPI da MIRO, programa não realizava comando de ROLLBACK,
conforme indicação da SAP.
Solução
De acordo com SAP Note 771655 acrescentamos a função de ROLLBACK após a bapi da MIRO caso haja algum
erro durante a execução.
Versões Tratadas
8.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11113 Data: 20/04/2011 Hora: 10:58:04
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11113
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00067
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
----------------------------------------------------------------------------------------------------
AO DAR ERRO NA BAPI DA MIRO, PROGRAMA NÃO REALIZAVA ROLLBACK.
----------------------------------------------------------------------------------------------------
Palavras Chave:
BAPI - MIRO - ROLLBACK - SAP - MELHORIA - INDICAÇÃO - FUNÇÃO.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI017F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...
FORM fill_date_mr1m.
* >> Início da inclusão: FORM FILL_DATE_MR1M
DATA: wa_return TYPE bapiret2 .
* << Fim da inclusão
...
...
CALL FUNCTION 'BAPI_INCOMINGINVOICE_CREATE'
EXPORTING
headerdata = wa_headerdata
IMPORTING
invoicedocnumber = v_belnr_mr1m
fiscalyear = v_gjahr
TABLES
itemdata = itab_itemdata
accountingdata = itab_account
return = itab_return.
* >> Início da inclusão: FORM FILL_DATE_MR1M
READ TABLE itab_return INTO wa_return INDEX 1.
IF sy-subrc EQ 0.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ELSE.
* << Fim da inclusão
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
* >> Início da inclusão: FORM FILL_DATE_MR1M
ENDIF.
* << Fim da inclusão
PERFORM atualiza_dados_miro.
ENDFORM.
...