Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 14/12/2010 00:00:00
Data/Hora Última Alteração: 22/03/2011 11:12:56
Descrição da Nota: FATURA FRETE/SEGURO PERMITE CONTABILIZAR COM ITENS NÃO FATURADOS.
Sintoma
Fatura Frete/Seguro permite contabilizar com itens não faturados.
Solução
Atualizado programa para corrigir a mensagem e acrescentar fatura de seguro na verificação.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10827 Data: 14/12/2010 Hora: 13:31:07
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10827
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00005
Agrupamento : 00052
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
09502 - 00001 - 8.0 - 00002 - NÃO PERMITIR CRIAR FATURA FRETE SEM O PEDIDO ESTAR TOTALMENTE FAT
----------------------------------------------------------------------------------------------------
FATURA FRETE/SEGURO PERMITE CONTABILIZAR COM ITENS NÃO FATURADOS.
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - FRETE - SEGURO - RATEIO - ITENS NÃO FATURADOS.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
* >> Início da exclusão: FORM SALVAR_DADOS
IF /pws/zycie006-tpfatura EQ '02'.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVAR_DADOS
IF /pws/zycie006-tpfatura EQ '02' or
/pws/zycie006-tpfatura EQ '03' .
* << Fim da inclusão
LOOP AT itab_zycit003.
v_trunc = itab_zycit003-qtd_iten * 10000 .
v_trunc = trunc( v_trunc ) .
v_qtd_iten = v_trunc / 10000.
IF itab_zycit003-invoiced NE v_qtd_iten AND
itab_zycit003-servico NE 'X'.
* >> Início da exclusão: FORM SALVAR_DADOS
MESSAGE e061 WITH text-190 itab_zycit003-ebeln
itab_zycit003-ebelp text-191.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVAR_DADOS
MESSAGE e061 WITH text-192 itab_zycit003-ebeln
itab_zycit003-ebelp text-193.
* << Fim da inclusão
ENDIF.
ENDLOOP.
ENDIF.
CLEAR v_stop.
...