CE PLUS - Nota 001149

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Liquidação de Fatura

Data/Hora da Publicação: 05/04/2006 00:00:00

Data/Hora Última Alteração: 18/02/2011 15:00:03

Descrição da Nota: ERRO NA LIQUIDAÇÃO DE MAIS DE UMA FATURA DE ARBITRAGEM - CONTRATO DE ACC

Sintoma

Quando tenta-se liquidar mais de uma fatura de arbitragem em um contrato de ACC, o BI está buscando

o número de documento errado no desmembramento do ACE da segunda fatura liquidada, o BI deveria

selecionar o documento de vinculação da fatura, mas está buscando o documento de desmembramento de

ACE da primeira fatura (já liquidada), ou seja, a partida selecionada estará compensada e a operação

não é concluída.

 

 

Solução

Ajustada busca do documento e o tratamento para não prosseguir a contabilização caso seja dado o /n.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 01149 Data: 05/04/2006 Hora: 08:24:36

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

 

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

Nota Número              : 01149

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00108

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

ERRO NA LIQUIDAÇÃO DE MAIS DE UMA FATURA DE ARBITRAGEM - CONTRATO DE ACC

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

Palavras Chave:

LIQUIDAÇÃO MAIS DE UMA FATURA DE ARBITRAGEM ACC

ERRO NA BUSCA DO DOCUMENTO NO DESMEMBRAMENTO DO ACE

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

Objetos da nota:

REPS /PWS/MZYCB004F02

 

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

Modificações efetuadas em REPS /PWS/MZYCB004F02

 

...

                  itab_zycbt006-nrinvoic itab_zycbt006-gsberf

                  itab_zycbt006-nrparcf

                  itab_zycbt006-dtvincul itab_zycbt006-dtvencto

                  itab_zycbt006-dtpagto  itab_zycbt030-vbeln

                  itab_zycbt030-belnr    INTO v_cpochv.

* >> Início da inclusão: FORM ABRE_DOCTO_ACE_2

      READ TABLE itab_zycbt032 WITH KEY tcode  = 'F-30'

                                        tabela = '/PWS/ZYCBT006'

                                        cpochv = v_cpochv

                                        tpmsg  = 'S'.

      IF sy-subrc = 0.

        if itab_zycbt005-tpcontr(1) = 'C'.

* << Fim da inclusão

      v_cont = v_cont + 1.

      IF v_cont = 1.

        v_index1 = v_cont + 1.

        itab_zycbt005-belnr  = itab_zycbe033-belnr.

        /pws/zycbe001-belnr2 = itab_zycbe033-belnr.

...

 

...

      ELSE.

        IF v_cont > 1.

          itab_zycbt005-belnr  = itab_zycbe033-belnr.

          /pws/zycbe001-belnr2 = itab_zycbe033-belnr.

          MODIFY itab_zycbt005 INDEX v_index1 TRANSPORTING belnr.

* >> Início da inclusão: FORM ABRE_DOCTO_ACE_2

            ENDIF.

* << Fim da inclusão

        ENDIF.

      ENDIF.

* >> Início da exclusão: FORM ABRE_DOCTO_ACE_2

      READ TABLE itab_zycbt032 WITH KEY tcode  = 'F-30'

                                        tabela = '/PWS/ZYCBT006'

                                        cpochv = v_cpochv

                                        tpmsg  = 'S'.

      IF sy-subrc = 0.

* << Fim da exclusão

        itab_zycbt006-belnr_d = itab_zycbt032-belnr.

        v_data_desm_ace       = itab_zycbe033-budat.

        MODIFY itab_zycbt006.

        LOOP AT itab_zycbt069 WHERE nrseqc   = itab_zycbt006-nrseqc

                              AND nrinvoic = itab_zycbt006-nrinvoic

...