Sintoma

Ao salvar a DI o valor da mercadoria na pasta 2 da DI é alterada.

Solução

Atualização do programa da DI para utilizar a quantidade desembarcada quando esta estiver

preenchida.

Informações Complementares

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

Nota Número 07225 Data: 29/08/2008 Hora: 16:46:41

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

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

Nota Número              : 07225

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00006

Agrupamento              : 00062

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

VALOR DA TOTAL DA MERCADORIA MUDA APÓS SALVAR A DI

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

Palavras Chave:

VALOR - DI - TOTAL - ALTERA - GRANEL - MERCADORIA - CFR

/PWS/SAPMZYCI023

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

Objetos da nota:

REPS /PWS/MZYCI023F01

REPS /PWS/MZYCI023F03

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

Modificações efetuadas em REPS /PWS/MZYCI023F01

...

          itab_zycit013-uebto  TO itab_zycit003-uebto,

          itab_zycit013-uebtk  TO itab_zycit003-uebtk,

          'X'                  TO itab_zycit003-noinitial.

    CLEAR itab_it.

    READ TABLE itab_it WITH KEY

                      nrseq   = itab_zycit003-nrseq

                      ebeln   = itab_zycit003-ebeln

                      ebelp   = itab_zycit003-ebelp.

    v_sub = sy-subrc.

    v_idx = sy-tabix.

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

    IF NOT itab_zycit003-qtd_itend IS INITIAL.

      itab_zycit003-qtd_iten = itab_zycit003-qtd_itend.

      MODIFY itab_zycit003.

    ENDIF.

* << Fim da inclusão

    MOVE-CORRESPONDING itab_zycit003 TO itab_it.

    itab_it-meinscom  = itab_zycit003-meins.

    itab_it-slqtde    = itab_zycit003-slqtde.

    itab_it-basred    = itab_zycit003-basred.

    itab_it-nrseqdi   = /pws/zycie085-nrseqdi.

    itab_it-waersreal = wa_zycbt007-waersb.

    itab_it-waersbem = itab_zycit003-waers_real.

    IF itab_it-advalii  IS INITIAL.

      itab_it-advalii  = itab_zycit003-advalii.

    ELSE.

...