Tree list icons

hi apex users,
Edited by: mang jose on Sep 1, 2010 5:20 PM

Welcome to the forum. To get your questions answered quickly and effectively, please
1. Update your profile with a better handle than "792067".
2. Always provide the information requested in the FAQ and forum sticky threads:
- APEX version?
- DB version and edition?
- Web server architecture (EPG, OHS or APEX listener)?
- Browser(s) used?
- Theme?
- Templates?
- Region type
(Creating an example on apex.oracle.com is always helpful)
3. Always post code wrapped in *\...\* tags.

Similar Messages

  • EA 4.0 - Package icon in tree list is not refreshed

    I compiled a package in a sql*plus session without debug but the icon in the package tree lists show me the icon with debug option.
    In the dba_plsql_object_settings there is no debug.

    after changing to the language=en it works properly ....

  • Tree List Value

    Apex4
    datbase 10g EE
    Hello Apex Users,
    how can I get the Value Of a tree list then pass that value to the textfield using Javascript?
    Is that Possible? Hope for a quick response and answer.
    regards,
    jose

    Hi Jose,
    you can use the "LINK" column in the tree query to do that. Have a look at the following example which will write the clicked employee# into P13_EMPNO.
    select case when connect_by_isleaf = 1 then 0
                when level = 1             then 1
                else                           -1
           end as status,
           level,
           "ENAME" as title,
           null as icon,
           "EMPNO" as value,
           "ENAME" as tooltip,
           'javascript:$s("P13_EMPNO",'||EMPNO||');' as link
    from "#OWNER#"."EMP"
    start with "MGR" is null
    connect by prior "EMPNO" = "MGR"
    order siblings by "ENAME"Regards
    Patrick
    My Blog: http://www.inside-oracle-apex.com
    APEX 4.0 Plug-Ins: http://apex.oracle.com/plugins
    Twitter: http://www.twitter.com/patrickwolf

  • Tree List Value - Passing String

    apex4
    database 10g EE
    I have this code which will pass a value to a textfiled but only numbers. How about passing string values in a textfield? Any idea?
    select case when connect_by_isleaf = 1 then 0
                when level = 1             then 1
                else                           -1
           end as status,
           level,
           "ENAME" as title,
           null as icon,
           "EMPNO" as value,
           "ENAME" as tooltip,
           'javascript:$s("P13_EMPNO",'||EMPNO||');' as link
    from "#OWNER#"."EMP"
    start with "MGR" is null
    connect by prior "EMPNO" = "MGR"
    order siblings by "ENAME"

    Hi Jose,
    I believe Patrick already responded to this question on another thread: Tree List Value , where he has stated:
    just use
    'javascript:$s("P13_ENAME","'||ENAME||'");' as link
    instead.
    Regards,
    Hilary

  • Doubt in population of Hirarchical Tree List

    Hai Friends,
    I have Departments like IT,Sales,Market,Accounts in Employee Table.
    I have to populate employee names of all employees department wise in the
    Hirarchical Tree List.
    Initial Hirarchical Tree List
    =============================
    +IT
    +Sales
    +Marketing
    +Acctounts
    When Hirarchical Tree List expands
    ===================================
    - IT
    name1
    name2
    name3
    -Sales
    name1
    name2
    name3
    -Marketting
    name1
    name2
    name3
    -Accounts
    name1
    name2
    name3
    I tried with the code (copied from Forms Help ...) but when i run the form
    I am getting
         FRM-47321 Error(Data used to populate tree is invalid)
    CAN U GIVE CORRECT SOLUTION ..... URGEMT
    i need this population when ever form runs.(when-new-form-instance trigger of form)

    hi madhava,
    see below example:
    1) Start up Form Builder.
    2) Create a form (for example, hiertree).
    3) Create a block manually (for example, block).
    4) Create a canvas and go to the Layout Editor.
    5) Click on the hierarchical tree iconic button and click and drag
    it onto the canvas. This creates a tree item called, for example,
    TREE4.
    6) Create a record group (for example, RECORD_GROUP6) with the
    following code:
    SELECT 1, LEVEL, ENAME, NULL, TO_CHAR(EMPNO)
    FROM EMP
    CONNECT BY PRIOR EMPNO = MGR
    START WITH JOB = 'PRESIDENT'
    7) Go to the property palette of the record group and set the
    property "Record Group Fetch Size" to, for example, 20.
    8) Go to the property palette of the tree item, and select the name
    of the record group under the "Record Group" property.
    9) Go back to the Object Navigator and create a
    WHEN-NEW-BLOCK-INSTANCE trigger with the following code:
    DECLARE
    HTREE ITEM;
    V_IGNORE NUMBER;
    BEGIN
    --TO FIND THE TREE ITSELF.
    HTREE := FIND_ITEM('BLOCK.TREE4');
    V_IGNORE := POPULATE_GROUP('RECORD_GROUP6');
    --TO SET THE RECORD GROUP AND CAUSE THE DATA TO DISPLAY
    FTREE.SET_TREE_PROPERTY(HTREE, FTREE.RECORD_GROUP,
    'RECORD_GROUP6');
    END;
    10) Compile and run the form. Your tree with the information is
    displayed.
    Madhava guess me whom i am?
    good luck

  • Calendar App is missing "list" icon

    After upgrading to IOS 7.1.2 the Calendar App on my iPhone it does not have the "list" icon anymore, but three icons on the top right hand side:  A screen with lines underneath, the magnifying glass and the plus sign. Before upgrade the "screen with lines underneath" used to be a "just lines", and caused an infinite scroll view beginning on the day you tapped. How could I get back this very useful feature?

    Asked and answered here: I did the 7.1.1 update on my iPhone 5s and on my iPad. The calendar on my iphone no longer gives me a list of upcoming/past events. Works okay on my ipad though. Any suggestions on how to get this feature back on my iphone 5s?

  • How do I enable the button to use the tree list in excel? (Enable the list type: Tree enabled in Office 2013 - VSTF 2013)

    Hi, I was looking to see if anyone knows how I can troubleshoot my connection problem with TFS view in excel. I'm trying to  produce a tree view in Office 2013 as described in the following KB -
    https://msdn.microsoft.com/en-us/library/dd286627.aspx
    I have followed the instructions on the KB all the way up to : 'Add backlog items and tasks and their parent-child links using a tree list' and at this point I can't seem to get it to work as the button is greyed out.
    Note that I have completed steps 1-6 for the previous procedure... all 6 steps work just fine. However on step 2 of the second procedure - the instructions state I should be able to 'Add Tree Level' - However the button is greyed out.
    Anyone know what I need to do to enable the button to use the tree list in excel? 
    Frank

    Frank,
    I believe your issue is that you have opened a Flat query and are trying to add tree levels. A flat query is just that and you cannot change the query type from Excel.
    The second process is managing a backlog (which is a tree). TFS web access has a link on the backlog view to create a query. That query will be a "tree of work items" query that returns the items in the backlog including their parent-child relationships.
    This type of query supports the Add Tree Level and Add Child functionality as does a new Input List (not bound to an existing query).
    "You will find a fortune, though it will not be the one you seek." -
    Blind Seer, O Brother Where Art Thou
    Please Mark posts as answers or helpful so that others may find the fortune they seek.

  • Tree with Icons

    hi, i need to hava a tree with icons in apex
    is it possible?

    hi, First of all You have to create table .
    CREATE TABLE "APEX_PAGES"
    (     "IDENTIFIER" NUMBER(10,0) NOT NULL ENABLE,
         "PAGE_NO" NUMBER(10,0) NOT NULL ENABLE,
         "PARENT_PAGE_NO" NUMBER(10,0),
         "NAME" VARCHAR2(4000) NOT NULL ENABLE,
         "NAVIGATION" VARCHAR2(100) NOT NULL ENABLE,
         "IMG" BLOB
         CONSTRAINT "APEX_PAGES_PK" PRIMARY KEY ("IDENTIFIER") ENABLE
    then create form with report on table apex_pages.
    Please note : - P20_IMG is an form item name...
    use following sql query for tree with image :
    select PAGE_NO id,
    PARENT_PAGE_NO pid,
    '<img src="'||*APEX_UTIL.GET_BLOB_FILE_SRC*('*P20_IMG*',IDENTIFIER)||'" />'||NAME name,
    'f?p=&APP_ID.:'||page_no||':&SESSION.' link,
    null a1,
    null a2
    from APEX_PAGES
    Also u can highlight the current node ................
    select PAGE_NO id,
    PARENT_PAGE_NO pid,
    CASE WHEN page_no = :APP_PAGE_ID THEN
    '<img src="'||APEX_UTIL.GET_BLOB_FILE_SRC('P20_IMG',IDENTIFIER)||'" />'
    ||'<b>'||NAME||'<blink>'||'<font color="red">'||' <='||'</font>'||'</blink>'
    ELSE
    '<img src="'||APEX_UTIL.GET_BLOB_FILE_SRC('P20_IMG',IDENTIFIER)||'" />' || NAME END
    AS name,
    'f?p=&APP_ID.:'||page_no||':&SESSION.' link,
    null a1,
    null a2
    from APEX_PAGES
    Cheers !!!!!

  • HT1368 Why doesn't the Add to Wish List icon appear on my iPhone 5? I have iOS 7...frustrating

    Why doesn't the Add to Wish List icon appear on my iPhone 5? I have iOS 7...frustrating

    If it's not a free item then you should get the 'add to wish list' icon via the share button - is it a free or paid-for item that you are looking at ?

  • Drag-and-drop tree list from files/folder

    Hello all. I'm new to Flex and I'm looking for some help or
    for someone to point me in the right direction. I want to write a
    simple AIR application to accept a multiple text files (or a folder
    full of text files) when the files/folder is dragged into a tree
    list. The file/folder name will be the node name. When selected,
    the contents of the file will be displayed in a text area. The text
    file will contain a 4 x 4 number matrix with each column separated
    by a tab and each row separated by a return. (I plan on plotting
    the numbers in the matrix in the future).
    What I'm most confused about is how to go about
    dragging-and-dropping files into a tree list and creating item
    names based on the file/folder name? And does the file content need
    to go into an array collection?
    Maybe I'm going about this in a difficult way. If there is an
    easier way, I'd appreciate it if someone could share. Thank you
    all.

    I have the same problema and I´m not able to find the reason.
    The solution to get the event raised has been to copy configurations from wd standard appl FPM_TEST_DND_FORM and use my own Z feeder class : all  seems to work perfectly , but , if I try to do it from scratch the event  FPM_DROP_COMPLETED it´s not raised .
    I´ve compared both configurations/class ( the one that I´ve done from scratch  that it doesn´t raise the event and the one that I´ve adapted copying from standard that it raises perfectly  the event) and I haven´t  seen any difference (maybe I haven´t found) .

  • User Defined Attributes in Tree List

    Does anyone know what the User Defined Attributes is used for in the tree list (when in Create / Edit List Entry screen)?
    I'm trying to put a title tag on my list entries so I get a tooltip when hovering the mouse over each entry and thought this might be the way to do it.
    If not then User Defined Attributes sounds like it could be useful anyway but I can't find any documentation on what it does.

    Hello Antilles.
    The user defined attributes that you refer to it´s used to specify additional attributes.
    You can find more useful information about this topic in this link: http://download.oracle.com/docs/cd/E14373_01/appdev.32/e11838/nav.htm
    Regards Pedro

  • Tree Lists

    Hi
    Have you implemented Tree Lists in Forms 6.0? The documentation
    is very poor: I've managed to populate a tree with hierarchical
    data, but I can't figure out returning a multiple-selection of
    tree items back to the form.
    Any ideas?
    null

    Julian Taylor (guest) wrote:
    : Hi
    : Have you implemented Tree Lists in Forms 6.0? The
    documentation
    : is very poor: I've managed to populate a tree with hierarchical
    : data, but I can't figure out returning a multiple-selection of
    : tree items back to the form.
    : Any ideas?
    I implemented the tree structure. Doc. is very bad. Demo example
    is very useful. You might get some clue from that.
    null

  • Tree List Error

    I get the following error any time I click on a folder in my
    tree list:
    Error: Unable to load ''.
    at mx.controls::SWFLoader/::loadContent()
    at mx.controls::SWFLoader/load()
    at
    mx.controls::SWFLoader/mx.controls:SWFLoader::commitProperties()
    at mx.core::UIComponent/validateProperties()
    at mx.managers::LayoutManager/::validateProperties()
    at mx.managers::LayoutManager/::doPhasedInstantiation()
    at Function/
    http://adobe.com/AS3/2006/builtin::apply()
    at mx.core::UIComponent/::callLaterDispatcher2()
    at mx.core::UIComponent/::callLaterDispatcher()
    <b>Here's my code:</b>
    <?xml version="1.0" encoding="utf-8"?>
    <mx:Application xmlns:mx="
    http://www.adobe.com/2006/mxml"
    layout="absolute" creationComplete="dirListSvc.send();">
    <mx:Script>
    <![CDATA[
    import mx.controls.Alert;
    import mx.rpc.events.FaultEvent;
    import mx.rpc.events.ResultEvent;
    import flash.net.FileReference;
    private var fileRef:FileReference;
    [Bindable]
    private var dirList:XML;
    [Bindable]
    public var selectedNode:XML;
    //file browse function
    private function fileBrowse():void {
    this.fileRef = new FileReference();
    fileRef.addEventListener(Event.SELECT, selectHandler);
    fileRef.browse();
    private function selectHandler(event:Event):void {
    var request:URLRequest = new URLRequest("
    http://localhost:8300/");
    fileRef.upload(request);
    // Event handler for the Tree control change event.
    public function treeChanged(event:Event):void {
    selectedNode=Tree(event.target).selectedItem as XML;
    private function
    directoryResultHandler(event:ResultEvent):void {
    dirList = event.result as XML;
    // Fault handler - displays the error
    private function
    directoryFaultHandler(event:FaultEvent):void {
    Alert.show(event.fault.message, "Could not load dirList");
    ]]>
    </mx:Script>
    <mx:HTTPService
    id="dirListSvc"
    url="
    http://localhost/iqAssets/scripts/directory.php"
    resultFormat="e4x"
    result="directoryResultHandler(event);"
    fault="directoryFaultHandler(event);"
    />
    <mx:HDividedBox>
    <mx:VBox>
    <mx:Tree x="10" y="10" labelField="@label"
    dataProvider="{dirList}" width="250"
    change="treeChanged(event)"/>
    <mx:Button label="Upload A File"
    click="fileBrowse()"/>
    </mx:VBox>
    <mx:Panel height="300" width="400"
    title="{selectedNode.@label}">
    <mx:Text text="{selectedNode.@path}" />
    <mx:Image source="{selectedNode.@path}" />
    </mx:Panel>
    </mx:HDividedBox>
    </mx:Application>
    And here's my php:
    <?php
    function getDirectory( $path = '.', $level = 0 ){
    $ignore = array( 'cgi-bin', '.', '..' );
    // Directories to ignore when listing output. Many hosts
    // will deny PHP access to the cgi-bin.
    $dh = @opendir( $path );
    // Open the directory to the handle $dh
    while( false !== ( $file = readdir( $dh ) ) ){
    // Loop through the directory
    if( !in_array( $file, $ignore ) ){
    // Check that this file is not to be ignored
    $spaces = str_repeat( ' ', ( $level * 4 ) );
    // Just to add spacing to the list, to better
    // show the directory tree.
    if( is_dir( "$path/$file" ) ){
    // Its a directory, so we need to keep reading down...
    echo '<node label="'.$file.'">';
    getDirectory( "$path/$file", ($level+1) );
    // Re-call this same function but on a new directory.
    // this is what makes function recursive.
    echo '</node>';
    } else {
    $filename = strtolower($file) ;
    $exts = split("[/\\.]", $filename) ;
    $n = count($exts)-1;
    $exts = $exts[$n];
    $imageExt = array ('gif', 'jpg', 'swf', 'png');
    if ( !in_array($exts, $imageExt))
    echo '<node label="'.$file.'" path=""/>';
    else
    $imgPath = substr($path, 1);
    echo '<node label="'.$file.'" path="'."
    http://localhost/iqAssets/scripts$imgPath/$file".'"/>';
    closedir( $dh );
    // Close the directory handle
    echo '<node label="assets">';
    getDirectory( "." );
    echo '</node>';
    ?>

    For what it's worth, I have the exact same error message:
    quote:
    Error: Unable to load ''.
    at mx.controls::SWFLoader/::loadContent()
    at mx.controls::SWFLoader/load()
    at
    mx.controls::SWFLoader/mx.controls:SWFLoader::commitProperties()
    at mx.core::UIComponent/validateProperties()
    at mx.managers::LayoutManager/::validateProperties()
    at mx.managers::LayoutManager/::doPhasedInstantiation()
    at Function/
    http://adobe.com/AS3/2006/builtin::apply()
    at mx.core::UIComponent/::callLaterDispatcher2()
    at mx.core::UIComponent/::callLaterDispatcher()
    Here's my code:
    quote:
    <?xml version="1.0" encoding="utf-8"?>
    <mx:Application xmlns:mx="
    http://www.adobe.com/2006/mxml"
    horizontalAlign="center" verticalAlign="middle"
    creationComplete="photoService.send();" >
    <mx:HTTPService
    id="photoService"
    url="data.xml"
    resultFormat="e4x"
    result="photoResultHandler(event);"
    fault="photoFaultHandler(event);"
    />
    <!-- Controller -->
    <mx:Script>
    <![CDATA[
    import flash.net.navigateToURL;
    import mx.controls.Alert;
    import mx.rpc.events.FaultEvent;
    import mx.rpc.events.ResultEvent;
    [Bindable]
    private var photoFeed:XML;
    private function photoResultHandler(event:ResultEvent):void{
    // Result handler - gets called after xml is loaded.
    //Alert.show("Loaded xml!");
    photoFeed = event.result as XML;
    private function photoFaultHandler(event:FaultEvent):void{
    // Fault handler - if the xml can't be loaded
    Alert.show(event.fault.message, "Could not load photo xml");
    ]]>
    </mx:Script>
    <mx:Panel paddingTop="10" paddingBottom="10"
    paddingLeft="10" paddingRight="10" title="phlex quick pic gallery
    v0.8" fontWeight="bold" horizontalAlign="center" id="container">
    <mx:Tile width="100%" height="100%">
    <mx:Repeater id="photos"
    dataProvider="{photoFeed.pic}">
    <mx:VBox
    xmlns:mx="
    http://www.adobe.com/2006/mxml"
    horizontalAlign="center"
    >
    <mx:Image
    id="currentpic"
    source="{photos.currentItem.attributes.url}"
    />
    <mx:Text text="{photos.currentItem.attributes.title} by
    {photos.currentItem.attributes.author}"/>
    </mx:VBox>
    </mx:Repeater>
    </mx:Tile>
    <mx:ControlBar id="nav" horizontalAlign="center"
    verticalAlign="middle">
    <mx:LinkButton label="previous" id="previous" />
    <mx:Label text="3/18" fontWeight="normal" id="page" />
    <mx:LinkButton label="next" id="next" />
    </mx:ControlBar>
    </mx:Panel>
    </mx:Application>

  • ALV Tree list output using the Class and method

    Hi,
    How to get the internal table values of ALV Tree List in classes.
    My requirement is i need to store the output values in Ztable of a SAP Transaction of CK86_99.
    for this, i copied the SAP Standard Transaction into Z tcode and i am trying to poplulate the output display into Ztable. But this standard tcode CK86_99 is using the classes of ALV tree list to display output.
    CL_STRUCTURE_EXPLOSION_TREE -- Class
    CONSTRUCTOR - method
    Finally in the above mentioned method, i am able to see the output values of ALV tree list in the internal table of mt_output_table.
    But these are SAP Standard Class and method.
    My doubt is, How to get these internal table values in my Zprogram.
    is there any user exit or badi can we use in the method of class???? Actually my system is 4.6C
    Please suggest me on this problem.
    Thanks in advance
    KBS Reddy

    First your getInstance() method returns 'singleton' which you havent declared/init anywhere.
    your getAll() method needs to be static if you need to call it the way you are doing.
    In your getAll() method u are passing a parameter called patientRecord ... where have you declared/init it.
    i think you have to do something like this ... if i have understood you correctly.
    /* THIS IS IN YOUR SERVLET*/
    Collections c = database.getAll();
    out.println(C);
    /* YOUR FlatfileDatabase CLASS HAS SOMETHING LIKE THIS*/
    public static FlatfileDatabase getInstance() {
    return new FlatfileDatabase();
    public static Collections getAll() {

  • Tree list display

    hi,
    i have one problem.
    i have displayed an alv grid.now i want when user select any
    row the corresponding value
    of that particular row should display in tree like structure
    under different heading i.e. under one heading there should be
    some field ,under another heading some other field and so on.
    also with expand node and compress node .
    can u plz provide any sample program.i want it with function module.
    like rs_tree_construct' and others.

    REPORT  ZTEST13 MESSAGE-ID znew .
    TREE HIRRARCHY REPORT **********************
    TABLES : vbak.
    DATA: BEGIN OF mylist OCCURS 50. " Internal table hierarchy
    INCLUDE STRUCTURE snodetext.
    DATA: END OF mylist.
    DATA: f15 TYPE c.
    DATA : BEGIN OF gt_sales OCCURS 0,
            vbeln LIKE vbak-vbeln,
            kunnr LIKE vbak-kunnr,
            matnr LIKE vbap-matnr,
            arktx LIKE vbap-arktx,
            ERNAM LIKE VBAK-ERNAM,
          END OF gt_sales.
    *SELECT-OPTIONS : s_vbeln FOR vbak-vbeln.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 2(20) v_text1 FOR FIELD S_VBELN.
    SELECT-OPTIONS: S_VBELN FOR VBAK-VBELN OBLIGATORY.
    SELECTION-SCREEN END OF LINE.
    INITIALIZATION.
    V_TEXT1 = 'SALES ORDER NO'.
    START-OF-SELECTION.
    SET PF-STATUS 'ZTREE1'.  " create in t-code se41
    SET TITLEBAR 'T1'.
    PERFORM fill_itab.
    PERFORM main.
    FORM fill_itab .
    SELECT vkvbeln vkkunnr VKERNAM vpmatnr vp~arktx INTO CORRESPONDING
    FIELDS OF
          TABLE gt_sales
          FROM ( vbak AS vk INNER JOIN vbap AS vp ON vkvbeln = vpvbeln )
          WHERE vk~vbeln IN s_vbeln.
          SORT gt_sales BY vbeln kunnr.
    mylist-name = 'Report Tree List'.
    mylist-color = 1.
    mylist-intensiv = '1'.
    mylist-text = 'Report Tree List'.
    mylist-tlength = 16.
    mylist-tlevel = 1.
    mylist-tcolor = 1.
    mylist-tintensiv = '1'.
    *mylist-text1 = 'using "RS_TREE_CONSTRUCT" function'.
    mylist-tlength1 = 50.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    LOOP AT gt_sales.
    ON CHANGE OF gt_sales-vbeln.
    mylist-name = 'level1'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    mylist-text = 'Sales Document no:'.
    mylist-tlength = 20.
    mylist-tlevel = 2.
    mylist-tcolor = 7.
    mylist-tintensiv = '1'.
    mylist-text1 = gt_sales-vbeln.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    ENDON.
    ON CHANGE OF gt_sales-kunnr.
    mylist-name = 'level2'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    mylist-text = 'Customer no:'.
    mylist-tlength = 20.
    mylist-tlevel = 3.
    mylist-tcolor = 5.
    mylist-tintensiv = '1'.
    mylist-text1 = gt_sales-kunnr.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 3.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    ENDON.
    mylist-name = 'level3'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    *mylist-text = gt_sales-matnr.
    mylist-tlength = 15.
    mylist-tlevel = 4.
    mylist-tcolor = 4.
    mylist-tintensiv = '0'.
    mylist-text1 = gt_sales-arktx.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    MYLIST-COLOR = 2.
    MYLIST-INTENSIV = '0'.
    MYLIST-TEXT = GT_SALES-ERNAM.
    MYLIST-TLENGTH = 20.
    *MYLIST-TLEVEL = 4.
    APPEND mylist.
    *MYLIST-NAME = 'LEVEL4'.
    *MYLIST-COLOR = 2.
    *MYLIST-INTENSIV = '0'.
    *MYLIST-TEXT = GT_SALES-ERNAM.
    *MYLIST-TLENGTH = 20.
    *MYLIST-TLEVEL = 4.
    *APPEND MYLIST.
    ENDLOOP.
    ENDFORM. " FILL_ITAB
    FORM main .
    PERFORM hierarchy. " construct & draw the tree
    ENDFORM. " MAIN
    FORM hierarchy .
    PERFORM build_tree.
    PERFORM draw_tree.
    ENDFORM. " HIERARCHY
    FORM BUILD_TREE *
    FORM build_tree.
    CALL FUNCTION 'RS_TREE_CONSTRUCT'
    TABLES
    nodetab = mylist
    EXCEPTIONS
    tree_failure = 1.
    ENDFORM. "build_tree
    FORM DRAW_TREE *
    FORM draw_tree.
    sy-lsind = 0.
    CALL FUNCTION 'RS_TREE_LIST_DISPLAY'
    EXPORTING
    callback_program = 'Ztest13'
    callback_user_command = 'NODE_SELECT'
    *(001)
    IMPORTING
    f15 = f15.
    ENDFORM. "draw_tree

Maybe you are looking for