birds написал(а):
В транзакции Ksh2 редактируется Группа МВЗ. На первом экране вызывается какое-то средство поиска по группам (очень бы хотелось знать какое)
Code:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_kostl.
PERFORM f_sh_id USING 'P_KOSTL' '101' 'KOSTL' p_kostl.
Code:
*&---------------------------------------------------------------------*
*& Form f_sh_kostl
*&---------------------------------------------------------------------*
* SH for Kostl
*----------------------------------------------------------------------*
FORM f_sh_id USING value(p_name) TYPE any
value(p_class) TYPE any
value(p_field) TYPE any
p_sname TYPE c
.
l_dyname = sy-repid.
l_dynumb = '1000'.
CLEAR l_dynpfields.
MOVE p_name TO l_dynpfields-fieldname.
APPEND l_dynpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = l_dyname
dynumb = l_dynumb
TABLES
dynpfields = l_dynpfields.
READ TABLE l_dynpfields WITH KEY fieldname = p_name.
CHECK l_dynpfields-fieldinp = 'X'.
CALL FUNCTION 'K_GROUP_SELECT'
EXPORTING
class = p_class
field_name = p_field
table = 'CCSS '
kokrs = kokrs
IMPORTING
* setid = set_kostl
set_name = p_sname
EXCEPTIONS
no_set_picked = 02.
CASE sy-subrc.
WHEN 1. MESSAGE s003(gr).
WHEN 2. MESSAGE s004(gr).
ENDCASE.
ENDFORM. "f_sh_kostl
birds написал(а):
и считываются группы вместе с их описанием (не могу найти откуда берутся описания, ровно как и сами группы) и далее наверное есть функция чтения наборов данных со всеми элементами.
прошу прощения за вопрос с таким количеством неизвестных
Группы, динамические группыЛюди в какой таблице закопано поле Группа МВЗ
Вход
Регистрация
FAQ пользователя
Поиск
