CE PLUS - Nota 010602
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: LI
Data/Hora da Publicação: 14/09/2010 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:10:34
Descrição da Nota: NÃO ESTÁ PREENCHENDO QUANTIDADE DO PRODUTO NAS INFOR. DE DRAWBACK
Sintoma
O programa de LI só está preenchendo a quantidade do produto nas informações de Drawback quando a
unidade estatistica é Kg.
Solução
Ajustado programa para passar o quantidade do item na chamada da função de conversão para unidade
estatistica.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10602 Data: 14/09/2010 Hora: 16:18:28
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10602
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00004
Agrupamento : 00038
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08934 - 00001 - 8.0 - 00001 - PREENCHER QUANTIDADE DRAWBACK
10567 - 00002 - 8.0 - 00004 - QUANTIDADE DO PRODUTO NAS INFORMAÇÕES DE DRAWBACK ESTÁ ERRADA.
----------------------------------------------------------------------------------------------------
NÃO ESTÁ PREENCHENDO QUANTIDADE DO PRODUTO NAS INFOR. DE DRAWBACK
----------------------------------------------------------------------------------------------------
Palavras Chave:
LI - QUANTIDADE - PRODUTO - INFORMAÇÕES - DRAWBACK - DETALHE - ITEM
/PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F02
...
FORM vincula_ato.
* >> Início da inclusão: FORM VINCULA_ATO
DATA: v_qtd_temp TYPE /pws/zycit079-qtd_iten,
v_qtd_tempt TYPE /pws/zycit079-qtd_iten.
* << Fim da inclusão
...
...
/pws/zycie078-codregtri = '5'.
ENDIF.
MESSAGE s015 WITH text-441.
LOOP AT it_zycit079.
READ TABLE itab_zycit376 WITH KEY ebeln = it_zycit079-ebeln
ebelp = it_zycit079-ebelp
nrseqd = v_nrseqd_v.
MOVE:
itab_zycit376-nritem+2 TO it_zycit079-item_drawback,
itab_zycit376-nritem TO it_zycit079-nritem_db.
* >> Início da exclusão: FORM VINCULA_ATO
IF v_qtdtot > 0.
* << Fim da exclusão
* >> Início da inclusão: FORM VINCULA_ATO
it_zycit079-qtd_drawback = it_zycit079-qtd_iten.
* << Fim da inclusão
IF /pws/zycie078-zum EQ '10' AND NOT v_peso IS INITIAL.
it_zycit079-qtd_drawback =
( it_zycit079-ntgew * /pws/zycie078-qtdest ) / v_peso.
ELSE.
CALL FUNCTION '/PWS/COVERT_UN_MATERIAL'
EXPORTING
matnr = it_zycit079-matnr
meins = it_zycit079-meins
qtde = it_zycit079-qtd_drawback
ncm = it_zycit079-steuc1
...
...
qtds = it_zycit079-qtd_drawback
un_s = it_zycit079-meins
EXCEPTIONS
conversion_not_found = 1
ncm_not_found = 2
overflow = 3
un_ncm_not_found = 4
material_not_found = 5
OTHERS = 6.
ENDIF.
* >> Início da exclusão: FORM VINCULA_ATO
ELSE.
it_zycit079-qtd_drawback =
( it_zycit079-qtd_iten * /pws/zycie078-qtdest ).
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM VINCULA_ATO
ADD it_zycit079-qtd_drawback TO v_qtd_tempt.
* << Fim da inclusão
it_zycit079-vl_prod_drawback =
it_zycit079-qtd_iten * it_zycit079-netpr.
MODIFY it_zycit079.
ENDLOOP.
* >> Início da inclusão: FORM VINCULA_ATO
IF /pws/zycie078-qtdest NE v_qtd_tempt AND
/pws/zycie078-qtdest > 0.
LOOP AT it_zycit079.
it_zycit079-qtd_drawback = /pws/zycie078-qtdest *
( it_zycit079-qtd_drawback / v_qtd_tempt ).
ADD it_zycit079-qtd_drawback TO v_qtd_temp.
MODIFY it_zycit079.
ENDLOOP.
it_zycit079-qtd_drawback = it_zycit079-qtd_drawback +
( /pws/zycie078-qtdest - v_qtd_temp ).
MODIFY it_zycit079 TRANSPORTING qtd_drawback
WHERE ebeln EQ it_zycit079-ebeln
AND ebelp EQ it_zycit079-ebelp.
ENDIF.
* << Fim da inclusão
ENDIF.
ELSE.
PERFORM vincular_atoc.
ENDIF.
ELSE.
MESSAGE s015 WITH text-109.
ENDIF.
ENDFORM.
FORM load_pttext USING p_matnr
p_spras.
...