Блокировка поля ввода

Vadim

Добрый день!!!
Подскажите, вот такая ситуация...
На экране одно поле ЗАЯВКА(banfn)... При нажатии кнопки ENTER проверяется, есть ли такая заявка в системе, если ее нет, то выдается сообщение об ошибке.. Но при этом блокируется поле на ввод...
Как сделать так, чтобы при ошибке поле не блокировалось, а позволяло исправить значение... Ниже привожу свой код.

DATA: l_wa_eban TYPE eban.
SELECT SINGLE *
FROM eban
INTO l_wa_eban
WHERE banfn = zmm_s_payment_s2000_cd-banfn.
IF sy-subrc <> 0.
MESSAGE e007 WITH zmm_s_payment_s2000_cd-banfn.
ENDIF.

John Doe

Тип сообщения любой другой сделайте.

Vadim

Это можно, но все-таки надо выдать как ошибку... Тем более в стандарте такие ситуации есть и отрабатывают нормально, т.е. дают ввести верную информацию... Тем более программа дальше будет отрабатывать

N/A

а если так
message S100 .... DISPLAY LIKE 'E'

Vadim

Все равно проваливаюсь на следующий экран

John Doe

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

Тем более программа дальше будет отрабатывать

Так не давайте - это же собственная программа...

sibrin

Проверки нужно делать в модулях, вызываемых из экранной логики.

Code:

field zmm_s_payment_s2000_cd-banfn module check_banfn.

Kahaber

N/A написал(а):

а если так
message S100 .... DISPLAY LIKE 'E'

плюс EXIT.
Тоесть: message S100 .... DISPLAY LIKE 'E'. EXIT.

KOVAL

а экран какой?
сгенеренный или свой?

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

Блокировка поля ввода

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