CE PLUS - Nota 003398
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 05/04/2007 00:00:00
Data/Hora Última Alteração: 10/03/2010 14:40:18
Descrição da Nota: VINCULAÇÃO - ESTÁ SENDO PERMITIDO VINCULAR FATURAS C/ DATA MENOR QUE CAP
Sintoma
O programa de vinculação está permitindo vincular faturas de exportação com data menor que a data da
captação ou de crédito.
Solução
O programa foi ajustado e não está permitindo a vinculação de faturas que possuam data menor que a
data de captação ou de crédito.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03398 Data: 05/04/2007 Hora: 07:19:54
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03398
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00160
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
VINCULAÇÃO - ESTÁ SENDO PERMITIDO VINCULAR FATURAS C/ DATA MENOR QUE CAP
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO FATURAS EXPORTAÇÃO ACE DATA CAPTAÇÃO CRÉDITO MENOR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB009F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F03
...
ENDIF.
ENDIF.
ENDIF.
CASE /pws/zycbe001-fdtlanc.
WHEN 'D'.
IF /pws/zycbe001-tpcontr+0(1) CA 'CE'.
IF /pws/zycbe005-dtvincul NE /pws/zycbe001-dtdesem.
MESSAGE i091 WITH /pws/zycbe001-dtdesem.
EXIT.
ENDIF.
* >> Início da exclusão: FORM GRAVA_TABELAS
ELSE.
* << Fim da exclusão
* >> Início da inclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da inclusão
IF /pws/zycbe005-dtvincul LT /pws/zycbe001-dtdesem.
MESSAGE i011(pc) WITH text-050.
EXIT.
* >> Início da exclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da exclusão
ENDIF.
WHEN 'O'.
IF /pws/zycbe001-tpcontr+0(1) CA 'CE'.
PERFORM date_consistency.
IF v_exit EQ 'S'.
v_exit = 'N'.
EXIT.
* >> Início da inclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da inclusão
ENDIF.
* >> Início da exclusão: FORM GRAVA_TABELAS
ELSE.
* << Fim da exclusão
IF /pws/zycbe005-dtvincul LT /pws/zycbe001-dtcontr.
MESSAGE i011(pc) WITH text-051.
EXIT.
ENDIF.
* >> Início da exclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da exclusão
WHEN 'C'.
IF /pws/zycbe001-tpcontr+0(1) CA 'CE'.
PERFORM date_consistency.
IF v_exit EQ 'S'.
v_exit = 'N'.
EXIT.
* >> Início da inclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da inclusão
ENDIF.
* >> Início da exclusão: FORM GRAVA_TABELAS
ELSE.
* << Fim da exclusão
IF /pws/zycbe005-dtvincul LT /pws/zycbe001-dtcred.
MESSAGE i011(pc) WITH text-052.
EXIT.
* >> Início da exclusão: FORM GRAVA_TABELAS
ENDIF.
* << Fim da exclusão
ENDIF.
ENDCASE.
IF NOT /pws/zycbe005-ftxt IS INITIAL.
IF /pws/zycbe005-txtinf IS INITIAL.
...