CE PLUS - Nota 013853
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: PLI
Data/Hora da Publicação: 03/04/2014 00:00:00
Data/Hora Última Alteração: 16/04/2014 10:35:47
Descrição da Nota: DUMP AO EXECUTAR BATCH INPUT NA PLI
Sintoma
Ao efetuar batch input na PLI ocorre DUMP.
Solução
Atualizado programa para não excutar funções do editor caso este não tenha sido criado e ocultada
aba "Complementares". (causabva problema no batch-input - SHDB)
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13853 Data: 03/04/2014 Hora: 14:07:06
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13853
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00007
Agrupamento : 00170
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
13208 - 00001 - 9.0 - 00005 - TRATAMENTO PARA BLOQUEIOS DE CAMPOS DA PLI
13765 - 00002 - 9.0 - 00007 - PLI - BOTÃO ELIMINAR ITEM; FECHAR CAMPOS SE TIVER LI
----------------------------------------------------------------------------------------------------
DUMP AO EXECUTAR BATCH INPUT NA PLI
----------------------------------------------------------------------------------------------------
Palavras Chave:
DUMP - BATCH - INPUT - PLI - TEXTO - COMPLEMENTARES
/PWS/SAPMZYCI020
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI020I01
REPS /PWS/MZYCI020F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020I01
...
MODULE user_command_0500 INPUT.
* >> Início da inclusão: MODULE USER_COMMAND_0500
IF NOT editor2 IS INITIAL.
* << Fim da inclusão
CALL METHOD editor2->get_text_as_r3table IMPORTING
table = ittxt1[].
* >> Início da inclusão: MODULE USER_COMMAND_0500
ENDIF.
* << Fim da inclusão
CLEAR: r_okcode, e_exec_okcode.
CALL METHOD cl_gui_cfw=>dispatch.
IF NOT r_okcode IS INITIAL.
okcode = r_okcode.
ENDIF.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020F01
...
IF ( sy-tcode EQ '/PWS/ZYCI020_G' OR
sy-tcode EQ '/PWS/ZYCI020_I' ) AND
/pws/zycie079a-fabric EQ '2' .
screen-input = 1 .
ENDIF .
IF sy-tcode EQ '/PWS/ZYCI020_G' AND
NOT /pws/zycie079a-numli IS INITIAL.
screen-input = 0 .
ENDIF.
ENDIF.
* >> Início da inclusão: FORM MODO_EXIB
IF screen-name EQ 'TAB_COMP' AND
editor2 IS INITIAL .
screen-invisible = '1'.
screen-active = '0'.
ENDIF.
* << Fim da inclusão
MODIFY SCREEN.
ENDLOOP.
IF ( sy-tcode EQ '/PWS/ZYCI020_G' OR
sy-tcode EQ '/PWS/ZYCI020_I' ) AND
( gv_status EQ 'P' OR gv_status EQ 'F' ).
LOOP AT tc_item_pli-cols INTO wa_cols.
wa_cols-screen-input = 0.
MODIFY tc_item_pli-cols FROM wa_cols.
ENDLOOP.
ENDIF.
...
...
MODIFY tc_item-cols FROM wa_cols.
ENDIF.
IF ( sy-tcode EQ '/PWS/ZYCI020_G' OR
sy-tcode EQ '/PWS/ZYCI020_I' ) AND
( gv_status EQ 'P' OR gv_status EQ 'F' ).
wa_cols-screen-input = 0.
MODIFY tc_item-cols FROM wa_cols.
ENDIF.
ENDLOOP.
WHEN '0120' .
* >> Início da inclusão: FORM MODO_EXIB
CHECK NOT editor2 IS INITIAL.
* << Fim da inclusão
IF ( sy-tcode EQ '/PWS/ZYCI020_G' OR
sy-tcode EQ '/PWS/ZYCI020_I' ).
IF gv_status EQ 'P' OR gv_status EQ 'F' OR
NOT /pws/zycie078-descrcan IS INITIAL.
top_editmode = '1'.
CALL METHOD editor2->set_readonly_mode EXPORTING
readonly_mode = top_editmode.
ELSE.
top_editmode = '0'.
CALL METHOD editor2->set_readonly_mode EXPORTING
...