Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 12/04/2007 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:01:55
Descrição da Nota: O PROGRAMA DA LI ESTÁ SEMPRE RECALCULANDO A QUANTIDADE ESTATISTICA .
Sintoma
O campo Qtde UM Estatística na LI vem preenchido automaticamente, conforme configurações nas tabelas
CEV604, GLT214 e cadastro de materiais. Como este campo é aberto, o sistema deve aceitar e manter
outra quantidade digitada, caso necessário.
Solução
O programa da LI deverá propor a quantidade estatistica somente quando está sendo criada.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03452 Data: 12/04/2007 Hora: 15:20:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03452
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00001
Agrupamento : 00161
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00425 - 00001 - 6.0 - 00021 - NF REMESSA LEVA CAMPO REFERÊNCIA ESTÁ INCORRETO.
----------------------------------------------------------------------------------------------------
O PROGRAMA DA LI ESTÁ SEMPRE RECALCULANDO A QUANTIDADE ESTATISTICA .
----------------------------------------------------------------------------------------------------
Palavras Chave:
LI - RECALCULA - QUANTIDADE ESTATISTICA - PROPOR VALOR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020O01
...
IF v_exit_vlmerc = 'X'.
MESSAGE i015 WITH text-385 text-386.
EXIT.
ENDIF.
SELECT SINGLE name
FROM j_1bbranch
INTO (v_descr25)
WHERE bukrs = /pws/zycie078-bukrs
AND branch = /pws/zycie078-j_1bbranch.
IF NOT it_zycit079[] IS INITIAL.
* >> Início da exclusão: MODULE LOAD_DATA
CLEAR: /pws/zycie078-qtdest, it_ekpo.
* << Fim da exclusão
* >> Início da inclusão: MODULE LOAD_DATA
CLEAR: it_ekpo.
* << Fim da inclusão
IF it_ekpo[] IS INITIAL.
REFRESH: it_ekpo.
SELECT * FROM ekpo INTO TABLE it_ekpo
FOR ALL ENTRIES IN it_zycit079
WHERE ebeln EQ it_zycit079-ebeln
AND ebelp EQ it_zycit079-ebelp.
ENDIF.
LOOP AT it_zycit079.
READ TABLE it_ekpo WITH KEY ebeln = it_zycit079-ebeln
ebelp = it_zycit079-ebelp.
IF sy-subrc NE 0.
SELECT SINGLE * FROM ekpo INTO it_ekpo
WHERE ebeln EQ it_zycit079-ebeln
AND ebelp EQ it_zycit079-ebelp.
IF sy-subrc EQ 0.
APPEND it_ekpo.
ELSE.
CONTINUE.
ENDIF.
ENDIF.
* >> Início da inclusão: MODULE LOAD_DATA
IF /pws/zycie078-qtdest IS INITIAL.
* << Fim da inclusão
PERFORM converte_um_ncm USING it_ekpo-matnr
CHANGING it_zycit079-meins
it_zycit079-qtd_iten.
/pws/zycie078-qtdest = /pws/zycie078-qtdest +
it_zycit079-qtd_iten.
* >> Início da inclusão: MODULE LOAD_DATA
ENDIF.
* << Fim da inclusão
ENDLOOP.
ENDIF.
...