CE PLUS - Nota 001990

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Recebimento

Data/Hora da Publicação: 28/08/2006 00:00:00

Data/Hora Última Alteração: 20/06/2011 13:09:34

Descrição da Nota: O CAMPO LOTE DO RECEBIMENTO ESTÁ FECHADO, MESMO QUANDO É SUJEITO

Sintoma

Não estamos conseguindo realizar o recebimento, devido o campo LOTE estar fechado e não ser possível

mencionar a quantidade no recebimento.

 

 

Solução

Atualizado seleção da tabela de materiais no recebimento, para processos de Lote.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 01990 Data: 28/08/2006 Hora: 14:07:02

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

 

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

Nota Número              : 01990

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00024

Agrupamento              : 00129

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

O CAMPO LOTE DO RECEBIMENTO ESTÁ FECHADO, MESMO QUANDO É SUJEITO

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

Palavras Chave:

LOTE - RECEBIMENTO - SUJEITO A LOTE - PREENCHIMENTO DE CAMPO

CONTABILIZAÇÕES - DADOS DO MATERIAL.

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

Objetos da nota:

REPS /PWS/MZYCI017F02

 

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

Modificações efetuadas em REPS /PWS/MZYCI017F02

 

...

    SELECT ebeln ebelp matnr FROM ekpo

           INTO TABLE itab_matuse_aux3

           WHERE ebeln = v_ebeln

             AND ebelp = v_ebelp.

    IF NOT itab_matuse_aux3[] IS INITIAL.

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

      SELECT matnr mhdhb FROM mara

* << Fim da exclusão

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

      SELECT matnr mhdhb mhdrz xchpf FROM mara

* << Fim da inclusão

             INTO TABLE itab_mara

             FOR ALL ENTRIES IN itab_matuse_aux3

             WHERE matnr EQ itab_matuse_aux3-matnr.

    ENDIF.

    LOOP AT itab_mara WHERE NOT mhdhb IS initial.

      MOVE itab_mara-mhdhb TO v_validade.

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

      move itab_mara-xchpf to v_suj_lote.

* << Fim da inclusão

    ENDLOOP.

  ELSE.

    LOOP AT itab_zycit044 WHERE mark = 'X'.

      MOVE: itab_zycit044-ebeln TO v_ebeln,

            itab_zycit044-ebelp TO v_ebelp.

...

 

...

    SELECT ebeln ebelp matnr FROM ekpo

           INTO TABLE itab_matuse_aux3

           WHERE ebeln = v_ebeln

             AND ebelp = v_ebelp.

    IF NOT itab_matuse_aux3[] IS INITIAL.

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

      SELECT matnr mhdhb mhdrz FROM mara

* << Fim da exclusão

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

      SELECT matnr mhdhb mhdrz xchpf FROM mara

* << Fim da inclusão

             INTO TABLE itab_mara

             FOR ALL ENTRIES IN itab_matuse_aux3

             WHERE matnr EQ itab_matuse_aux3-matnr.

    ENDIF.

   LOOP AT itab_mara WHERE NOT mhdhb IS initial OR NOT mhdrz IS initial.

...