var url = "";

function menu(i,p,n,c,h,o)
{
  this.id = i;
  this.parent = p;
  this.name = n;
  this.cname = c;
  if (h.indexOf("contents.asp") == -1)
  {
    if ((h != '#') && (h.indexOf('http') == -1) )
      this.href = url + h; 
    else
      this.href = h; 
  }
  else
    this.href = h; 

  this.opt = o;
  return(this);
} var wasopen;

var menus = new Array();

menus[0] = new menu(27,0,'Home','Style','/index.htm','c','95','20','','');
menus[1] = new menu(8,0,'Managing our responsibilities','Style','/management/management.htm','c','95','40','','');
menus[2] = new menu(10,0,'Workplace','Style','/workplace/workplace.htm','c','75','20','','');
menus[3] = new menu(11,0,'Marketplace','Style','/marketplace/marketplace.htm','c','75','20','','');
menus[4] = new menu(32,0,'Communities & environment','Style','/com_env/com_env.htm','c','75','40','','');
menus[5] = new menu(36,0,'Stakeholders','Style','/stakeholders/stakeholders.htm','c','75','40','','');
menus[6] = new menu(28,0,'Contact us','Style','/contact/contact.htm','c','75','40','','');
menus[7] = new menu(59,0,'Feedback','Style','/contact/feedback.htm','c','75','40','','');
menus[8] = new menu(15,8,'Business ethics','Style-sub_off','/management/business_ethics.htm','c','75','15','','');
menus[9] = new menu(18,8,'Statutory duties','Style-sub_off','/management/ourstatutoryduties.htm','c','75','15','','');
menus[10] = new menu(19,8,'Port development','Style-sub_off','/management/portdevelopment.htm','c','75','15','','');
menus[11] = new menu(20,8,'Management of CSR','Style-sub_off','/management/managementofcsr.htm','c','75','15','','');
menus[12] = new menu(22,10,'Health & safety','Style-sub_off','/workplace/healthsafety.htm','c','75','100','','');
menus[13] = new menu(23,10,'Employees','Style-sub_off','/workplace/employees.htm','c','75','100','','');
menus[14] = new menu(25,11,'Customers','Style-sub_off','/marketplace/customers.htm','c','75','100','','');
menus[15] = new menu(26,11,'Suppliers','Style-sub_off','/marketplace/suppliers.htm','c','75','100','','');
menus[16] = new menu(48,22,'Policy & aims','Style-subsub_off','/workplace/healthsafety/policy.htm','c','75','100','','');
menus[17] = new menu(50,22,'Management procedures','Style-subsub_off','/workplace/healthsafety/mg_procedures.htm','c','75','100','','');
menus[18] = new menu(49,22,'Performance 2006','Style-subsub_off','/workplace/healthsafety/perf_04.htm','c','75','100','','');
menus[19] = new menu(52,23,'Policy & aims','Style-subsub_off','/workplace/employees/policy.htm','c','75','100','','');
menus[20] = new menu(53,23,'Management principles','Style-subsub_off','/workplace/employees/mg_principles.htm','c','75','100','','');
menus[21] = new menu(54,23,'Performance 2006','Style-subsub_off','/workplace/employees/perf2004.htm','c','75','100','','');
menus[22] = new menu(62,25,'Policy & aims','Style-subsub_off','/marketplace/customers/policy.htm','c','75','100','','');
menus[23] = new menu(63,25,'Performance 2006','Style-subsub_off','/marketplace/customers/perf_04.htm','c','75','100','','');
menus[24] = new menu(64,26,'Policy & aims','Style-subsub_off','/marketplace/suppliers/policy.htm','c','75','100','','');
menus[25] = new menu(65,26,'Performance 2006','Style-subsub_off','/marketplace/suppliers/perf_04.htm','c','75','100','','');
menus[26] = new menu(33,32,'Communities','Style-sub_off','/com_env/communities.htm','c','75','40','','');
menus[27] = new menu(35,32,'Environment','Style-sub_off','/com_env/environment.htm','c','75','40','','');
menus[28] = new menu(44,33,'Policy & aims','Style-subsub_off','/com_env/communities/policy.htm','c','75','40','','');
menus[29] = new menu(55,33,'Performance 2006','Style-subsub_off','/com_env/communities/performance2004.htm','c','75','40','','');
menus[30] = new menu(56,35,'Policy & aims','Style-subsub_off','/com_env/environment/policy.htm','c','75','40','','');
menus[31] = new menu(57,35,'Performance 2006','Style-subsub_off','/com_env/environment/performance2004.htm','c','75','40','','');
menus[32] = new menu(37,36,'Health & safety','Style-sub_off','/workplace/healthsafety.htm','c','75','40','','');
menus[33] = new menu(38,36,'Employees','Style-sub_off','/workplace/employees.htm','c','75','40','','');
menus[34] = new menu(39,36,'Shareholders & lenders','Style-sub_off','/marketplace/shareholders_lenders.htm','c','75','40','','');
menus[35] = new menu(40,36,'Customers','Style-sub_off','/marketplace/customers.htm','c','75','40','','');
menus[36] = new menu(41,36,'Suppliers','Style-sub_off','/marketplace/suppliers.htm','c','75','40','','');
menus[37] = new menu(42,36,'Communities','Style-sub_off','/com_env/communities.htm','c','75','40','','');
menus[38] = new menu(43,36,'Environment','Style-sub_off','/com_env/environment.htm','c','75','40','','');



var opened = '';
var toopen = 0;

function DrawMenuItems(l)
{
var html='';;
var i,j;
var f;

  f = 0;
  
  for (i = 0; i < menus.length; i ++)
    {
  	if (menus[i].parent == l)
      {
      f = 1;
      
      if (menus[i].parent == 0)
        {
        html += '<div class=default-td>';
	    }
      else
        {
        html += '<div class="default-submenu-td">';
  	    }
      
      if (menus[i].opt == 'n'){
        html += "<a target='newbrowser' class='" + menus[i].cname + "' href='" + menus[i].href + "' onclick='DrawMenu(" + menus[i].id + ");'>" + menus[i].name + "</a>";
        }
	  else 
	    {

	    html += "<a class='" + menus[i].cname + "' href='" + menus[i].href + "' onclick='DrawMenu(" + menus[i].id + ");'>" + menus[i].name + "</a>";
        }
	  
	  if (opened.indexOf(' ' + menus[i].id + ' ') != -1) html += DrawMenuItems(menus[i].id);
        html += "</div>";
        }
    }
  //html += "</div>";
   //html += "</div>";
  if (f == 0)
    return("");
  else
    return(html);
}

function HasChildren(x)
{
var i;

  for (i = 0; i < menus.length; i ++)
    if (menus[i].parent = x) return(true);
    
  return (false);
}

function GetParentSubscript(x)
{
var i;

  for (i = 0; i < menus.length; i ++)
        
	if (menus[i].id == x) return(i);
    
  return(-1);
}

function strtolower(s)
{
var t;

  t = s;
  
  while (t.indexOf(" ") != -1){
    t = t.replace(" ", "");

  }  

  return(t.toLowerCase());
}

function DrawMenu(l)
{
var m = MM_findObj("menux");
var pos;
var apos;
var i;
var searchString;
var url='nowhere';
  
  if (l != 0)
    {
    var p;
    p = l;
    
    if (opened.indexOf(' ' + l + ' ') == -1)
      opened = ' ' + l + ' ';
    else
      opened = '';
    
    while (GetParentSubscript(p) != -1)
      {
      j = GetParentSubscript(p);
      opened = menus[j].parent + ' ' + opened;
      p = menus[j].parent;
      }
    }
  else 
    {
    opened = '';
    }
  
  m.innerHTML = DrawMenuItems(0);
}

toopen = 0;
pos = document.location.href;
i = pos.indexOf('www');
if (i > 0) pos = pos.substring(i, pos.length);
i = pos.indexOf('/');
if (i > 0) pos = pos.substring(i, pos.length);

if (pos.indexOf('contents.asp') > 0)
  {
  i = pos.indexOf('contents.asp');
  pos = pos.substring(i, pos.length);
  }

var dirs = pos.split("/");
var searchVal;
var matchToVal;
var foundMatching = false;
var inString;

for (i = menus.length-1; i > -1; i --) 
  {
  foundMatching = false;
  searchString = strtolower(menus[i].href); 
  if (pos.indexOf(searchString) >= 0)
    {
	toopen = menus[i].id;
	break;
	}
  } 

DrawMenu(toopen);