CE PLUS - Nota 003785
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 29/05/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 13:41:12
Descrição da Nota: AJUSTE PARA EXIBIR APENAS O TEXTO DO CAMPO ESPEFICICACAO PARAMETRIZADO
Sintoma
Será necessário que a descrição dos materiais busque a informação da tabela de parametros
/PWS/ZYCIT229, isto é, da pasta textos do Detalhe do Item do pedido de Compras. Efetuei um teste e
deixei na tabela de parametros para que apareça a informação da descrição da Nota Info, mas após
criar a DI o que aparece é o texto breve do material.
Solução
Atualização do programa da DI para que o sistema respeite os parâmetros da tabela /pws/zycit229 no
momento de levar os textos para a DI.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03785 Data: 29/05/2007 Hora: 09:44:26
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03785
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00001
Agrupamento : 00168
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03690 - 00001 - 7.0 - 00001 - ERRO AO CARREGAR TEXTOS DE MATERIAL NA DI
----------------------------------------------------------------------------------------------------
AJUSTE PARA EXIBIR APENAS O TEXTO DO CAMPO ESPEFICICACAO PARAMETRIZADO
----------------------------------------------------------------------------------------------------
Palavras Chave:
RTEXTI, FORM SET_SCREEN_0110, /PWS/ZYCIE100A, ITAB_ZYCIT003-DESCR
FORM FILL_DESC
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
tdid = 'F01' AND
tdspras = v_spras AND
srtf2 = 0.
IF sy-subrc = 0.
PERFORM read_text_especif CHANGING v_texto.
ELSE.
MOVE itab_zycit003-descr TO itab_it-especificacao.
MODIFY itab_it TRANSPORTING especificacao
WHERE ebeln EQ itab_zycit003-ebeln
AND ebelp EQ itab_zycit003-ebelp.
* >> Início da exclusão: FORM FILL_DESC
rtexti-tdformat = '*'.
rtexti-tdline = itab_zycit003-descr.
APPEND rtexti.
* << Fim da exclusão
ENDIF.
ELSEIF itab_zycit229-txtdesc = '05'.
CONCATENATE itab_it-ebeln itab_it-ebelp INTO v_name.
SELECT SINGLE * FROM stxl INTO itab_stxl
WHERE relid = 'TX' AND
tdobject = 'EKPO' AND
tdname = v_name AND
tdid = 'F03' AND
tdspras = v_spras AND
srtf2 = 0.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
screen-required = '1'.
ENDIF.
ENDIF.
ELSEIF sy-dynnr = '0412'.
IF ( screen-name EQ '/PWS/ZYCIE003-APLICACAO' OR
screen-name EQ '/PWS/ZYCIE003-CONDMERC' ) AND
/pws/zycie085-codreg = '06'.
ELSE.
screen-input = '1'.
ENDIF.
* >> Início da inclusão: FORM SET_SCREEN_0110
IF NOT rtexti[] IS INITIAL.
READ TABLE rtexti INDEX 1.
/pws/zycie100a-especificacao = rtexti-tdline.
ENDIF.
* << Fim da inclusão
ELSEIF sy-dynnr = '0434'.
IF /pws/zycie100a-antidrate IS INITIAL AND
screen-name = 'S_ADBS'.
ELSE.
screen-input = '1'.
ENDIF.
ENDIF.
ENDIF.
MODIFY SCREEN.
ENDIF.
...