Sintoma

DI exibe mensagem de ato legal incompleto para cada item.

Solução

Feito tratamento para apresentar mensagem apenas uma vez, após verificar todos os itens.

Informações Complementares

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

Nota Número 10796 Data: 06/12/2010 Hora: 10:35:28

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

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

Nota Número              : 10796

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00005

Agrupamento              : 00051

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

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

09725  - 00001 - 8.0    - 00002  - PREENCHER O EX TARIFARIO QUANDO CADASTRADO NA T604F

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

DI EXIBE MENSAGEM DE ATO LEGAL INCOMPLETO PARA CADA ITEM.

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

Palavras Chave:

MENSAGEM - ATO LEGAL - ITENS DI

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

Objetos da nota:

REPS /PWS/MZYCI023F01

REPT /PWS/SAPMZYCI023

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

Modificações efetuadas em REPS /PWS/MZYCI023F01

...

FORM save_data.

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

  DATA: BEGIN OF itab_atolegal OCCURS 0,

  ebeln LIKE ekpo-ebeln,

  ebelp LIKE ekpo-ebelp,

  END OF itab_atolegal.

  DATA: v_text1(50),

        v_text2(50).

* << Fim da inclusão

...

...

    IF itab_it-tipo_al IS INITIAL OR

       itab_it-extarif_al IS INITIAL OR

       itab_it-orgemiss_al IS INITIAL OR

       itab_it-numero_al IS INITIAL OR

       itab_it-anoemiss_al IS INITIAL .

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

      MOVE: itab_it-ebeln TO itab_atolegal-ebeln,

            itab_it-ebelp TO itab_atolegal-ebelp.

      APPEND itab_atolegal.

* << Fim da inclusão

      v_ex = 'X'.

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

      MESSAGE i015 WITH text-262 itab_it-ebeln '/' itab_it-ebelp.

      EXIT.

* << Fim da exclusão

    ENDIF.

  ENDLOOP.

  IF v_ex = 'X'.

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

    CALL FUNCTION 'MESSAGES_INITIALIZE'.

    LOOP AT itab_atolegal.

      CONCATENATE text-052 itab_atolegal-ebeln

      INTO v_text1 SEPARATED BY space.

      CONCATENATE text-120 itab_atolegal-ebelp

      INTO v_text2 SEPARATED BY space.

      CALL FUNCTION 'MESSAGE_STORE'

           EXPORTING

                arbgb = '/PWS/ZYCIM'

                msgty = 'E'

                msgv1 = v_text1

                msgv2 = v_text2

                msgv3 = text-289

                txtnr = '013'.

    ENDLOOP.

    CALL FUNCTION 'MESSAGES_SHOW'

         EXPORTING

              object          = '/PWS/SAPMZYCI023'

              i_amodal_window = ' '.

* << Fim da inclusão

    EXIT.

  ENDIF.

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCI023

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

Modificado símbolo de texto:

Idioma: EN

Símbolo: 262

Texto: (33 caracteres)

"Incomplete legal act. List items?"

Comprimento máximo: 50

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

Modificado símbolo de texto:

Idioma: PT

Símbolo: 262

Texto: (21 caracteres)

"Ato legal incompleto."

Comprimento máximo: 50

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 289

Texto: (28 caracteres)

"possui Ato Legal Incompleto."

Comprimento máximo: 28

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_DENOM

Texto: (19 caracteres)

"Denominação"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_EBN

Texto: (24 caracteres)

"Pedido de Compra"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_EBP

Texto: (12 caracteres)

"Item"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_LIF

Texto: (18 caracteres)

"Fornecedor"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_MATN

Texto: (16 caracteres)

"Material"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_NCM

Texto: (11 caracteres)

"NCM"

Referência ao Dictionary: NÃO

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

Excluído texto de seleção:

Idioma: PT

Variável (SELECT-OPTION / PARAMETER): SO_QTD

Texto: (24 caracteres)

"Qtd. Estatística"

Referência ao Dictionary: NÃO