Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 10/11/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:46:29
Descrição da Nota: FATURA NÃO ESTA CONTABILIZANDO APOS NF
Sintoma
Estou tentando criar uma fatura de seguros após a criação da NF e antes do recebimento, mas aparece
a mensagem de erro : "Existe NF para o processo, fatura nao será contabi." e não gera o doc.
contábil.
Solução
atualizado o programa para so quando for fatura do tipo 01 não deixar contabilizar
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02421 Data: 10/11/2006 Hora: 15:50:15
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02421
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00139
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02376 - 00001 - 6.0 - 00025 - SISTEMA ESTÁ PERMITINDO ALTERAÇÃO DE FATURA, DEPOIS DA EMISSÃO DA
----------------------------------------------------------------------------------------------------
FATURA NÃO ESTA CONTABILIZANDO APOS NF
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURA - APOS NF - NÃO CONTABILIZA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
REPS /PWS/MZYCI003O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
AND ebelp EQ itab_zycit003-ebelp
AND docnum NE ''.
ENDSELECT.
* >> Início da exclusão: FORM ROTINA_DE_CONTABILIZACAO
IF sy-subrc NE 0 or /pws/zycie006-tpfatura eq '04'.
* << Fim da exclusão
* >> Início da inclusão: FORM ROTINA_DE_CONTABILIZACAO
IF sy-subrc NE 0 or /pws/zycie006-tpfatura ne '01'.
* << Fim da inclusão
PERFORM contabilizacao_f-02_ou_f-43.
ELSE.
MESSAGE i015 WITH text-169.
ENDIF.
ELSE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003O01
...
IF screen-name EQ 'BOT1'.
screen-input = 1.
ENDIF.
MODIFY SCREEN.
ENDIF.
* >> Início da exclusão: MODULE SET_SCREEN
IF screen-name EQ '/PWS/ZYCIE006-VLMERC' OR
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN
IF ( screen-name EQ '/PWS/ZYCIE006-VLMERC' OR
* << Fim da inclusão
screen-name EQ '/PWS/ZYCIE003-VLREAL' OR
* >> Início da exclusão: MODULE SET_SCREEN
screen-name EQ '/PWS/ZYCIE036-VLDIF'.
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN
screen-name EQ '/PWS/ZYCIE036-VLDIF' ) and
/PWS/ZYCIE006-TPFATURA eq '01'.
* << Fim da inclusão
SELECT *
FROM /pws/zycit042
FOR ALL ENTRIES IN itab_zycit003
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
...
...
MODIFY SCREEN.
ELSEIF v_status_s = 1 AND screen-group1 NE 'OUT'.
screen-input = '1' .
MODIFY SCREEN.
ENDIF.
* >> Início da exclusão: MODULE SET_SCREEN
IF screen-name = '/PWS/ZYCIE006-RATVAL' or
screen-name = 'V_RATVAL'.
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN
IF ( screen-name = '/PWS/ZYCIE006-RATVAL' or
screen-name = 'V_RATVAL' ) and /PWS/ZYCIE006-TPFATURA = '01'.
* << Fim da inclusão
SELECT *
FROM /pws/zycit042
FOR ALL ENTRIES IN itab_zycit003
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
...
...
screen-input = 1.
ELSE.
screen-input = 0.
ENDIF.
ENDIF.
* >> Início da exclusão: MODULE SET_SCREEN_TC_0106
IF screen-name = '/PWS/ZYCIE003-VLREAL' OR
screen-name = '/PWS/ZYCIE036-VLDIF'.
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN_TC_0106
IF ( screen-name = '/PWS/ZYCIE003-VLREAL' OR
screen-name = '/PWS/ZYCIE036-VLDIF' ) and
/PWS/ZYCIE006-TPFATURA eq '01'.
* << Fim da inclusão
SELECT *
FROM /pws/zycit042
FOR ALL ENTRIES IN itab_zycit003
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
...
...
screen-input = 0.
ELSEIF /pws/zycie006-rateio = 'N' AND v_status_s = '1'.
screen-input = 1.
ENDIF.
ENDIF.
* >> Início da exclusão: MODULE SET_SCREEN_0400
IF screen-name = '/PWS/ZYCIE003-VLREAL' OR
screen-name = '/PWS/ZYCIE036-VLDIF'.
* << Fim da exclusão
* >> Início da inclusão: MODULE SET_SCREEN_0400
IF ( screen-name = '/PWS/ZYCIE003-VLREAL' OR
screen-name = '/PWS/ZYCIE036-VLDIF' ) and
/PWS/ZYCIE006-TPFATURA eq '01'.
* << Fim da inclusão
SELECT *
FROM /pws/zycit042
FOR ALL ENTRIES IN itab_zycit003
WHERE nrseq EQ itab_zycit003-nrseq
AND ebeln EQ itab_zycit003-ebeln
...