Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 24/05/2011 00:00:00
Data/Hora Última Alteração: 24/05/2011 09:45:50
Descrição da Nota: VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE
Sintoma
O sistema utilizava a data de lançamento incorreta para verificar se o documento do cliente
estava em aberto
Solução
Foi efetuada uma correção para que o sistema utilize a Data de Lançamento corretamente
de acordo com os documentos contábeis gravados na tabela de faturas
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11174 Data: 24/05/2011 Hora: 09:37:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11174
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00072
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote Descrição Breve
07760 - 00001 - 7.0 - 00007 - DA-LIQUIDAÇÃO E VINCULAÇÃO LIQ. AUTOMÁT - NORMAL/ARBITRAGEM/PERFOR
09751 - 00002 - 8.0 - 00002 - VINC DP AUTOMÁTICA-MSG DOC. COMPEN/NÃO AUTOM ERRO BI-ERRO /PWS/ZYG
----------------------------------------------------------------------------------------------------
Texto Rápido:
VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - LIQUIDAÇÃO - BAIXA DO CLIENTE -
DATA DE LANÇAMENTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F03
REPS /PWS/MZYCB009F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F03
...
<fs_belnr>
<fs_budat>
'S'.
endif.
read table itab_zycbt030 with key nrinvoic = p_vinculacao-nrinvoic
nrparcf = p_vinculacao-nrparcf
gsberf = p_vinculacao-gsberf.
if itab_zycbt030-vlsltrans > 0.
if not <fs_zycbt030>-budat_t is initial
and <fs_zycbt030>-budat_t > <fs_zycbt030>-budat
* >> Início da exclusão: FORM DOCUMENTO_FATURA
and <fs_zycbt030>-belnr ne <fs_zycbt030>-belnr6.
* << Fim da exclusão
* >> Início da inclusão: FORM DOCUMENTO_FATURA
and <fs_zycbt030>-belnr ne <fs_zycbt030>-belnr6
and not <fs_zycbt030>-belnr6 is initial.
* << Fim da inclusão
assign <fs_zycbt030>-budat_t to <fs_budat>.
else.
assign <fs_zycbt030>-budat to <fs_budat>.
endif.
if <fs_zycbt030>-belnr6 is initial.
assign <fs_zycbt030>-belnr to <fs_belnr>.
* >> Início da inclusão: FORM DOCUMENTO_FATURA
assign itab_zycbt030-dtbelnr to <fs_budat>.
* << Fim da inclusão
else.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F04
...
<fs_belnr>
<fs_budat>
'S'.
ENDIF.
READ TABLE itab_zycbt030 WITH KEY nrinvoic = p_fatura-nrinvoic
nrparcf = p_fatura-nrparcf
gsberf = p_fatura-gsberf.
IF itab_zycbt030-vlsltrans > 0.
IF NOT <fs_zycbt030>-budat_t IS INITIAL
AND <fs_zycbt030>-budat_t > <fs_zycbt030>-budat
* >> Início da exclusão: FORM DOCUMENTO_FATURA
AND <fs_zycbt030>-belnr NE <fs_zycbt030>-belnr6.
* << Fim da exclusão
* >> Início da inclusão: FORM DOCUMENTO_FATURA
AND <fs_zycbt030>-belnr NE <fs_zycbt030>-belnr6
and not <fs_zycbt030>-belnr6 is initial.
* << Fim da inclusão
ASSIGN <fs_zycbt030>-budat_t TO <fs_budat>.
ELSE.
ASSIGN <fs_zycbt030>-budat TO <fs_budat>.
ENDIF.
IF <fs_zycbt030>-belnr6 IS INITIAL.
ASSIGN <fs_zycbt030>-belnr TO <fs_belnr>.
* >> Início da inclusão: FORM DOCUMENTO_FATURA
ASSIGN itab_zycbt030-dtbelnr TO <fs_budat>.
* << Fim da inclusão
ELSE.
...