CE PLUS - Nota 012190
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: PLI
Data/Hora da Publicação: 14/05/2012 00:00:00
Data/Hora Última Alteração: 23/05/2012 16:25:33
Descrição da Nota: ERRO AO VINCULAR EMBARQUE A LI.
Sintoma
Erro ao vincular embarque a LI.
Solução
Atualizado programa para corrigir o cálculo da quantida estatística no momento da Criação da PLI.
Versões Tratadas
8.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12190 Data: 14/05/2012 Hora: 16:49:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12190
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00011
Agrupamento : 00114
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
----------------------------------------------------------------------------------------------------
ERRO AO VINCULAR EMBARQUE A LI.
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - LI - PLI - EMBARQUE
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020I01
...
MODULE atualiza_itens INPUT.
LOOP AT it_zycit079.
v_indice = sy-tabix.
PERFORM atualiza_itens.
MODIFY it_zycit079 INDEX v_indice.
* >> Início da inclusão: MODULE ATUALIZA_ITENS
clear /pws/zycie078-qtdest.
/pws/zycie078-qtdest = /pws/zycie078-qtdest + it_zycit079-qtdest.
* << Fim da inclusão
ENDLOOP.
ENDMODULE.
...
...
IF it_zycit079-ncm IS INITIAL.
it_zycit079-ncm = it_zycit079-steuc1.
ENDIF.
IF sy-dynnr EQ '0403'.
MODIFY it_zycit079 INDEX tc_item_lsi-current_line.
ELSE.
MODIFY it_zycit079 INDEX tc_item_pli-current_line.
* >> Início da exclusão: MODULE ALTERA_IT_ZYCIT079_400
ENDIF.
IF /pws/zycie078-qtdest IS INITIAL.
/pws/zycie078-qtdest = /pws/zycie079-qtd_iten.
* << Fim da exclusão
ENDIF.
IF sy-subrc NE 0.
READ TABLE it_zycit079_aux WITH KEY
ebeln = it_zycit079-ebeln
ebelp = it_zycit079-ebelp.
IF sy-subrc NE 0.
...