ABAP WebDynpro Recursive Tree Action

[former_member192022]

I build a Recursive Tree.

When click on a treenode, all context in this view be initialized automaticly except the tree's context. Why?

Does it a bug of ABAP WebDynpro?

supply function:

DATA:

NODE_DPTTREE TYPE IF_ZV_DPT_SET=>ELEMENTS_DPTTREE.

DATA:

DPT_PARENT_NODE TYPE REF TO IF_WD_CONTEXT_NODE,

DPT_PARENT_NODE_INFO TYPE REF TO IF_WD_CONTEXT_NODE_INFO,

DPT_VALUE TYPE STRING.

DPT_PARENT_NODE = PARENT_ELEMENT->GET_NODE( ).

DPT_PARENT_NODE_INFO = DPT_PARENT_NODE->GET_NODE_INFO( ).

IF DPT_PARENT_NODE_INFO->GET_NAME( ) = 'DPTTREE'.

PARENT_ELEMENT->GET_ATTRIBUTE(

EXPORTING NAME = 'TEXT'

IMPORTING VALUE = DPT_VALUE ).

ENDIF.

SELECT DPTCODE AS TEXT FROM ZTAB_DEPT

INTO CORRESPONDING FIELDS OF TABLE NODE_DPTTREE

WHERE DPTCODEP = DPT_VALUE

AND DELFLG <> 'X'.

• NODE_DPTTREE TYPE REF TO IF_WD_CONTEXT_NODE,

DATA:

STRU_DPTTREE TYPE IF_ZV_DPT_SET=>ELEMENT_DPTTREE .

LOOP AT NODE_DPTTREE INTO STRU_DPTTREE.

STRU_DPTTREE-EXPAND = 'X'.

MODIFY NODE_DPTTREE FROM STRU_DPTTREE.

ENDLOOP.

NODE->BIND_ELEMENTS( NODE_DPTTREE ).

treenode action:

.....

SELECT SINGLE COMCODE DPTCODE DPTDESC PERSON CREDATE DPTCODEP

FROM ZTAB_DEPT

INTO CORRESPONDING FIELDS OF STRU_NODE_DEPT

WHERE DPTCODE = ITEM_DPT.

stru_node_dept-credate = sy-datum.

• ????STRU_NODE_DEPT ??Context NODE_DEPT

DATA:

NODE_NODE_DEPT1 TYPE REF TO IF_WD_CONTEXT_NODE,

ELEM_NODE_DEPT1 TYPE REF TO IF_WD_CONTEXT_ELEMENT,

STRU_NODE_DEPT1 TYPE IF_ZV_DPT_SET=>ELEMENT_NODE_DEPT .

• navigate from <CONTEXT> to <NODE_DEPT> via lead selection

NODE_NODE_DEPT1 = WD_CONTEXT->GET_CHILD_NODE( NAME = IF_ZV_DPT_SET=>WDCTX_NODE_DEPT ).

• get element via lead selection

ELEM_NODE_DEPT1 = NODE_NODE_DEPT1->GET_ELEMENT( ).

ELEM_NODE_DEPT1->set_STATIC_ATTRIBUTES(

• IMPORTING

STATIC_ATTRIBUTES = STRU_NODE_DEPT ).

[former_member192022]

use tabletree.