CE PLUS - Nota 002421

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

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

SISTEMA ESTÁ PERMITINDO ALTERAÇÃO DE FATURA, DEPOIS DA EMISSÃO DA NF

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

...