Sintoma

Ao entrar na DI em modo EXIBIR, quando entramos no item da DI, ocorre uma mensagem : Índices

reg.tabstrip protegids.não suports.(tabstrip TS_IMERC índice registro TAB_GERAIS) - Nº mensagem

00119.

Solução

Ajustar tratamento de tela ao entrar no modo exibição.

Informações Complementares

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

Nota Número 09409 Data: 18/11/2009 Hora: 14:15:24

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

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

Nota Número              : 09409

Categoria                : Erro de Programa

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00123

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

AO ENTRAR NA DI EM MODO EXIBIR,OCORRE MENSAGEM DE ERRO

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

Palavras Chave:

TABSTRIP - TS_IMERC - ÍNDICE REGISTRO - TAB_GERAIS

DI - EXIBIR

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

Objetos da nota:

DYNP /PWS/SAPMZYCI023                        0413

REPS /PWS/MZYCI023F04

REPS /PWS/MZYCI023O01

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI023                        0413

MODIFICAR CAMPO TEXTO "/PWS/ZYCIE100A-TP_CERTIF"

Grupo 1                  AC

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

Modificações efetuadas em REPS /PWS/MZYCI023F04

...

  IF screen-name EQ 'TAB_MERCO'.

    READ TABLE itab_zycit107 WITH KEY

    land1 = itab_it-porigem

    mercosul = 'X'.

    IF sy-subrc NE 0.

      screen-invisible = '1'.

      MODIFY SCREEN.

    ENDIF.

  ELSE.

    LOOP AT SCREEN.

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

      IF v_acto EQ 'E'.

* << Fim da exclusão

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

      IF screen-name EQ '/PWS/ZYCIE100A-TP_CERTIF'

      AND v_acto EQ 'E'.

* << Fim da inclusão

        screen-input = 0.

        MODIFY SCREEN.

      ENDIF.

    ENDLOOP.

    LOOP AT tc_mercosul-cols INTO v_cols.

      IF v_acto EQ 'E'.

        v_cols-screen-input = 0.

      ELSE.

        IF /pws/zycie100a-tp_certif EQ '2' OR

           /pws/zycie100a-tp_certif EQ '3' .

...

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

Modificações efetuadas em REPS /PWS/MZYCI023O01

...

               /pws/zycie116-parcvar IS INITIAL   ) OR

             ( screen-group2 = 'JUR' AND

               /pws/zycie116-taxajuros IS INITIAL ).

            screen-input = '0'.

          ENDIF.

          MODIFY SCREEN.

        ENDIF.

      ENDLOOP.

    WHEN '0413'.

      PERFORM define_tab.

* >> Início da exclusão: MODULE SET_SCREEN

      IF v_acto EQ 'E'.

        screen-input = '0'.

        MODIFY SCREEN.

      ENDIF.

* << Fim da exclusão

  ENDCASE.

  CLEAR v_existe_li.

ENDMODULE.

...