CE PLUS - Nota 011172
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 23/05/2011 00:00:00
Data/Hora Última Alteração: 25/05/2011 13:35:50
Descrição da Nota: TEXTO PRÉ-CONFIGURADO NA TABELA /PWS/ZYCIT104
Sintoma
Quando é utilizado um texto pré-configurado na tabela /PWS/ZYCIT104, o texto trazido para as
mensagens complementares da DI fica desconfigurado.
Solução
Atualizada a configuração do texto trazido para as mensagens complementares da DI.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11172 Data: 23/05/2011 Hora: 14:22:01
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11172
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00007
Agrupamento : 00072
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11161 - 00001 - 8.0 - 00007 - TEXTO PRÉ-CONFIGURADO NA TABELA /PWS/ZYCIT104
----------------------------------------------------------------------------------------------------
TEXTO PRÉ-CONFIGURADO NA TABELA /PWS/ZYCIT104
----------------------------------------------------------------------------------------------------
Palavras Chave:
MENSAGEM COMPLEMENTAR DA DI DESCONFIGURADA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
REPS /PWS/MZYCI023X01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
IF it_words_app[] IS INITIAL.
CLEAR v_txta.
IF v_word EQ 'X'.
LOOP AT it_words.
MOVE it_words-word TO v_txta.
ittxt2-line = v_txta(66).
APPEND ittxt2.
ENDLOOP.
ELSE.
LOOP AT it_words.
* >> Início da exclusão: FORM FILL_TEXT_COMPL
CONCATENATE v_txta it_words-word INTO v_txta
SEPARATED BY space.
* << Fim da exclusão
* >> Início da inclusão: FORM FILL_TEXT_COMPL
v_txta = it_words-word.
* << Fim da inclusão
ENDLOOP.
v_lena = strlen( v_txta ).
ittxt2-line = v_txta(66).
APPEND ittxt2.
IF v_lena > 66.
ittxt2-line = v_txta+66(34).
APPEND ittxt2.
ENDIF.
ENDIF.
ELSE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023X01
...
ebelp LIKE /pws/zycie003-ebelp,
j_1bnbm LIKE /pws/zycie003-j_1bnbm,
adicao LIKE /pws/zycie100a-adicao,
matnr LIKE /pws/zycie003-matnr,
mark,
END OF itab_itc.
DATA: BEGIN OF it_status OCCURS 0,
fcode LIKE rsmpe-func,
END OF it_status.
DATA: BEGIN OF it_words OCCURS 0,
* >> Início da exclusão:
word(65),
* << Fim da exclusão
* >> Início da inclusão:
word(66),
* << Fim da inclusão
END OF it_words.
DATA:
itab_ita LIKE itab_it OCCURS 0 WITH HEADER LINE,"#EC NEEDED
itab_zycit049b LIKE itab_zycit049 OCCURS 0 WITH HEADER LINE,
itab_zycit049c LIKE itab_zycit049 OCCURS 0 WITH HEADER LINE,
it_words_app LIKE it_words OCCURS 0 WITH HEADER LINE,
it_statu2 LIKE it_status OCCURS 0 WITH HEADER LINE,
it_statu3 LIKE it_status OCCURS 0 WITH HEADER LINE,
it_statu4 LIKE it_status OCCURS 0 WITH HEADER LINE,
itab_zycit229 LIKE /pws/zycit229 OCCURS 0 WITH HEADER LINE,
...