Módulo: DOC. IMPORTAÇÃO
Funcionalidade: PLI
Data/Hora da Publicação: 14/03/2012 10:22:06
Data/Hora Última Alteração: 14/03/2012 10:22:06
Descrição da Nota: ERRO NOS CAMPOS DE ESPECIFICAÇÃO TÉCNICA DA PLI
Sintoma
Erro nos campos da PLI
Solução
Carregar campos de descrição de especificação técnica
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12026 Data: 09/03/2012 Hora: 15:37:51
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12026
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00010
Agrupamento : 00107
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10492 - 00001 - 8.0 - 00004 - PRÉ CRÍTICA DA PLI RECLAMA QUE VALOR DA MERCADORIA NÃO FOI PREENC
10496 - 00002 - 8.0 - 00004 - PLI ESTA SE PERDENDO AO COMPOR O CAMPO VALOR NO LOCAL DA MERCADOR
----------------------------------------------------------------------------------------------------
ERRO NOS CAMPOS DE ESPECIFICAÇÃO TÉCNICA DA PLI
----------------------------------------------------------------------------------------------------
Palavras Chave:
ERRO - CAMPOS - PLI
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI020 0115
REPS /PWS/MZYCI020F01
REPS /PWS/MZYCI020F02
REPS /PWS/MZYCI020O01
TABD /PWS/ZYCIT079
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI020 0115
*Alterar descrição
MODIFICAR CHTXT "S_OESPEC"
Comprimento Visível 21
Texto Especificação técnica
MODIFICAR CHTXT "S_OESPECT"
Texto Detalhe da Mercadoria
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F01
...
LOOP AT it_zycit079.
v_tabix = sy-tabix.
IF NOT it_zycit079-destaque IS INITIAL.
READ TABLE it_ekpo_temp WITH KEY ebeln = it_zycit079-ebeln
ebelp = it_zycit079-ebelp.
READ TABLE it_zycit338 WITH KEY matnr = it_ekpo_temp-matnr
destaque = it_zycit079-destaque.
IF sy-subrc NE 0.
ENDIF.
IF it_zycit079-espec_tecnica IS INITIAL.
* >> Início da exclusão: FORM COMM_SAVEPLI
SELECT SINGLE * FROM /pws/zycit219
WHERE codigo EQ it_zycit079-codsufra
AND ncm EQ it_zycit079-ncm
AND destaque EQ it_zycit079-destaque.
IF sy-subrc = 0.
it_zycit079-espec_tecnica = /pws/zycit219-descricao.
ELSE.
CLEAR it_zycit079-espec_tecnica.
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM COMM_SAVEPLI
PERFORM carrega_espec_tec.
* << Fim da inclusão
ENDIF.
IF it_zycit079-ref_fabricante IS INITIAL.
it_zycit079-ref_fabricante = it_ekpo_temp-mfrpn.
ENDIF.
IF it_zycit079-part_number IS INITIAL.
it_zycit079-part_number = it_ekpo_temp-matnr.
ENDIF.
ENDIF.
CLEAR: v_esp,
v_txtki,
...
...
* >> Início da inclusão:
form carrega_espec_tec.
SELECT SINGLE * FROM /pws/zycit219
WHERE codigo EQ it_zycit079-codsufra
AND ncm EQ it_zycit079-ncm
AND destaque EQ it_zycit079-destaque.
IF sy-subrc = 0.
/pws/zycie079a-espec_tecnica = it_zycit079-espec_tecnica =
/pws/zycit219-descricao.
ELSE.
CLEAR : /pws/zycie079a-espec_tecnica , it_zycit079-espec_tecnica.
ENDIF.
endform.
* << Fim da inclusão
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F02
...
v_tabix = sy-tabix.
IF sy-subrc = 0.
IF NOT s_ontgew IS INITIAL .
it_zycit079-ntgew = wa_zycit079-ntgew.
ENDIF.
IF NOT s_oespec IS INITIAL.
MOVE it_zycit079 TO /pws/zycie079a.
PERFORM save_txt_2.
ENDIF.
ENDIF.
* >> Início da exclusão: FORM COMM_REPL
MODIFY it_zycit079 INDEX sy-tabix.
* << Fim da exclusão
* >> Início da inclusão: FORM COMM_REPL
MODIFY it_zycit079 INDEX v_tabix.
* << Fim da inclusão
ENDLOOP.
ENDIF.
LOOP AT itab_itcip WHERE NOT mark IS initial.
READ TABLE it_zycit079 WITH KEY
ebeln = itab_itcip-ebeln
ebelp = itab_itcip-ebelp.
IF sy-subrc = 0.
v_tabix = sy-tabix.
IF NOT s_odestaque IS INITIAL.
it_zycit079-destaque = /pws/zycie079a-destaque.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020O01
...
load_especificacao,
load_moeda_det .
IF NOT /pws/zycie079a-destaque IS INITIAL.
SELECT SINGLE * FROM ekpo
WHERE ebeln EQ /pws/zycie079a-ebeln
AND ebelp EQ /pws/zycie079a-ebelp.
SELECT SINGLE * FROM /pws/zycit338
WHERE matnr EQ ekpo-matnr
AND codsufra EQ /pws/zycie079a-codsufra.
IF /pws/zycie079a-espec_tecnica IS INITIAL.
* >> Início da inclusão: MODULE LOAD_ITEM
PERFORM carrega_espec_tec.
* << Fim da inclusão
ENDIF.
IF /pws/zycie079a-ref_fabricante IS INITIAL.
/pws/zycie079a-ref_fabricante = ekpo-mfrpn.
ENDIF.
IF /pws/zycie079a-part_number IS INITIAL.
/pws/zycie079a-part_number = ekpo-matnr.
ENDIF.
ENDIF.
IF /pws/zycie079a-fabric EQ 2 AND /pws/zycie079a-lifnr IS INITIAL.
SELECT SINGLE * FROM ekpo
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT079
No campo ALADI acrescentar a ajuda de pesquisa /PWS/ZYCEA168
Par.AjPesq TabConexão Cpo.conexão ajuda p/pesquisa
CODALADI /PWS/ZYCIT079 ALADI
No campo NALADI acrescentar a ajuda de pesquisa /PWS/ZYCEA142
Par.AjPesq TabConexão Cpo.conexão ajuda p/pesquisa
CODNALA /PWS/ZYCIT079 NALADI