Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Dados Adicionais
Data/Hora da Publicação: 06/01/2006 00:00:00
Data/Hora Última Alteração: 21/02/2011 13:55:17
Descrição da Nota: INCLUSÃO DE EXIT NOS DADOS ADICIONAIS
Sintoma
Necessidade de desenvolvimento específico.
Solução
Inclusão de Exit DDA004.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00613 Data: 06/01/2006 Hora: 09:16:03
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00613
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00095
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00221 - 00001 - 6.0 - 00021 - MELHORIAS TÉCNICAS NO PROGRAMA DE DADOS ADICIONAIS DO EMBARQUE
00241 - 00002 - 6.0 - 00021 - AJUSTE EM BOTÕES DE SUBTELAS DE DADOS ADICIONAIS
----------------------------------------------------------------------------------------------------
INCLUSÃO DE EXIT NOS DADOS ADICIONAIS
----------------------------------------------------------------------------------------------------
Palavras Chave:
EXPORTAÇÃO DADOS ADICIONAIS EXIT
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCE038O01
REPS /PWS/MZYCE038TOP
REPS /PWS/MZYCE038X01
REPS /PWS/SAPMZYCE038
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE038O01
...
wa_cols-screen-input = 0.
MODIFY tc_op-cols FROM wa_cols.
ENDLOOP.
ENDIF.
PERFORM config_layout.
* >> Início da inclusão: MODULE SET_SCREEN
ENDCASE.
CLEAR itab_zyglt100.
READ TABLE itab_zyglt100 WITH KEY zexit = 'DDA004' BINARY SEARCH.
IF sy-subrc IS INITIAL.
IF NOT itab_zyglt100-zexit_ativa IS INITIAL.
IF NOT itab_zyglt100-formulario IS INITIAL AND
NOT itab_zyglt100-programa IS INITIAL.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa)
IF FOUND.
ENDIF.
ENDIF.
ENDIF.
* << Fim da inclusão
* >> Início da exclusão: MODULE SET_SCREEN
ENDCASE.
* << Fim da exclusão
ENDMODULE.
MODULE insert_line OUTPUT.
CASE sy-dynnr.
WHEN '0101'.
CLEAR /pws/zycee049.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE038TOP
...
tables: /pws/zycee001,
/pws/zycet049,
/pws/zycee049,
/pws/zycet046,
/pws/zycet100,
* >> Início da exclusão:
/pws/zycee100,
* << Fim da exclusão
/pws/zycet047,
/pws/zycee047,
/pws/zycet056,
/pws/zycee056,
/pws/zycet054,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE038X01
* >> Início da exclusão:
tables: /pws/zycee046.
* << Fim da exclusão
* >> Início da inclusão:
TABLES: /pws/zycee046,
/pws/zycee100.
* << Fim da inclusão