CE PLUS - Nota 002689
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 13/12/2006 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:04:49
Descrição da Nota: FATURA COMERCIAL NÃO É GERADA
Sintoma
Estou tentando criar uma Fatura Comercial e está aparecendo a mensagem: "Lançamentos automaticos
incorretos serão anulados." e não gera os doc. 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. O peso não estava
como obrigatório e não aparecia a tela com o numero do documento do Câmbio na fatura livre de
débito, assim como aparece nas outras.
Solução
atualizado o programa para não salvar com o peso em branco
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02689 Data: 13/12/2006 Hora: 16:28:23
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02689
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00144
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00731 - 00001 - 6.0 - 00022 - PREENCHER O FABRICANTE DE ACORDO COM O INFORMADO NO PEDIDO DE COM
----------------------------------------------------------------------------------------------------
FATURA COMERCIAL NÃO É GERADA
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - MISTURADA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
CHANGING v_tot_fat2.
IF /pws/zycie006-tpfatura = '11'.
PERFORM trata_fabricante.
LOOP AT itab_zycit003 WHERE servico NE 'X'.
ENDLOOP.
IF sy-subrc EQ 0.
MESSAGE i013 WITH text-130.
v_stop = 'X'.
ENDIF.
ELSEIF /pws/zycie006-tpfatura = '01'.
* >> Início da inclusão: FORM SALVAR_DADOS
IF /pws/zycie006-ntgew IS INITIAL.
v_stop = 'X'.
EXIT.
ENDIF.
* << Fim da inclusão
PERFORM trata_fabricante.
LOOP AT itab_zycit003 WHERE servico EQ 'X'.
ENDLOOP.
IF sy-subrc EQ 0.
MESSAGE i001 WITH text-129.
v_stop = 'X'.
ENDIF.
ENDIF.
IF v_prof = 'X' AND /pws/zycit001-dt_recorigem IS INITIAL.
MESSAGE i015 WITH text-124.
...
...
ENDWHILE.
MOVE /pws/zycbt119-nrseq TO /pws/zycie006-nrseq_pgfat.
MODIFY /pws/zycit006 FROM /pws/zycie006.
APPEND /pws/zycie006 TO itab_zycit006.
IF ( /pws/zycie006-frpagto EQ 'N' OR /pws/zycie006-frpagto EQ 'P'
AND NOT v_di IS INITIAL ) AND
/pws/zycie006-waers NE /pws/zycbt007-waersb.
MESSAGE i061 WITH text-008 /pws/zycbt119-nrfat
text-009 /pws/zycbt119-nrseq.
ELSE.
* >> Início da inclusão: FORM GRAVAR_CAMBIO
IF NOT /pws/zycie006-nrseq_pgfat IS INITIAL.
MESSAGE i061 WITH text-008 /pws/zycbt119-nrfat
text-009 /pws/zycbt119-nrseq.
ENDIF.
* << Fim da inclusão
/pws/zycbt119-status = 'E'.
MODIFY /pws/zycbt119.
ENDIF.
ELSE.
IF /pws/zycie006-frpagto NE 'N' .
/pws/zycbt119-status = 'E'.
ENDIF.
IF ( /pws/zycie006-frpagto EQ 'P' AND NOT v_di IS INITIAL )
AND NOT /pws/zycie006-belnr_p IS INITIAL AND
/pws/zycie006-eliminado NE 'X'.
...