CE PLUS - Nota 010043
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 07/04/2010 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:09:06
Descrição da Nota: CALCULAR O PESO LIQUIDO DOS ITENS APENAS QUANDO A QUANTIDADE FOR ALTERAD
Sintoma
O programa não permite informar peso liquido diferente do que foi informado no pedido, ao alterar o
peso liquido na LI e precionar enter o programa recalcula o peso liquido com base no pedido.
Solução
Ajustado programa para recalcular o peso liquido do item apenas quando o peso estiver em branco ou a
quantidade for alterada.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10043 Data: 07/04/2010 Hora: 13:55:13
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10043
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00003
Agrupamento : 00016
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
09480 - 00001 - 8.0 - 00001 - NÃO RECALCULA O PESO NO DESEMBARAÇO DA LI
----------------------------------------------------------------------------------------------------
CALCULAR O PESO LIQUIDO DOS ITENS APENAS QUANDO A QUANTIDADE FOR ALTERAD
----------------------------------------------------------------------------------------------------
Palavras Chave:
CALCULO - PESO - LIQUIDO - ITEM - QUATIDADE - ALTERADA - LI
/PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F01
REPS /PWS/MZYCI020I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F01
...
AT END OF codigo.
it_zycit079-netpr = v_netpr.
CLEAR v_netpr.
ENDAT.
ENDLOOP.
FREE itab_zycit030_aux.
READ TABLE itab_t006 WITH KEY msehi = itab_itens_aux-gewei.
IF sy-subrc EQ 0 AND
v_existe_bl NE 'S'.
IF NOT itab_itens_aux-ntgew IS INITIAL AND
* >> Início da inclusão: FORM VERIFICA_ITENS
it_zycit079-ntgew IS INITIAL AND
* << Fim da inclusão
NOT it_zycit079-qtd_iten IS INITIAL AND NOT
itab_t006-nennr IS INITIAL.
PERFORM calcula_peso.
it_zycit079-gewei = 'KG'.
ENDIF.
ELSE.
READ TABLE itab_t006 WITH KEY msehi = itab_itens_aux-meins.
IF sy-subrc EQ 0 AND
v_existe_bl NE 'S'.
IF NOT itab_itens_aux-ntgew IS INITIAL AND
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020I01
...
MODULE altera_it_zycit079 INPUT.
* >> Início da inclusão: MODULE ALTERA_IT_ZYCIT079
READ TABLE it_zycit079 INDEX tc_item-current_line.
IF sy-subrc EQ 0 AND
/pws/zycie079-qtd_iten NE it_zycit079-qtd_iten AND
/pws/zycie079-ntgew EQ it_zycit079-ntgew.
CLEAR: /pws/zycie079-ntgew, it_zycit079-ntgew.
ENDIF.
* << Fim da inclusão
MOVE: mark TO it_zycit079-mark ,
/pws/zycie079-ebeln TO it_zycit079-ebeln ,
/pws/zycie079-ebelp TO it_zycit079-ebelp ,
/pws/zycie079-descr TO it_zycit079-descr ,
/pws/zycie079-bednr TO it_zycit079-bednr ,
/pws/zycie079-menge TO it_zycit079-menge ,
...