Как сделать поля экрана только для чтения?

VID

В принципе это делается с помощью loop at screen и screen-input = 1. Но у меня поля, которые надо деактивировать, находятся в подэкране, к тому же их несколько. Как быть в этом случае? Т.к. цикл пробегает только по полям главного экрана.

Art386

VID написал:

В принципе это делается с помощью loop at screen и screen-input = 1. Но у меня поля, которые надо деактивировать, находятся в подэкране, к тому же их несколько. Как быть в этом случае? Т.к. цикл пробегает только по полям главного экрана.

Создайте PBO-модуль у ПОДЭКРАНА, и в нем делайте LOOP AT SCREEN...

VID

Дело в том, что подэкран генерится сам по себе, т.е. он описан только в selection-screen. Если делать какие либо изменения в логике, то система кричит, что это будет бездейственно, что подтверждается и на практике...

Сашок

Если selection то можно так

Code:

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF SCREEN-NAME eq 
      .......
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

Art386

VID написал:

В принципе это делается с помощью loop at screen и screen-input = 1. Но у меня поля, которые надо деактивировать, находятся в подэкране, к тому же их несколько. Как быть в этом случае? Т.к. цикл пробегает только по полям главного экрана.

у вас что ли TABBED BLOCK описан? а подэкран на нем через

Code:

SELECTION-SCREEN BEGIN OF SCREEN 999 AS SUBSCREEN.

?

ну тогда, как указали выше:

Code:

AT SELECTION-SCREEN OUTPUT. 
 
 CHECK sy-dynnr = 999. 
 LOOP AT SCREEN. 
    IF SCREEN-NAME eq 
      ....... 
      MODIFY SCREEN. 
    ENDIF. 
  ENDLOOP.

Если у вас действительно TABBED BLOCK, то данное событие для подэкрана вызовется при переходе на соотв. закладку.
Если у нас только сел. экран и подэкраны на закладках, то при переходе на закладку обработка события AT SELECTION-SCREEN OUTPUT вызовется как минимум два раза...
один раз sy-dynnr = 1000 будет, второй раз sy-dynnr = 999

VID

Спасибо огромное!!! Счас буду делать!!!

З.Ы. у меня без блока сделано, по-простому)

Art386

VID написал:

Спасибо огромное!!! Счас буду делать!!!

З.Ы. у меня без блока сделано, по-простому)

а как конкретно?
и вообще, получилось что-то?

VID

Прописал в at selection-screen output проверку по номерам нужных подэкранов и присвоил всем полям input = 0. Все работает как надо. Теперь правда проблема, как для вручную созданного экрана это сделать. at selection-screen output для него не отрабатывается. Тут говорили, что надо в PBO это делать, только вот как... Просто имя_поля-input = 0 не катит.

VID

упс, прочитал внимательнее посты выше и появилась идея, счас проверю

VID

Все получилось)) Всем спасибо :pivo:

Для тех, кому может это тоже интересно, выкладываю код.

Для случая, когда экран/подэкран создан вручную:

Code:

MODULE status_9010 OUTPUT.
  LOOP AT SCREEN.
    IF screen-name = 'GV_SAVE_PROG'.
      screen-input = 0.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.
ENDMODULE.

Для случая с экраном/подэкраном, описаным с помощью selection-screen:

Code:

AT SELECTION-SCREEN OUTPUT.

  IF sy-dynnr BETWEEN 9001 AND 9006.
    LOOP AT SCREEN.
      screen-input = 0. "тут можно добавить проверку по screen-name
      MODIFY SCREEN.
    ENDLOOP.
  ENDIF.

Art386

не понял, каким образом вы описали подэкран на селекционном экране, меня вот что интересует

VID

Code:

SELECTION-SCREEN BEGIN OF SCREEN 9001 AS SUBSCREEN.
PARAMETERS: ... .

SELECT-OPTIONS: ... .
SELECTION-SCREEN END OF SCREEN 9001.

может я что-то не тем словом назвал, если так, то сорри, поправьте))

Art386

VID написал:

Code:

SELECTION-SCREEN BEGIN OF SCREEN 9001 AS SUBSCREEN.
PARAMETERS: ... .

SELECT-OPTIONS: ... .
SELECTION-SCREEN END OF SCREEN 9001.

может я что-то не тем словом назвал, если так, то сорри, поправьте))

это я понял...

где потом используется этот подэкран? на обычном через CALL SUBSCREEN INCLUDING ?

VID

Именно

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

Как сделать поля экрана только для чтения?

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