Диалог ведения диапазонов
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
DATA: lt_carrid TYPE RANGE OF s_carrid. CALL FUNCTION 'COMPLEX_SELECTIONS_DIALOG' EXPORTING title = 'Заголовок' text = 'Номер материала' TABLES range = lt_carrid EXCEPTIONS no_range_tab = 1 cancelled = 2 internal_error = 3 invalid_fieldname = 4 OTHERS = 5. IF sy-subrc = 0. cl_demo_output=>display( lt_carrid ). ENDIF. |
Или так:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
DATA(lv_tab_field) = VALUE rstabfield( tablename = 'SCARR' fieldname = 'CARRID' ). DATA: rg_test TYPE RANGE OF scarr-carrid. CALL FUNCTION 'COMPLEX_SELECTIONS_DIALOG' EXPORTING title = 'Заголовок' text = 'Номер авиакомпании' tab_and_field = lv_tab_field help_field = 'SCARR-CARRID' TABLES range = rg_test EXCEPTIONS no_range_tab = 1 cancelled = 2 internal_error = 3 invalid_fieldname = 4 OTHERS = 5. IF sy-subrc = 0. cl_demo_output=>display( rg_test ). ENDIF. |
Результат:
