Sintoma

Erro ao estornar liquidação de contrato de câmbio Pronto.Quando faço o estorno na liquidação do

contrato, no batch input, o programa só traz a transção FBRA quando deveria trazer tb a FB08. Assim

apenas anula a compensação do documento de liquidação e com isso, ficam partidas em aberto

indevidamente na conta do cliente e do ACE.

Obs.: apesar de exibir que a compensação foi anulada e o documento estornado, o programa não age

dessa forma.

Solução

Ajustado para que FB08 assuma o ano contabil de acordo com os parametros da OBY6 e da OX06.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 02150 Data: 26/09/2006 Hora: 18:27:07

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 02150

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00025

Agrupamento              : 00132

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

----------------------------------------------------------------------------------------------------

ESTORNO LIQUIDAÇÃO FB08 FBRA ANO FISCAL

----------------------------------------------------------------------------------------------------

Palavras Chave:

ESTORNO LIQUIDAÇÃO FB08 FBRA ANO FISCAL

----------------------------------------------------------------------------------------------------

Objetos da nota:

FUNC /PWS/ZYCB_TRANSACAO_FB08

----------------------------------------------------------------------------------------------------

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB08

...

   v_msgid              like t100-arbgb,

   v_date               like T009B-BDATJ,

   v_msgno              like t100-msgnr.

 tables bseg.

  loop at t_dados.

* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_FB08

    CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

        EXPORTING

              v_bukrs                = t_dados-bukrs

              v_date                 = t_dados-budat

        IMPORTING

              V_YEAR                 = v_date

        EXCEPTIONS

              VARIANTE_DE_EXERCICIO  = 1

              DATA_NAO_ENCONTRADA    = 2

              EMPRESA_NAO_ENCONTRADA = 3

              PERIOD_IN_NOT_VALID    = 4

              PERIOD_NOT_ASSIGNED    = 5

              VERSION_UNDEFINED      = 6

              OTHERS                 = 7.

* << Fim da inclusão

    select single * from bseg

      where  bukrs = t_dados-bukrs

      and    belnr = t_dados-belnr

* >> Início da exclusão: FUNCTION /PWS/ZYCB_TRANSACAO_FB08

      and    gjahr = t_dados-budat+0(4).

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_FB08

      and    gjahr = v_date.

* << Fim da inclusão

    IF sy-subrc NE 0.

      t_zycbt032-mandt  = t_dados-mandt.

      t_zycbt032-tcode  = t_dados-tcode.

      t_zycbt032-tabela = t_dados-tabela.

      t_zycbt032-cpochv = t_dados-cpochv.

...