Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 29/09/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 15:17:01
Descrição da Nota: LIQUIDAÇÃO DP - CAMPO DATA DE VENCIMENTO
Sintoma
Ao efetuar a vinculação de contratos (quando parametrizado para baixa razão especial contra
faturamento de clientes), ao efetuar o desmembramento do contrato não está sendo passado o campo
data de vencimento e ao efetuar a liquidação (clearing), o programa está passando para a busca de
documentos contábeis a data da vinculação ao invés da data de liquidação.
Solução
A função foi ajustada para passar o campo data de vencimento ao efetuar o desmembramento do contrato
e o programa de vinculação foi ajustado para passar a data de liquidação ao efetuar a busca de
documentos ao gerar a liquidação (clearing).
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02176 Data: 29/09/2006 Hora: 07:31:45
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02176
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
----------------------------------------------------------------------------------------------------
LIQUIDAÇÃO DP - CAMPO DATA DE VENCIMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO DP DATA VENCIMENTO DESMEMBRAMENTO CONTRATO
BAIXA CLIENTE
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCB_TRANSACAO_F_30_P
REPS /PWS/MZYCB009F08
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_P
...
IF c_zuonr NE v_zuonr.
IF NOT c_zuonr IS INITIAL.
PERFORM bdc_field USING 'BSEG-ZUONR' c_zuonr.
ENDIF.
ENDIF.
* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_F_30_P
READ TABLE itab_oculto
WITH KEY campo = 'BSEG-ZFBDT' chave = v_lanc1
TRANSPORTING NO FIELDS.
IF sy-subrc <> 0.
PERFORM bdc_field
USING: 'BSEG-ZFBDT' v_zfbdt.
ENDIF.
* << Fim da inclusão
IF NOT v_tela2 = '0304'.
IF v_vinc_tot IS INITIAL.
IF NOT V_ZFBDT2 EQ '00.00.0000'.
PERFORM bdc_field USING 'BSEG-ZFBDT' v_zfbdt2.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F08
...
CLEAR itab_partidas-d_zuonr.
ELSEIF itab_zycbt030-belnr_d EQ itab_zycbt030-belnr_t.
itab_partidas-dtdocto = itab_zycbt030-budat_t.
CLEAR itab_partidas-d_zuonr.
ELSE.
* >> Início da exclusão: FORM BAIXA_CLIENTE_ACE
itab_partidas-dtdocto = itab_zycbt005-dtvincul.
* << Fim da exclusão
* >> Início da inclusão: FORM BAIXA_CLIENTE_ACE
itab_partidas-dtdocto = /pws/zycbe006-dtpagto.
* << Fim da inclusão
CONCATENATE text-375
itab_zycbt005-nrinvoic
INTO itab_partidas-d_zuonr
SEPARATED BY space.
itab_partidas-v_sinal = '-'.
...