CE PLUS - Nota 005840

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Recebimento

Data/Hora da Publicação: 07/02/2008 00:00:00

Data/Hora Última Alteração: 23/02/2011 09:55:37

Descrição da Nota: NÃO ATUALIZA DADOS DO LOTE CORRETAMENTE

Sintoma

não atualiza dados do lote corretamente

 

 

Solução

Atualizado recebimento para determinar corretamente índice do campo depósito.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

AO SELECIOANR O ITEM E CLICAR PARA CRIAR O RECEBIMENTO, APARECE A MENSAG

Informações Complementares

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

Nota Número 05840 Data: 07/02/2008 Hora: 10:07:05

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

 

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

Nota Número              : 05840

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00004

Agrupamento              : 00033

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

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

01598  - 00001 - 6.0    - 00023  - AO SELECIOANR O ITEM E CLICAR PARA CRIAR O RECEBIMENTO, APARECE A

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

NÃO ATUALIZA DADOS DO LOTE CORRETAMENTE

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

Palavras Chave:

RECEBIMENTO - DADOS - LOTE - STORAGE

 

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

Objetos da nota:

REPS /PWS/MZYCI017F01

 

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

Modificações efetuadas em REPS /PWS/MZYCI017F01

 

...

        READ TABLE itab_zycit042 WITH KEY ebeln = itab_deposito-ebeln

                                          ebelp = itab_deposito-ebelp.

        IF sy-subrc = 0.

          v_tabix = sy-tabix.

          IF itab_zycit042-lgort IS INITIAL AND

             NOT itab_deposito-lgort IS INITIAL.

            MOVE itab_deposito-lgort TO itab_zycit042-lgort.

            MODIFY itab_zycit042 INDEX v_tabix.

          ELSE.

            MOVE itab_zycit042-lgort TO itab_deposito-lgort.

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

            MODIFY itab_deposito INDEX sy-tabix.

* << Fim da exclusão

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

             modify itab_deposito transporting lgort

               where ebeln eq itab_deposito-ebeln

               and   ebelp eq itab_deposito-ebelp

               and   matnr eq itab_deposito-matnr.

* << Fim da inclusão

          ENDIF.

        ENDIF.

      ENDIF.

    ENDLOOP.

    DATA: v_nrseq LIKE /pws/zycit041-nrseq.

    READ TABLE itab_zycit042 INDEX 1.

    CLEAR v_nrseq.

    v_nrseq = itab_zycit042-nrseq.

    SET PARAMETER ID '/PWS/ZYCIP001' FIELD v_nrseq.

    SUBMIT /pws/zycir006 AND RETURN.                     "#EC CI_SUBMIT

...