Как создать дерево

EHOT

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

Разобрался.
Надо было вместо PICK повесить TRSL.
А вот двойной щелчек по самому названию как обработать? (надо его редактировать просто)

чет малость не понял вопроса ... ты вот в вызове функции указал, что мол callback_user_command = 'USER_COMMAND', вот тебе надо создать форму с названием USER_COMMAND:

Code:

data: current_node like snodetext.
...
...
FORM USER_COMMAND 
                         TABLES SELECTED_NODES STRUCTURE  SEUCOMM
                         USING COMMAND
                         CHANGING EXIT
                         LIST_REFRESH.
CASE COMMAND.
WHEN 'TRSL'.
    CALL FUNCTION 'RS_TREE_GET_CURRENT_NODE' " определяем   
    IMPORTING NODE_INFO = CURRENT_NODE. "уровень, по которому даблклик

    IF CURRENT_NODE-TYPE = 'DOC'.   " если уровень DOC, то делаем то-то
    ...
    ELSEIF CURRENT_NODE-TYPE = 'OBOR'. " если OBOR, то другое
    ...
    ENDIF.
ENDCASE.
ENDFORM.

Snegurenok

МОЖНО еще раз задать вопрос ?

Чем вас не устравают стандартные наборы ?

rodendron

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

EHOT

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

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

ну так что, получилось ? все что хотел ?

rodendron

50 на 50 только
потому что все же 100 % стандартную программу как инклуд не используешь...
а жаль.
Ладно, будем стараться.
Кое-что вышло.
И все благодаря вам.
Спасибо огромное.

rodendron

Еще нужна помощь.
Помогите пожалуйста разобраться.

Ставлю обратную форму USER_COMMAND
Как и сказали, создал такую форму.
FORM USER_COMMAND...

Но на любые действия все равно если смотреть в отладчике проваливаюсь в стандартный саповский инклуд, а не мою форму.
В чем может быть проблема?

Сергей Королев

А имя главной программы не забыл указать? Параметр CALLBACK_PROGRAM.

rodendron

CALLBACK_PROGRAM указал. Только вот неправильно указал. Программа называется Y17AA_TMP, а я написал Y17AA_TEMP...
Вот такая "машинальная" ошибка. Сейчас попробую исправить. Должно значит работать

)

rodendron

Неа, не заходит в мои форму...
Что может быть?

rodendron

Он даже статус не подтягивает (
В плане когда его в функции объявлешь.
Если в старт оф селекшн перед вызовом функции, то все ок. А если там закомментировать, то в самой функции - нет.

EHOT

Code:

START-OF-SELECTION.
SET PF-STATUS 'MAIN'. " в нем у меня только TREP, TRCM и TRSL

Code:

  CALL FUNCTION 'RS_TREE_CONSTRUCT'
       TABLES
            NODETAB            = P_IT_TREE      "таблица с деревом
       EXCEPTIONS
            TREE_FAILURE       = 1
            ID_NOT_FOUND       = 2
            WRONG_RELATIONSHIP = 3
            OTHERS             = 4.

  CALL FUNCTION 'RS_TREE_LIST_DISPLAY'
       EXPORTING
            CALLBACK_PROGRAM      = 'Y94_DOCPOSTREP'  "имя проги БОЛЬШИМИ БУКВАМИ
            CALLBACK_USER_COMMAND = 'USER_COMMAND'  "имя формы БОЛЬШИМИ БУКВАМИ
            STATUS                = 'OWN'  " мож это и не надо, но у меня стоит OWN ))) хотя работает статус MAIN
       EXCEPTIONS
            OTHERS                = 1.

Code:

FORM USER_COMMAND TABLES SELECTED_NODES STRUCTURE SEUCOMM
                         USING COMMAND
                         CHANGING EXIT
                         LIST_REFRESH.   " в определении формы можешь ничего не менять
CASE COMMAND.
WHEN 'TRSL'.
    CALL FUNCTION 'RS_TREE_GET_CURRENT_NODE'
     IMPORTING NODE_INFO = CURRENT_NODE.
    IF CURRENT_NODE-TYPE = 'DOC'.
      *проваливаемся туда-то
    ELSEIF CURRENT_NODE-TYPE = 'OBOR'.
      *проваливаемся туда-то
    ENDIF.

ENDCASE.
ENDFORM.

[/code]

rodendron

А ты в статусе MAIN стандартную зашитую функцию PICK не на что не менял?
А то если я там ставлю TRSL, то тогда у меня деревья по нажатию плюсика разворачиваются.
Ставлю если USER_COMM, то он заходит в форму USER_COMM, с sy-subrc = USER_COMM и command = USER_COMM

А с PICK не работает вообще ничего.
Чего-то не могу разобраться

rodendron

Помогите пожалуйста...

На днях судный день, завтра-послезавтра...
Или пример кто скиньте.
Может со статус что не так....

rodendron

Все заработало.
Форма пришлось назвать почему-ито handle_user_command, a не user_command. И тогда все заработало. Незнаю почему так... Но главное догадался

Теперь еще есть вопрос, после того как я передаю эту таблицу (it_tree) в функцию построения дерева - оно соответственно строится. Но сжатым.
Мне нужно поработать с открытым(развернутом ранее мною в определенных местах) деревом, внести соответствующие изменения, и при этом перезапустить прогармму построения дерева (submit ....), и чтобы у меня оно выдалось вновь развернутом на том же месте.

Заранее пасиб.

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

Как создать дерево

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