CE PLUS - Nota 002778
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 28/12/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 12:47:29
Descrição da Nota: AJUSTE PARA NÃO RECLASSIFICAR IA NA DI PARA EMBARQUES A GRANEL.
Sintoma
O programa está realizando reclassificação de IA na DI para embarques a granel.
Solução
Realizar a verificação se é um embarque a granel antes de realizar a reclassificação. Se for granel,
a reclassificação será feita no encerramento.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02778 Data: 28/12/2006 Hora: 15:19:35
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02778
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00026
Agrupamento : 00146
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
AJUSTE PARA NÃO RECLASSIFICAR IA NA DI PARA EMBARQUES A GRANEL.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - EMBARQUE - GRANEL - RECLASSIFICAÇÃO - IA
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
itab_zycit115[] TO itab_zycit115a[],
itab_zycit116[] TO itab_zycit116a[],
itab_zycit118[] TO itab_zycit118a[],
itab_zycit121[] TO itab_zycit121a[],
itab_zycit124[] TO itab_zycit124a[],
itab_zycit200[] TO itab_zycit200a[],
itab_zycit049di2[] TO itab_zycit049di[],
itab_it[] TO itab_ita[],
/pws/zycie085 TO wa_zycit085.
PERFORM save_especificacao.
* >> Início da inclusão: FORM SAVE_DATA
READ TABLE itab_zycit003 INDEX 1.
IF itab_zycit003-qtd_itend IS INITIAL.
* << Fim da inclusão
PERFORM reclassificacao_ia.
* >> Início da inclusão: FORM SAVE_DATA
ENDIF.
* << Fim da inclusão
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI023'
'DI006'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY zexit = 'DI006' BINARY SEARCH.
IF sy-subrc EQ 0.
...