CE PLUS - Nota 004654

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: DI

Data/Hora da Publicação: 06/09/2007 00:00:00

Data/Hora Última Alteração: 09/03/2010 10:25:33

Descrição da Nota: AJUSTE DE MENSAGENS DA ANA

Sintoma

 

Ao tentar salvar a ana exibe a mensagem "DI possui nota fiscal".

A mensagem está erra por se tratar da ANA e não existir nota fiscal para a ANA.

 

Solução

 

Corrigir mensagens.

Versões Tratadas

7.0

Informações Complementares

 

----------------------------------------------------------------------------------------------------

Nota Número 04654 Data: 06/09/2007 Hora: 16:34:09

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 04654

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00003

Agrupamento              : 00015

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

----------------------------------------------------------------------------------------------------

AJUSTE DE MENSAGENS DA ANA

----------------------------------------------------------------------------------------------------

Palavras Chave:

MENSAGEM - ANA - /PWS/SAPMZYCI059

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI059F01

REPS /PWS/MZYCI059F03

REPT /PWS/SAPMZYCI059

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI059F01

 

...

                           itab_zycit403[]   NE itab_zycit403a[].

    IF sy-tcode NE '/PWS/ZYCI059_E' AND v_salvou EQ ' '.

      SELECT SINGLE * FROM /pws/zycit041 INTO /pws/zycit041 WHERE

       nrseq  EQ /pws/zycie085-nrseqdi AND

       cancel EQ space.

      IF sy-subrc EQ 0 AND /pws/zycit041-docnum NE '8888888888'.

        MESSAGE i015 WITH text-028.

        EXIT.

      ELSEIF sy-subrc EQ 0 AND /pws/zycit041-docnum EQ '8888888888'

      AND  NOT /pws/zycit041-belnr_mr1m IS INITIAL.

* >> Início da exclusão: FORM VERIFY_CHANGES

        MESSAGE i015 WITH text-028.

* << Fim da exclusão

* >> Início da inclusão: FORM VERIFY_CHANGES

        MESSAGE i015 WITH text-236.

* << Fim da inclusão

        EXIT.

      ELSEIF sy-subrc EQ 0 AND /pws/zycit041-docnum EQ '8888888888'.

        SELECT SINGLE * FROM /pws/zycit043

                                  WHERE nrseq =  /pws/zycit041-nrseq

                                 AND nfglobal = /pws/zycit041-nfglobal.

      ENDIF.

      IF sy-subrc EQ 0 AND  /pws/zycit041-docnum = '8888888888'.

        MESSAGE i015 WITH text-028.

      ELSE.

        v_changed = '1'.

...

 

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI059F03

 

...

      MESSAGE i015 WITH text-029.

    ELSE.

      SELECT SINGLE * FROM /pws/zycit041 INTO /pws/zycit041 WHERE

             nrseq  EQ /pws/zycie085-nrseqdi AND

             cancel EQ space.

      IF sy-subrc EQ 0 AND /pws/zycit041-docnum NE '8888888888'.

        MESSAGE i015 WITH text-028.

        EXIT.

      ELSEIF sy-subrc EQ 0 AND /pws/zycit041-docnum EQ '8888888888'

      AND  NOT /pws/zycit041-belnr_mr1m IS INITIAL.

* >> Início da exclusão: FORM COMM_DELE

        MESSAGE i015 WITH text-028.

* << Fim da exclusão

* >> Início da inclusão: FORM COMM_DELE

        MESSAGE i015 WITH text-236.

* << Fim da inclusão

        EXIT.

      ELSEIF sy-subrc EQ 0 AND /pws/zycit041-docnum EQ '8888888888'.

        SELECT SINGLE * FROM /pws/zycit043

                                  WHERE nrseq =  /pws/zycit041-nrseq

                                 AND nfglobal = /pws/zycit041-nfglobal

                                 AND cancel NE 'X'.

      ENDIF.

      IF sy-subrc EQ 0 AND  /pws/zycit041-docnum = '8888888888'.

        MESSAGE i015 WITH text-028.

      ELSE.

...

 

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPT /PWS/SAPMZYCI059

 

------------------------------------------------------------------------

Modificado símbolo de texto:

 

Idioma: PT

 

Símbolo: 028

 

Texto: (19 caracteres)

"ANA possui Remessa."

 

Comprimento máximo: 50

 

------------------------------------------------------------------------

Modificado símbolo de texto:

 

Idioma: ES

 

Símbolo: 028

 

Texto: (17 caracteres)

"ANA posue Remesa."

 

Comprimento máximo: 50

 

------------------------------------------------------------------------

Incluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 236

 

Texto: (28 caracteres)

"Processo possui recebimento!"

 

Comprimento máximo: 50