CE PLUS - Nota 012743
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 26/12/2012 00:00:00
Data/Hora Última Alteração: 04/04/2013 13:45:10
Descrição da Nota: O PROGRAMA ESTÁ PASSANDO A UNIDADE PARA PEDIDO COM CLASSIF. CONTABIL
Sintoma
Ao receber um processo com diversos itens com unidade diferentes o programa está passando a unidade
incorreta para o item que possui classificação contabil.
Solução
Ajustada montagem dos dados para itens com classificação contabil.
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12743 Data: 26/12/2012 Hora: 15:49:21
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12743
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00003
Agrupamento : 00140
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12286 - 00001 - 9.0 - 00001 - NÃO LANÇA O ELEMENTO PEP QUANDO PEDIDO POSSUI CLASSIF. CONT. SIMP
----------------------------------------------------------------------------------------------------
O PROGRAMA ESTÁ PASSANDO A UNIDADE PARA PEDIDO COM CLASSIF. CONTABIL
----------------------------------------------------------------------------------------------------
Palavras Chave:
RECEBIMENTO - UNIDADE - MEDIDA - PEDIDO - CLASSIFICAÇÃO - CONTABIL
/PWS/SAPMZYCI017
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI017F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...
SELECT * FROM ekkn INTO TABLE itab_ekkn_mult
FOR ALL ENTRIES IN itab_ekpo
WHERE ebeln = itab_ekpo-ebeln AND
ebelp = itab_ekpo-ebelp.
IF NOT itab_ekkn_mult[] IS INITIAL.
PERFORM trata_itab_ekkn_mult.
ENDIF.
CLEAR: itab_zycit510, itab_zycit510[].
ENDIF.
LOOP AT itab_zycit031.
* >> Início da inclusão: FORM FILL_DATE_MR1M
READ TABLE itab_ekpo WITH KEY ebeln = itab_zycit031-ebeln
ebelp = itab_zycit031-ebelp.
* << Fim da inclusão
CLEAR: v_indice, lv_menge.
LOOP AT itab_ekkn_mult WHERE ebeln = itab_zycit031-ebeln AND
ebelp = itab_zycit031-ebelp.
lv_menge = lv_menge + itab_ekkn_mult-menge.
v_indice = v_indice + 1.
ENDLOOP.
CLEAR: v_cont2, v_quantity, v_amount.
LOOP AT itab_ekkn_mult WHERE ebeln = itab_zycit031-ebeln AND
ebelp = itab_zycit031-ebelp.
v_cont2 = v_cont2 + 1.
...