CE PLUS - Nota 010703

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Liquidação de Fatura

Data/Hora da Publicação: 01/11/2010 00:00:00

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

Descrição da Nota: LIQUIDAÇÃO - ESTORNO - NÃO CARREGA DOCTO. DESM. NO CLEARING CONTRATO

Sintoma

Ao efetuar o estorno de uma liquidação onde anula/estorna o documento de liquidação e, por algum

motivo, ocorre erro nos clearing¿s(contrato ou cliente), ao tentar efetuar novamente o estorno, no

clearing do contrato não aparece o documento de desemembramento para voltar o saldo correto.

 

 

Solução

Se não encontrar o documento de desmembramento na BSAS, buscar diretamente na tabela /PWS/ZYCBT084

(histórico contábil).

 

Versões Tratadas

8.0


Pré-Requisitos

Produto:

Nota

Descrição

DA-LIQUIDAÇÃO E VINCULAÇÃO LIQ. AUTOMÁT - NORMAL/ARBITRAGEM/PERFORMANCE

LIQUIDAÇÃO - ERRO ATUALIZAÇÃO SALDO NO ESTORNO

TRAZER OS AJUSTES DO CHAMADO 392344 PARA O PRODUTO

Informações Complementares

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

Nota Número 10703 Data: 01/11/2010 Hora: 10:51:00

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

 

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

Nota Número              : 10703

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00005

Agrupamento              : 00045

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

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

07169  - 00001 - 7.0    - 00006  - TRAZER OS AJUSTES DO CHAMADO 392344 PARA O PRODUTO

07760  - 00002 - 7.0    - 00007  - DA-LIQUIDAÇÃO E VINCULAÇÃO LIQ. AUTOMÁT - NORMAL/ARBITRAGEM/PERFO

10270  - 00003 - 8.0    - 00003  - LIQUIDAÇÃO - ERRO ATUALIZAÇÃO SALDO NO ESTORNO

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

LIQUIDAÇÃO - ESTORNO - NÃO CARREGA DOCTO. DESM. NO CLEARING CONTRATO

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

Palavras Chave:

LIQUIDAÇÃO ESTORNO NÃO CARREGA DOCTO. DESM. NO CLEARING CONTRATO

DOCUMENTO DE DESEMEMBRAMENTO

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

Objetos da nota:

REPS /PWS/MZYCB004F02

 

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

Modificações efetuadas em REPS /PWS/MZYCB004F02

 

...

    if /pws/zycbe001-desc_receb is initial.

      loop at itab_ace.

        itab_zycbt036-tcode   = 'F-30'.

        itab_zycbt036-tabela  = 'ZYCBT006'.

        concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

               into itab_zycbt036-cpochv.

        itab_zycbt036-dtdocto = itab_ace-budat.

        itab_zycbt036-belnr   = itab_ace-belnr.

        append itab_zycbt036.

      endloop.

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

      if sy-subrc ne 0.

        read table itab_zycbt084 with key

                                      nrinvoic = itab_zycbt006-nrinvoic

                                      nrparcf  = itab_zycbt006-nrparcf

                                      gsberf   = itab_zycbt006-gsberf

                                      dtvincul = itab_zycbt006-dtvincul

                                      dtpagto  = itab_zycbt006-dtpagto

                                      dtpagext = itab_zycbt006-dtpagext

                                      tdesmemb = 'E'.

        if sy-subrc = 0.

          itab_zycbt036-tcode   = 'F-30'.

          itab_zycbt036-tabela  = 'ZYCBT006'.

          concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

                 into itab_zycbt036-cpochv.

          itab_zycbt036-dtdocto = itab_zycbt084-dtpagto.

          itab_zycbt036-belnr   = itab_zycbt084-belnr.

          append itab_zycbt036.

        endif.

      endif.

* << Fim da inclusão

      loop at itab_zycbt069 where nrseqc   = itab_zycbt006-nrseqc

                              and nrinvoic = itab_zycbt006-nrinvoic

                              and dtvincul = itab_zycbt006-dtvincul

                              and gsberf   = itab_zycbt006-gsberf

                              and nrparcf  = itab_zycbt006-nrparcf.

        itab_zycbt036-tcode   = 'F-30'.

        itab_zycbt036-tabela  = 'ZYCBT006'.

        concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

               into itab_zycbt036-cpochv.

        itab_zycbt036-dtdocto = itab_zycbt005_ant-dtbelnr.

...

 

...

    clear: v_belnr.

    loop at itab_ace.

      itab_zycbt036-tcode   = 'F-30'.

      itab_zycbt036-tabela  = 'ZYCBT006'.

      concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

             into itab_zycbt036-cpochv.

      itab_zycbt036-dtdocto = itab_ace-budat.

      itab_zycbt036-belnr   = itab_ace-belnr.

      append itab_zycbt036.

    endloop.

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

    if sy-subrc ne 0.

      read table itab_zycbt084 with key

                                    nrinvoic = itab_zycbt006-nrinvoic

                                    nrparcf  = itab_zycbt006-nrparcf

                                    gsberf   = itab_zycbt006-gsberf

                                    dtvincul = itab_zycbt006-dtvincul

                                    dtpagto  = itab_zycbt006-dtpagto

                                    dtpagext = itab_zycbt006-dtpagext

                                    tdesmemb = 'E'.

      if sy-subrc = 0.

        itab_zycbt036-tcode   = 'F-30'.

        itab_zycbt036-tabela  = 'ZYCBT006'.

        concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

               into itab_zycbt036-cpochv.

        itab_zycbt036-dtdocto = itab_zycbt084-dtpagto.

        itab_zycbt036-belnr   = itab_zycbt084-belnr.

        append itab_zycbt036.

      endif.

    endif.

* << Fim da inclusão

    loop at itab_zycbt069 where nrseqc   = itab_zycbt006-nrseqc

                            and nrinvoic = itab_zycbt006-nrinvoic

                            and dtvincul = itab_zycbt006-dtvincul

                            and gsberf   = itab_zycbt006-gsberf

                            and nrparcf  = itab_zycbt006-nrparcf.

      itab_zycbt036-tcode   = 'F-30'.

      itab_zycbt036-tabela  = 'ZYCBT006'.

      concatenate itab_zycbt006-nrinvoic itab_zycbt006-nrparcf

             into itab_zycbt036-cpochv.

      itab_zycbt036-dtdocto = itab_zycbt005_ant-dtbelnr.

...