CE PLUS - Nota 006534

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Nota Fiscal Remessa

Data/Hora da Publicação: 08/05/2008 00:00:00

Data/Hora Última Alteração: 09/03/2010 13:30:55

Descrição da Nota: NOTA FISCAL DE REMESSA ESTÁ SE COM SALDO ERRADO PARA ALGUNS ITENS

Sintoma

 

Alguns itens estão ficando com saldo incorreto para a criação da nota fiscal de remessa.

 

Solução

 

Substituir o index na modificação da tabela auxiliar por uma chave.

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 06534 Data: 08/05/2008 Hora: 11:11:01

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

 

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

Nota Número              : 06534

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00005

Agrupamento              : 00046

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

NOTA FISCAL DE REMESSA ESTÁ SE COM SALDO ERRADO PARA ALGUNS ITENS

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

Palavras Chave:

SALDO - ITEM - NOTA - FISCAL - REMESSA

/PWS/SAPMZYCI016

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

Objetos da nota:

REPS /PWS/MZYCI016I01

 

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

Modificações efetuadas em REPS /PWS/MZYCI016I01

 

...

      MESSAGE w061 WITH text-018 itab_zycit044-ebelp

                        text-019 itab_zycit044-ebeln.

    ELSE.

      MESSAGE w061 WITH text-004 itab_zycit044-ebelp

                        text-005 itab_zycit044-ebeln.

    ENDIF.

  ENDIF.

  CLEAR itab_zycit044_aux.

  MODIFY itab_zycit044 INDEX tc_itens_nfr-current_line.

  MOVE itab_zycit044 TO itab_zycit044_aux.

* >> Início da exclusão: MODULE ALTERA_ITAB_ZYCIT044

  MODIFY itab_zycit044_aux INDEX tc_itens_nfr-current_line.

* << Fim da exclusão

* >> Início da inclusão: MODULE ALTERA_ITAB_ZYCIT044

  MODIFY itab_zycit044_aux TRANSPORTING nfnum series subser

                                        saldo menge  qtd_item

                  WHERE ebeln EQ itab_zycit044-ebeln

                    AND ebelp EQ itab_zycit044-ebelp.

* << Fim da inclusão

  IF /pws/zycie043-nfexterna = space.

    itab_zycit044-nfnum  = space.

    itab_zycit044-series = space.

    itab_zycit044-subser = space.

  ELSE.

    itab_zycit044-nfnum  = /pws/zycie044-nfnum.

    itab_zycit044-series = /pws/zycie044-series.

    itab_zycit044-subser = /pws/zycie044-subser.

  ENDIF.

  IF sy-subrc NE 0.

...