CE PLUS - Nota 002816
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 04/01/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 15:47:58
Descrição da Nota: FATURA AJUSTE LIVRE, ERRO NO TOTAL QND AJUSTE LIVRE
Sintoma
Fatura - Ajuste Livre - Quando define-se a forma da fatura Ajuste Livre para um processo de incoterm
DES (mas ocorre para CFR também, por exemplo), em que deve-se informar o valor de frete e seguro, o
sistema só fecha o valor da fatura quando informa-se no campo Realizado Mercadoria o valor total da
fatura dividio pela quantidade, não considerando a soma do Realizado Frete e Realizado Seguro. Ver
anexo.
Solução
Atualizado o programa para somar o fete e o seguro
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02816 Data: 04/01/2007 Hora: 16:52:45
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02816
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00146
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01559 - 00001 - 6.0 - 00023 - NOTA FISCAL NÃO ESTÁ ATUALIZANDO VALOR DO CUSTO EFETIVO.
----------------------------------------------------------------------------------------------------
FATURA AJUSTE LIVRE, ERRO NO TOTAL QND AJUSTE LIVRE
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - LIVRE DE DEBITO - TOTAL
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
ENDIF.
IF /pws/zycie006-ratval EQ '4'.
CLEAR v_total.
LOOP AT itab_zycit003 WHERE livre = 'S'.
IF ( t001-land1 = 'AR' OR t001-land1 = 'CL' )
AND /pws/zycit031-inco1_ci = 'FOB'.
v_total = ( itab_zycit003-vlreal * itab_zycit003-toinv )
- itab_zycit003-vlfre_fat + v_total.
ELSE.
v_total = ( itab_zycit003-vlreal * itab_zycit003-toinv )
* >> Início da exclusão: FORM CHECK_TOTAL
+ v_total.
* << Fim da exclusão
* >> Início da inclusão: FORM CHECK_TOTAL
+ v_total
+ itab_zycit003-vlfre_fat + itab_zycit003-vlseg_fat.
* << Fim da inclusão
ENDIF.
ENDLOOP.
ENDIF.
IF v_vlreal NE v_total AND
( /pws/zycie006-tpfatura EQ '01' OR /pws/zycie006-tpfatura EQ '11' )
AND /pws/zycie006-eliminado NE 'X'
AND /pws/zycie006-ratval NE '3'.
v_ttotal = v_total - v_vlreal.
PERFORM trata_decimais USING /pws/zycie006-waers
CHANGING v_ttotal.
...