Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 22/12/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 12:47:08
Descrição da Nota: FATURA MSG DE PESO LIQUIDO
Sintoma
Ao criar uma Fatura Comercial aparece a mensagem: "Lançamentos automaticos
incorretos serão anulados." e não gera os documentos de câmbio e contábil, deixando em branco os
campos e se crio outra fatura em outro embarque, é misturada a fatura a outro embarque. Ao salvar
uma fatura livre de débito sem o peso, o sistema permite que salva. E não aparece a mensagem com o
número do documento do Câmbio, assim como aparece para as outras faturas.
Solução
Atualizado o programa para não fazer essa verificação
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02750 Data: 22/12/2006 Hora: 16:52:06
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02750
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00145
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
FATURA MSG DE PESO LIQUIDO
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - MSG - PESO LIQUIDO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
ENDLOOP.
ELSEIF /pws/zycie006-rateio = 'N' AND NOT /pws/zycie006-ntgew IS
INITIAL.
CLEAR v_tot_frete.
LOOP AT itab_zycit003.
v_tot_ntgew = v_tot_ntgew + itab_zycit003-ntgew.
ENDLOOP.
IF v_tot_ntgew NE /pws/zycie006-ntgew.
MESSAGE w015 WITH text-071.
ENDIF.
* >> Início da exclusão: FORM CALCULA_PESO
ELSEIF /pws/zycie006-rateio IS INITIAL AND /pws/zycit001-meioemba
NE 'PS'.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_PESO
ELSEIF /pws/zycie006-rateio IS INITIAL.
* << Fim da inclusão
LOOP AT SCREEN.
IF screen-name = '/PWS/ZYCIE006-RATEIO'.
IF screen-input = 0.
screen-required = 0.
MODIFY SCREEN.
ELSE.
MESSAGE e015 WITH text-057.
ENDIF.
ENDIF.
ENDLOOP.
* >> Início da exclusão: FORM CALCULA_PESO
ELSEIF /pws/zycie006-ntgew IS INITIAL AND /pws/zycit001-meioemba NE
'PS'.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_PESO
ELSEIF /pws/zycie006-ntgew IS INITIAL.
* << Fim da inclusão
MESSAGE w015 WITH text-072.
ENDIF.
ENDIF.
IF NOT /pws/zycie006-ntgew IS INITIAL AND
NOT /pws/zycie006-vlmerc IS INITIAL.
IF /pws/zycie006-ratfre = 'S' .
DESCRIBE TABLE itab_zycit003 LINES v_line.
IF NOT /pws/zycie006-vlfre IS INITIAL.
v_vlreal = /pws/zycie006-vlfre.
PERFORM retorna_decimais USING /pws/zycie006-waers
...