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).
8.0
Produto:
Nota
Descrição
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.
...