Implicit Enhancement Points

superbizon

Добрый день всем!

Пытаюсь поюзать Implicit Enhancement Points следующим образом

Code:

FORM check_quot_start
  USING
    value(is_header)   TYPE  bbps_quot_ui_header
  CHANGING
    cv_open_checklist         TYPE  xfeld
    cv_quot_start_not_reached TYPE  xfeld.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1 ) FORM CHECK_QUOT_START, Начало                                                                                                                D
*$*$-Start: (1 )--------------------------------------------------------------------------------$*$*
ENHANCEMENT 1  ZSRM_CHECK_QUOT_START.    "active version
*
if is_header-zzsrm_2step = ' '.

ENDENHANCEMENT.
*$*$-End:   (1 )--------------------------------------------------------------------------------$*$*

....
" здесь стандартный код
....
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(2 ) FORM CHECK_QUOT_START, Выход                                                                                                                 D
*$*$-Start: (2 )--------------------------------------------------------------------------------$*$*
ENHANCEMENT 2  ZSRM_CHECK_QUOT_START.    "active version
*
endif.

ENDENHANCEMENT.
*$*$-End:   (2 )--------------------------------------------------------------------------------$*$*
ENDFORM.                    " check_quot_start

т.е. хочу, чтобы подпрограмма отрабатывала по установленному мной условию.
При попытке акитвировать появляется ошибка:

Цитата:

In the coding for a non-static enhancement and for a non-static
ENHANCEMENT-SECTION, the control structures (IF, CASE) must be closed.

Если смотрю расширение ч/з se80, то вижу, что оно действительно "non-static", т.е. dynamic.
Собсно, вопросы:
1. Как изменить тип расширения на static? Или тип предопределен?
2. Возможно ли вообще реализовать подобную затею (разнести if и endif в начало и конец подпрограммы)?

ghost

может лучше check использовать , если вам нужно чтобы вся форма отрабатывалась только при вашем условии ?

superbizon написала:

2. Возможно ли вообще реализовать подобную затею (разнести if и endif в начало и конец подпрограммы)?

нет

Code:

ENHANCEMENT id. 
  ... 
ENDENHANCEMENT. 



Effect 
: These statements define a source code plug-in with the ID id. Between the statements, a source code enhancement can be implemented. The control structures and processing blocks contained in the implementation must be complete.

superbizon

check не срабатывает

ghost

хмм странно, кажись должно работать

ну тогда как другой вариант

Code:

ENHANCEMENT 1  ZSRM_CHECK_QUOT_START.    "active version
*
if is_header-zzsrm_2step <> ' '.
  return.
endif.
ENDENHANCEMENT.

superbizon

ghost, с return - сработало, спасибо

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

Implicit Enhancement Points

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