CE PLUS - Nota 005819
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 01/02/2008 00:00:00
Data/Hora Última Alteração: 09/03/2010 11:39:32
Descrição da Nota: HABILITAR CAMPOS DECLARAÇÃO E DATA DE REGISTRO SENÃO HOUVER RECEBIMENTO
Sintoma
Somente habilitar os campos declaração e data de registro da DI senão houver Recebimento.
Solução
Verificar se exite data de recebimento para fazer o controle de permissão de input nos campos Data
de Registro e Declaração
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05819 Data: 01/02/2008 Hora: 10:51:38
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05819
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00032
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
HABILITAR CAMPOS DECLARAÇÃO E DATA DE REGISTRO SENÃO HOUVER RECEBIMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
DATA REGISTRO - DECLARAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
screen-input = '1'.
ENDIF.
ENDIF.
ENDIF.
MODIFY SCREEN.
ENDIF.
IF sy-tcode = '/PWS/ZYCI023_E'.
screen-input = 0.
MODIFY SCREEN.
ENDIF.
* >> Início da inclusão: FORM SET_SCREEN_0110
IF ( screen-name EQ '/PWS/ZYCIE085-DTREG' OR
screen-name EQ '/PWS/ZYCIE085-NRDI' ).
IF NOT itab_zycit041-dt_mr1m IS INITIAL.
screen-input = 0.
ELSE.
screen-input = 1.
ENDIF.
MODIFY SCREEN.
ENDIF.
* << Fim da inclusão
ENDLOOP.
ENDFORM.
FORM set_screen_0131.
LOOP AT SCREEN.
IF screen-group1 EQ 'AC'.
screen-input = '0'.
IF v_acto EQ 'A'.
IF NOT sy-dynnr EQ '0420'.
screen-input = '1'.
ENDIF.
...