Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 07/10/2013 00:00:00
Data/Hora Última Alteração: 07/10/2013 14:04:22
Descrição da Nota: BOTÃO BACK OU VOLTAR (SETA VERDE) NA DI, AJUSTE NAS CONSISTENCIAS.
Sintoma
Parametrizar o tipo de mensagem de declaração repetida como warning.
Se colocamos data de registro e declaração repetida, seta verde, sim para gravar, o programa volta
para DI dando mensagem de declaração repetida e não sai da DI de jeito nenhum.
Solução
Quando a mensagem de declaração repetida for de aviso, deixar salvar a DI e sair do programa.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13303 Data: 07/10/2013 Hora: 09:55:41
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13303
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 9.0
Pacote : 00006
Agrupamento : 00165
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
13299 - 00001 - 9.0 - 00006 - BOTÃO BACK OU VOLTAR (SETA VERDE) NA DI, AJUSTE NAS CONSISTENCIAS
----------------------------------------------------------------------------------------------------
BOTÃO BACK OU VOLTAR (SETA VERDE) NA DI, AJUSTE NAS CONSISTENCIAS.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - VOLTAR - BACK - SETA VERDE - MENSAGEM DE SALVAR - ALTERAÇÕES
FORAM FEITAS ALTERAÇÕES - DESEJA SALVAR - WARNING - AVISO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
FORM verifica_nrdi.
DATA: v_nrseqdi TYPE /pws/zycie085-nrseqdi.
IF NOT t001-land1 EQ 'CL' AND NOT t001-land1 EQ 'AR'.
IF NOT /pws/zycie085-nrdi IS INITIAL.
SELECT SINGLE nrseqdi FROM /pws/zycit085 INTO v_nrseqdi
WHERE nrseqdi NE /pws/zycie085-nrseqdi
AND nrdi EQ /pws/zycie085-nrdi. "#EC CI_NOFIELD
IF sy-subrc EQ 0 .
IF okcode EQ 'BACK' OR okcode EQ 'LEAV'.
MESSAGE i015 WITH text-254 v_nrseqdi.
* >> Início da inclusão: FORM VERIFICA_NRDI
SELECT SINGLE * FROM /pws/zyglt217
WHERE arbgb EQ '/PWS/ZYCIM'
AND msgnr EQ '146'.
IF sy-subrc EQ 0 AND NOT /pws/zyglt217-msgtp IS INITIAL.
IF /pws/zyglt217-msgtp EQ 'E'.
* << Fim da inclusão
v_grava_ok = 'F'.
* >> Início da inclusão: FORM VERIFICA_NRDI
ELSE.
v_grava_ok = 'V'.
ENDIF.
ENDIF.
* << Fim da inclusão
ELSE.
SELECT SINGLE * FROM /pws/zyglt217
WHERE arbgb EQ '/PWS/ZYCIM'
...