Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Embarque
Data/Hora da Publicação: 14/08/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:41:53
Descrição da Nota: EMBARQUE - MENSAGEM (CADASTRAR A EMPRESA NO PROGRAMA DE RANGES
Sintoma
Erro ao colocar letras e números junto na coluna filial da tabela /pws/zygl001.
Solução
Ajustado MODULE MODIFY_ITAB2.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01930 Data: 14/08/2006 Hora: 17:08:13
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01930
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00024
Agrupamento : 00127
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01433 - 00001 - 6.0 - 00023 - PADRONIZAÇÃO E TRADUÇÃO DA CLASSE /PWS/ZYGL.
----------------------------------------------------------------------------------------------------
EMBARQUE - MENSAGEM (CADASTRAR A EMPRESA NO PROGRAMA DE RANGES
----------------------------------------------------------------------------------------------------
Palavras Chave:
EMBARQUE - MENSAGEM - CADASTRAR - EMPRESA - RANGES
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYGL001I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYGL001I01
...
module modify_itab2 input.
clear: itab_zyglt006_aux1,
v_flag .
if /pws/zygle006-codmod eq v_mod.
if v_mod eq 'D'.
* >> Início da exclusão: MODULE MODIFY_ITAB2
if /pws/zygle006-j_1bbranch eq space or
/pws/zygle006-j_1bbranch eq 0.
* << Fim da exclusão
* >> Início da inclusão: MODULE MODIFY_ITAB2
IF /pws/zygle006-j_1bbranch IS INITIAL.
* << Fim da inclusão
loop at itab_zyglt006 where j_1bbranch ne space
and j_1bbranch ne 0.
message w001 with text-010 text-011.
message w001 with text-012.
v_flag = '1'.
...