function CreateProjectExplorer()
{
    Initialise();
    // Build a test tree
    PassAjaxResponseToFunction("show_regatta.aspx?REQ=02","REQ02_callback");
    return;
}

function REQ02_callback(response)
{
    var obj = document.getElementById("main")
    if(response.indexOf(";") == -1)
    {
        obj.innerHTML = response;
        return;
    }

    obj.innerHTML = '<h1 align="center">Ready for your selection</h1>';    
	var data = response.split(';');
	var last_year = "";
	var parent_yr = null;
	var parent_yr_id = "";
	var parent_regatta = null;
	var parent_regatta_id = "";
	var last_cmd = "";
	
    tag = 1;	
	for(var i=0; i<data.length; i++)
	{
	    if(data[i].length < 5)
	        break;	
	    var line = data[i].split('|');	        
	    var yr = line[0];
	    var regatta = line[1];
	    var date_of_regatta = line[2];
	    var name = line[3];
	    var count = line[4];
        
        if(yr != last_year)
        {
            parent_yr = CreateTreeItem(rootCell,"treeimg/folder_closed.gif",
                        "treeimg/folder_open.gif",yr,null,null,1);
            parent_yr_id = parent_yr.getAttribute("id");                                               
        }
        last_year = yr;
        parent_regatta = CreateTreeItem(parent_yr,"treeimg/folder_closed.gif",
                        "treeimg/folder_open.gif",name,null,null,1);
        parent_regatta_id = parent_regatta.getAttribute("id");                
        CreateTreeItem(parent_regatta,"treeimg/summary16x16.gif",
                        "treeimg/summary16x16.gif","Summary",
                        "javascript:ShowSummary("+regatta+")",null,0);
        for(var j=0; j<count; j++)
        {                        
            CreateTreeItem(parent_regatta,"treeimg/flag16x16.gif",
                        "treeimg/flag16x16.gif","R"+eval(j+1),
                        "javascript:ShowDetail("+regatta+","+eval(j+1)+")",null,0);
            if(j == 0)
            {
                last_cmd = "ShowDetail("+regatta+","+eval(j+1)+");";
            }                        
        }
	}
	
	Toggle(parent_yr_id.substring(1));
	Toggle(parent_regatta_id.substring(1));	    
	eval(last_cmd);
}

function ShowSummary(regatta)
{
    SetInnerHTMLFromAjaxResponse("show_regatta.aspx?REQ=03&REGATTA="+regatta,"main");
}


function ShowDetail(regatta,race)
{
    SetInnerHTMLFromAjaxResponse("show_regatta.aspx?REQ=04&REGATTA="+regatta+"&RACE="+race,"main");
}