CE PLUS - Nota 013303

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.

 

Versões Tratadas

9.0


Pré-Requisitos

Produto:

Nota

Descrição

BOTÃO BACK OU VOLTAR (SETA VERDE) NA DI, AJUSTE NAS CONSISTENCIAS.

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'

...