CE PLUS - Nota 001069
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 22/03/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 11:54:52
Descrição da Nota: EXIT PARA VARIAÇÃO CAMBIAL
Sintoma
Para cadastrar uma Letra de Juros, ao entrar na tela, o usuário esta sem autorização para efetuar o
registro.
Solução
Deixado campo empresa como obrigatório.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01069 Data: 22/03/2006 Hora: 11:59:15
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01069
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00106
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
EXIT PARA VARIAÇÃO CAMBIAL
----------------------------------------------------------------------------------------------------
Palavras Chave:
VARIAÇÃO CAMBIAL - EXIT DI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
itab_zycit049di2[] TO itab_zycit049di[],
itab_it[] TO itab_ita[],
/pws/zycie085 TO wa_zycit085.
PERFORM save_especificacao.
PERFORM reclassificacao_ia.
* >> Início da inclusão: FORM SAVE_DATA
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI023'
'DI006'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY zexit = 'DI006' 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
ENDFORM.
FORM verify_changes.
CLEAR v_changed.
CHECK v_acto EQ 'A'.
CLEAR: itab_zycit100, itab_zycit003.
...