CE PLUS - Nota 007282

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Embarque

Data/Hora da Publicação: 09/09/2008 00:00:00

Data/Hora Última Alteração: 22/02/2011 15:23:08

Descrição da Nota: AO ELIMINAR A DI DE GRANEL, NÃO HABILITA QTDE DESEMBARCADA NO EMBARQUE.

Sintoma

Ao eliminar a DI de Granel, não habilita qtde desembarcada no embarque.

 

 

Solução

Verificar se há  DI vinculada ao retornar ao Embarque.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

NA CRIAÇÃO DA NF, NÃO TRAZ O VALOR DO PESO BRUTO VINDO DA DI.

Informações Complementares

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

Nota Número 07282 Data: 09/09/2008 Hora: 10:43:46

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

 

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

Nota Número              : 07282

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00006

Agrupamento              : 00064

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

Referência às notas relacionadas:

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

 

04091  - 00001 - 7.0    - 00002  - NA CRIAÇÃO DA NF, NÃO TRAZ O VALOR DO PESO BRUTO VINDO DA DI.

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

AO ELIMINAR A DI DE GRANEL, NÃO HABILITA QTDE DESEMBARCADA NO EMBARQUE.

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

Palavras Chave:

DI - GRANEL - QUANTIDADE DESEMBARCADA.

 

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

Objetos da nota:

REPS /PWS/MZYCI001F03

 

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

Modificações efetuadas em REPS /PWS/MZYCI001F03

 

...

 

FORM eliminar_fatura.

  IF  itab_zycit100[] IS INITIAL.

    SELECT * FROM /pws/zycit100                         "#EC CI_NOFIRST

    INTO TABLE itab_zycit100

     WHERE nrseq EQ /pws/zycie001-nrseq.

    IF sy-subrc EQ 0.

      v_di = 'S'.

    ELSE.

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

      IF /pws/zycie001-regime EQ '04' AND

         /pws/zycie001-tpdecl EQ 'DI' .

* << Fim da exclusão

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

      IF ( /pws/zycie001-regime EQ '04' AND

         /pws/zycie001-tpdecl EQ 'DI' ) .

* << Fim da inclusão

        SELECT * FROM /pws/zycit443                     "#EC CI_NOFIRST

        INTO TABLE itab_zycit443

      WHERE nrseq EQ /pws/zycie001-nrseq.

        IF sy-subrc EQ 0.

          v_di = 'S'.

        ELSE.

          CLEAR v_di.

        ENDIF.

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

      ELSE.

        CLEAR v_di.

* << Fim da inclusão

      ENDIF.

    ENDIF.

  ENDIF.

 

...