Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 09/08/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:49:17
Descrição da Nota: EM UM EMBARQUE DE MATERIAL + SERVIÇO, ONDE TEMOS 04 ITENS.
Sintoma
Em um embarque de Material + Serviço, onde temos 04 itens. * Item 1 - Fatura Livre de Débito. *
Itens 2 e 3 Fatura ``Normal``. * Item 4 Fatura de Serviço . Quando vamos contabilizar a Fatura de
Mercadoria ``Normal`` o sistema indica a mensagem de que ``Fatura já Recebida, não pode ser
contabilizada``.
Solução
Ajustado para não considerar o recebimento do serviço para a mercadoria.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01899 Data: 09/08/2006 Hora: 09:37:01
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01899
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00126
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
EM UM EMBARQUE DE MATERIAL + SERVIÇO, ONDE TEMOS 04 ITENS.
----------------------------------------------------------------------------------------------------
Palavras Chave:
EMBARQUE - MATERIAL - SERVIÇO - ITENS - FATURA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
ENDFORM.
FORM rotina_de_contabilizacao.
DATA v_par.
CLEAR v_congela.
IF /pws/zycie006-tpfatura = '01' OR /pws/zycie006-tpfatura = '11'.
* >> Início da exclusão: FORM ROTINA_DE_CONTABILIZACAO
READ TABLE itab_zycit003 INDEX 1.
IF sy-subrc EQ 0.
SELECT SINGLE congelamov FROM /pws/zycit036 INTO v_congela
WHERE nrseq = itab_zycit003-nrseq AND
congelamov = 'X'.
* << Fim da exclusão
* >> Início da inclusão: FORM ROTINA_DE_CONTABILIZACAO
data: itab_zycit036_rec like /pws/zycit036 occurs 0 with header line.
select * from /pws/zycit036
into table itab_zycit036_rec
for all entries in itab_zycit003
where nrseq eq itab_zycit003-nrseq
and ebeln eq itab_zycit003-ebeln
and ebelp eq itab_zycit003-ebelp
and congelamov eq 'X'.
if sy-subrc = 0.
move 'X' to v_congela.
* << Fim da inclusão
ENDIF.
ENDIF.
IF /pws/zycie006-tpfatura EQ '02' OR
/pws/zycie006-tpfatura EQ '03' OR
/pws/zycie006-tpfatura EQ '04'.
...