CE PLUS - Nota 002988

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Nota Fiscal

Data/Hora da Publicação: 29/01/2007 00:00:00

Data/Hora Última Alteração: 08/03/2010 16:37:42

Descrição da Nota: AO CRIAR E COLOCAR NÚMERO E SAIR DA NF, NFNUM FICA COM 9999.

Sintoma

 

Ao criar e colocar o número e sair da Nota o NFNUM fica com 9999 e se entrar de novo o NFnum

aparece.

 

Solução

 

atualizar tabelas logo após contabilização de NF.

Versões Tratadas

6.0

Informações Complementares

 

----------------------------------------------------------------------------------------------------

Nota Número 02988 Data: 29/01/2007 Hora: 12:03:51

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 02988

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00150

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

----------------------------------------------------------------------------------------------------

AO CRIAR E COLOCAR NÚMERO E SAIR DA NF, NFNUM FICA COM 9999.

----------------------------------------------------------------------------------------------------

Palavras Chave:

CRIAÇÃO NF - NFNUM - NOTA FISCAL 9999 - ATUALIZAÇÃO NF

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI016F01

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI016F01

 

...

                    WHERE docnum EQ it_zycee005-belnr.

      IF sy-subrc EQ 0 OR it_zycet005-belnr = '9999999999'

                       OR it_zycet005-belnr = '8888888888'.

        /pws/zycie041-docnum      = it_zycee005-belnr.

        IF it_zycet005-belnr = '9999999999'.

          /pws/zycie041-docnum      = it_zycet005-belnr.

        ENDIF.

        IF it_zycet005-belnr = '8888888888'.

          /pws/zycie041-docnum      = it_zycet005-belnr.

        ENDIF.

* >> Início da exclusão: FORM ATUALIZA_DADOS_NOTA

        /pws/zycie041-nfnum       = itab_zycit042-nfnum.

        /pws/zycie041-series      = itab_zycit042-series.

        /pws/zycie041-subser      = itab_zycit042-subser.

* << Fim da exclusão

* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA

        itab_zycit042-nfnum = /pws/zycie041-nfnum  = j_1bnfdoc-nfnum.

        itab_zycit042-series = /pws/zycie041-series = j_1bnfdoc-series.

        itab_zycit042-subser = /pws/zycie041-subser = j_1bnfdoc-subser.

* << Fim da inclusão

        /pws/zycie041-cancel      = ' '.

        CLEAR: /pws/zycie041-belnr_mr1m,

               /pws/zycie041-mblnr_mb01,

               /pws/zycie041-belnr_f_51,

               /pws/zycie041-belnr_f_02,

               /pws/zycie041-statusp_mr1m,

               /pws/zycie041-statusp_mb01,

               /pws/zycie041-statusp_f_51,

               /pws/zycie041-statusp_f_02,

               /pws/zycie041-dt_mr1m,

...

 

...

        IF NOT /pws/zycie041-docnum = '9999999999'

        AND NOT /pws/zycie041-docnum = '8888888888'.

          DELETE  FROM /pws/zycit041

             WHERE nrseq = /pws/zycie041-nrseq AND

              nfglobal = /pws/zycie041-nfglobal AND

                   ( docnum = '9999999999' OR

                  docnum = '8888888888' ).

        ENDIF.

        MODIFY itab_zycit042

             TRANSPORTING docnum mark

* >> Início da inclusão: FORM ATUALIZA_DADOS_NOTA

              nfnum series subser

* << Fim da inclusão

             WHERE nrseq    = itab_zycit042-nrseq

              AND nfglobal = itab_zycit042-nfglobal

               AND ebeln    = itab_zycit042-ebeln

               AND ebelp    = itab_zycit042-ebelp

               AND tpnf     = itab_zycit042-tpnf

               AND lifnr    EQ itab_zycit042-lifnr

         AND j_1bbranch EQ itab_zycit042-j_1bbranch

              AND ( docnum   IS initial OR

                    docnum   = '9999999999' OR

                    docnum = '8888888888' )

...