Anzeigen einer Hierarchie

Code: Alles auswählen.

DATA:                                                      
  name(30),                                                
  root_id LIKE snode-id,                                   
  new_id LIKE snode-id.                                    
                                                           
CALL FUNCTION 'RS_TREE_CREATE'                             
     EXPORTING root_name = 'Root'                          
     IMPORTING root_id   = root_id.                        
DO 10 TIMES.                                               
  new_id = sy-index.                                       
  WRITE sy-index TO name LEFT-JUSTIFIED.                   
  CONCATENATE 'Eintrag' name INTO name SEPARATED BY space. 
  CALL FUNCTION 'RS_TREE_ADD_NODE'                         
       EXPORTING   new_name     = name                     
                   insert_id    = root_id                  
                   relationship = 'CHILD'                  
       EXCEPTIONS  OTHERS       = 2.                       
ENDDO.                                                     
                                                           
CALL FUNCTION 'RS_TREE_LIST_DISPLAY'.                      

Code: Alles auswählen.

CALL FUNCTION 'GRAPH_HIERARCHY' ...