CE PLUS - Nota 007690
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 02/12/2008 00:00:00
Data/Hora Última Alteração: 09/03/2010 15:43:51
Descrição da Nota: NECESSÁRIO EXIT PARA TRATAMENTO ESPECÍFICO
Sintoma
Necessário exit para tratamento específico
Solução
Criada exit DI011 no perform adic_load na DI
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07690 Data: 02/12/2008 Hora: 14:39:57
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07690
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00007
Agrupamento : 00076
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
NECESSÁRIO EXIT PARA TRATAMENTO ESPECÍFICO
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - ADIÇÃO - DESENVOVIMENTO ESPECÍFICO - ZYGLT100
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
* >> Início da inclusão: FORM ADIC_LOAD
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI023'
'DI011'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY zexit = 'DI011' BINARY SEARCH.
IF sy-subrc EQ 0.
IF NOT itab_zyglt100-zexit_ativa IS INITIAL.
PERFORM (itab_zyglt100-formulario) IN PROGRAM
(itab_zyglt100-programa) IF FOUND.
ENDIF.
ENDIF.
* << Fim da inclusão
IF sy-dynnr EQ '0050' AND sy-ucomm EQ 'ENTE'.
CLEAR: sy-ucomm.
CALL SCREEN '0300'.
ENDIF.
ENDIF.
ENDFORM.
...