Отлавливание события (Enter) на селективном экране

Ниже привожу код который позволяет отловить событие (Enter) на селективном экране.

Привожу пример,после ввода номера дебитора в поле, нажав enter мы получим его полное наименование в тексте справа от поля.

event_enter.png

  1. REPORT Z_TST.
  2. KNA1.
  3.  
  4. SELECTION-SCREEN BEGIN OF LINE.
  5. SELECTION-SCREEN COMMENT (33) deb_lbl."Обьявляем переменную для названия поля
  6.  
  7. kunnr LIKE kblp-kunnr."Обьявляем поле ввода
  8.  
  9. SELECTION-SCREEN COMMENT (33) deb_name. "Обьявляем переменную для подсказки
  10.  
  11. SELECTION-SCREEN END OF LINE.
  12.  
  13.  
  14. AT SELECTION-SCREEN OUTPUT.
  15.  
  16. SELECT SINGLE * FROM kna1 WHERE kunnr EQ kunnr.
  17. IF kna1-name1 <> ''.
  18. deb_name = kna1-name1.
  19. deb_name = ''.
  20.  
  21. deb_lbl = 'Дебитор'.

Комментарии