CE PLUS - Nota 006756
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Encerramento de Custo
Data/Hora da Publicação: 13/06/2008 00:00:00
Data/Hora Última Alteração: 22/02/2011 15:44:17
Descrição da Nota: AO FAZER ENCERRAMENTO DE ITENS DE SERVIÇO, RECLAMA DE RECEBIMENTO.
Sintoma
ao fazer o encerramento aparece a mensagem existem NF¿s sem recebimento mas já recebi a Nf global e
já fiz o recebimento da fatura de serviço
Solução
não verificar nf para itens de serviço.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06756 Data: 13/06/2008 Hora: 10:00:12
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06756
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00005
Agrupamento : 00051
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
06711 - 00001 - 7.0 - 00005 - CE DEIXA ENCERRAR, FALTANDO UM DOS RECEBIMENTO POR FAZER.
----------------------------------------------------------------------------------------------------
AO FAZER ENCERRAMENTO DE ITENS DE SERVIÇO, RECLAMA DE RECEBIMENTO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
ENCERRAMENTO - ITENS DE SERVIÇO - RECEBIMENTO - NOTA FISCAL.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI010F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI010F02
...
IF e_subrc EQ 0.
IF itab_zycit042[] IS INITIAL AND /pws/zycie001-modalidade NE '02'.
SELECT * FROM /pws/zycit042
INTO TABLE itab_zycit042 "#EC CI_NOFIRST
WHERE nrseq = /pws/zycie001-nrseq.
IF sy-subrc NE 0.
v_nota = 'X'.
MESSAGE i015 WITH text-072.
ENDIF.
ELSE.
* >> Início da exclusão: FORM ENCERRAMENTO
LOOP AT itab_zycit003.
* << Fim da exclusão
* >> Início da inclusão: FORM ENCERRAMENTO
LOOP AT itab_zycit003 where servico ne 'X'.
* << Fim da inclusão
READ TABLE itab_zycit042 WITH KEY nrseq = itab_zycit003-nrseq
ebeln = itab_zycit003-ebeln
ebelp = itab_zycit003-ebelp.
IF sy-subrc NE 0.
v_nota = 'X'.
EXIT.
ENDIF.
ENDLOOP.
SELECT * FROM /pws/zycit041 INTO TABLE itab_zycit041
WHERE nrseq = itab_zycit042-nrseqnf AND
...