атрибуты SCREEN

Egal

Сделал свой скрин, на нём TableView. В этом самом TV лежать записи.

Мне нужно чтобы - по условию - в отдельных записях были закрыты поля, которые по умолчанию открыты для ввода.

пробовал сбрасывать input и active в цикле по SREEN.
пробовал тоже самое сбрасывать в table_control-cols-screen
пробовал даже какойто ФМ вызывать, который dynpro вроде как обновляет...

хрен! :evil:

чего не так? или точнее было бы спросить - а как это можно сделать?

10х

Uukrul

Egal написал:

Мне нужно чтобы - по условию - в отдельных записях были закрыты поля, которые по умолчанию открыты для ввода.

В логике экрана пишет что-то типа:

Code:

  LOOP AT i_screen_425 WITH CONTROL grid425 CURSOR ftopix.
    MODULE update_grid425_pbo.
  ENDLOOP.

А в самом модульке, ну у меня там подсвечивались строки с ошибкой:

Code:

  LOOP AT SCREEN.
    IF l_error = true.
      screen-intensified = '1'.
    ELSE.
      screen-intensified = '0'.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

А вот если ты хочешь отдельные колонки таблицы вообще скрыть или показать тогда в PBO-логике вызов модулька делаешь в котором пишешь что-то типа (только в цикле его вызывать не надо):

Code:

DATA: grid_view_row TYPE cxtab_column.

 LOOP AT grid425-cols INTO grid_view_row.
      IF grid_view_row-screen-group1 = 'LFA'.
        grid_view_row-invisible = '1'.
      ELSEIF grid_view_row-screen-group1 = 'PLA'.
        grid_view_row-invisible = '0'.
      ENDIF.
    MODIFY grid425-cols INDEX sy-tabix FROM grid_view_row.
  ENDLOOP.

Ну короче где-то так :wink:

T

вставь обработку в
LOOP AT... WITH CONTROL..
...
ENDLOOP.

На каждом шаге цикла будешь иметь строку таблицы и можешь с ней работать напрямую через SCREEN.

Пример (создана таблица к T001 визардом):

Code:

  LOOP AT   G_ITAB_ITAB
       INTO G_ITAB_WA
       WITH CONTROL ITAB
       CURSOR ITAB-CURRENT_LINE.
*   MODULE ITAB_CHANGE_FIELD_ATTR
    MODULE ITAB_MOVE.
    MODULE ITAB_GET_LINES.
    MODULE HIDE.                                <- это он
  ENDLOOP.

Code:

MODULE HIDE OUTPUT.
  if t001-bukrs = '1000'.
    loop at screen.
      screen-input = 0.
      modify screen.
    endloop.
  endif.
ENDMODULE.                 " HIDE  OUTPUT

Гость

Uukrul написал(а):

Egal написал:

Мне нужно чтобы - по условию - в отдельных записях были закрыты поля, которые по умолчанию открыты для ввода.

В логике экрана пишет что-то типа:

Code:

  LOOP AT i_screen_425 WITH CONTROL grid425 CURSOR ftopix.
    MODULE update_grid425_pbo.
  ENDLOOP.

А в самом модульке, ну у меня там подсвечивались строки с ошибкой:

Code:

  LOOP AT SCREEN.
    IF l_error = true.
      screen-intensified = '1'.
    ELSE.
      screen-intensified = '0'.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

А вот если ты хочешь отдельные колонки таблицы вообще скрыть или показать тогда в PBO-логике вызов модулька делаешь в котором пишешь что-то типа (только в цикле его вызывать не надо):

Code:

DATA: grid_view_row TYPE cxtab_column.

 LOOP AT grid425-cols INTO grid_view_row.
      IF grid_view_row-screen-group1 = 'LFA'.
        grid_view_row-invisible = '1'.
      ELSEIF grid_view_row-screen-group1 = 'PLA'.
        grid_view_row-invisible = '0'.
      ENDIF.
    MODIFY grid425-cols INDEX sy-tabix FROM grid_view_row.
  ENDLOOP.

Ну короче где-то так :wink:

ааааа фааак! виз контрол же тьфу ты! вот болван.
спасибо!

Гость

Uukrul написал(а):

Egal написал:

Мне нужно чтобы - по условию - в отдельных записях были закрыты поля, которые по умолчанию открыты для ввода.

В логике экрана пишет что-то типа:

Code:

  LOOP AT i_screen_425 WITH CONTROL grid425 CURSOR ftopix.
    MODULE update_grid425_pbo.
  ENDLOOP.

А в самом модульке, ну у меня там подсвечивались строки с ошибкой:

Code:

  LOOP AT SCREEN.
    IF l_error = true.
      screen-intensified = '1'.
    ELSE.
      screen-intensified = '0'.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

А вот если ты хочешь отдельные колонки таблицы вообще скрыть или показать тогда в PBO-логике вызов модулька делаешь в котором пишешь что-то типа (только в цикле его вызывать не надо):

Code:

DATA: grid_view_row TYPE cxtab_column.

 LOOP AT grid425-cols INTO grid_view_row.
      IF grid_view_row-screen-group1 = 'LFA'.
        grid_view_row-invisible = '1'.
      ELSEIF grid_view_row-screen-group1 = 'PLA'.
        grid_view_row-invisible = '0'.
      ENDIF.
    MODIFY grid425-cols INDEX sy-tabix FROM grid_view_row.
  ENDLOOP.

Ну короче где-то так :wink:

ааааа фааак! виз контрол же тьфу ты! вот болван.
спасибо!

Правила форума

атрибуты SCREEN

Кто сейчас на конференции