function Highlight(oObj, sClass)
{
	if(typeof oObj=='string') oObj = document.getElementById(oObj);
	if(oObj==null) return;
  if(sClass == null || sClass == '') sClass = 'highlight';
  if(oObj.className.match(RegExp('\\b' + sClass + '\\b')) == null) oObj.className += ' ' + sClass;
}
function Unhighlight(oObj, sClass)
{
	if(typeof oObj=='string') oObj = document.getElementById(oObj);
	if(oObj==null) return;
  if(sClass == null || sClass == '') sClass = 'highlight';
  oObj.className = oObj.className.replace(RegExp('\\b' + sClass + '\\b', 'g'), '');
}
function HighlightToggle(oObj, sClass)
{
	if(typeof oObj=='string') oObj = document.getElementById(oObj);
	if(oObj==null) return;
  if(sClass == null || sClass == '') sClass = 'highlight';
  if(oObj.className.match(RegExp('\\b' + sClass + '\\b')) == null)
  {
  	oObj.className += ' ' + sClass;
  	return true;
  }
  else
  {
	  oObj.className = oObj.className.replace(RegExp('\\b' + sClass + '\\b', 'g'), '');
	  return false;
	}
}

function Hover(oObj)		{ Highlight(oObj, 'hover'); }
function Unhover(oObj)	{ Unhighlight(oObj, 'hover'); }
function SortTable(oObj, iColDelta)
{
	bTime=0;
	if(bTime) {
		var dStart=new Array();
		var dEnd=new Array();
		dStart[dStart.length] = new Date();
	}
	var oCell = oObj;
	while(oCell.nodeName!="TH" && oCell.nodeName!="TD") {
		if(oCell.nodeName=="BODY")
			return;
		oCell = oCell.parentNode;
	}
	var oTable = oCell;
	while(oTable.nodeName!="TABLE") {
		if(oTable.nodeName=="BODY")   
			return;
		oTable = oTable.parentNode;
	}
	iCol=-1;
	oRow=oCell.parentNode;
	x2=0;	for(x = 0; x<oRow.cells.length; x++) {
		if(oRow.cells[x]==oCell) {
			iCol = x2;
		  sDir = (oCell.className.match(RegExp('\\bsort_a\\b'))==null) ? 'a' : 'd';
		}
		Unhighlight(oRow.cells[x], 'sort_a');
		Unhighlight(oRow.cells[x], 'sort_d');
		x2+=oRow.cells[x].colSpan;
	}
	
	if(iCol<0) return;
	
	if(typeof(iColDelta) == 'number')
		iCol += iColDelta;
	
	if(sDir=='a')
		funCompare = function(a,b)	{
																	if(a['cmp']>b['cmp']) return 1;
																	if(a['cmp']<b['cmp']) return -1;
																	return 0;
																};
	else
		funCompare = function(a,b)	{
																	if(a['cmp']>b['cmp']) return -1;
																	if(a['cmp']<b['cmp']) return 1;
																	return 0;
																};
	
	aRows = new Array();
	for(var b=0; b<oTable.tBodies.length; b++) {	// For all tBodies
		oTBody = oTable.tBodies[b];
		if(oTBody.className.match(RegExp('\\bnosort\\b'))==null)
		{
			iRows = oTBody.rows.length;
			if(iRows <= 1) continue;
			
			for(var y=iRows-1; y>=0; y--) {	// for all rows backwards
				oRow = oTBody.rows[y];
				
				sSortType = 'string';
				oVal = oRow.cells[iCol];
				if(oVal.className.match(RegExp('\\amount\\b')) != null)
					sSortType = 'amount';
				oValChild = oVal.firstChild;
				if(oValChild != null
					&& oValChild.className != null
					&& oValChild.className.match(RegExp('\\bsortval\\b')) != null
					)
					oVal = oValChild;
				if(oVal.className.match(RegExp('\\amount\\b')) != null)
					sSortType = 'amount';
				
	      xCell = oRow.cells[iCol].innerHTML;
	      xCell = xCell.replace(RegExp('\<[^\>]*\>', 'g'), ''); // FILTER HTML Tags !  
				if(sSortType == 'amount')
				{
					xCell = parseFloat(xCell);
					if(isNaN(xCell))
						xCell = 0;
				}
				else
		      xCell = xCell.toLowerCase();  
				
				aRows[y] = new Array();
				aRows[y]['obj']		= oRow;
				aRows[y]['cmp']		= xCell;
			}
			
			aRows.sort(funCompare);
			
			if(bTime) {
				dEnd[dEnd.length] = new Date();
				dStart[dStart.length] = new Date();
			}
			
			for(var y=0; y<iRows; y++) {	// for all rows (fix odd/even classNames)
				oRow = aRows[y]['obj'];
		  	if((y%2==1) && oRow.className.match(RegExp('\\bstRowOdd\\b'))!=null) {
					Unhighlight(oRow, 'stRowOdd');
					Highlight(oRow, 'stRowEven');
				} else if((y%2==0) && oRow.className.match(RegExp('\\bstRowEven\\b'))!=null) {
					Unhighlight(oRow, 'stRowEven');
					Highlight(oRow, 'stRowOdd');
				}
				oTBody.appendChild(oRow);
			}
		}
	}
	
	Highlight(oCell, 'sort_' + sDir);

	if(bTime) {
	  dEnd[dEnd.length] = new Date();
		var sDiff='';
		for(i=0; i<dStart.length; i++) {
			sDiff += 'i: ' + DateDiffString(dStart[i], dEnd[i]) + '\n';
		}
		alert(sDiff);
	}
}
function SetFilter(oObj, sFilter)
{
  var oTable = oObj;
  while(oTable.nodeName!="TABLE") {
    if(oTable.nodeName=="BODY")   
      return null;
    oTable = oTable.parentNode;
  }
  
	sCookieName = 'Filter_' + oTable.id + '_' + escape(document.location);
	
  if(sFilter==null && oObj.nodeName=="INPUT")
    sFilter=oObj.value;
  
  if(typeof(sFilter) == 'string')
  	sFilter=sFilter.toLowerCase()
  
  if(typeof sFilter=='number')
    if(sFilter==-1)
    {
      delCookie(sCookieName);
      return null;
    }
    else if(sFilter==0)
    {
      sFilter=getCookie(sCookieName);
      if(oObj.nodeName=="INPUT")
        oObj.value=sFilter;
    }
    else if(sFilter==1)
      if(typeof oTable.sCurrentFilter == 'undefined')
        sFilter = "";
      else
        sFilter = oTable.sCurrentFilter;
   else if(oTable.sCurrentFilter == sFilter)
     return sFilter;
  
  oTable.sCurrentFilter = sFilter;
  setCookie(sCookieName, sFilter);
  var iFiltered=0;
  iMatches=0;
  for(var b=0; b<oTable.tBodies.length; b++) {
    oTBody = oTable.tBodies[b];
    if(oTBody.className.match(RegExp('\\bfilter-empty\\b'))!=null)
    {
      if(iMatches>0)
        Unhighlight(oTBody, 'filter-isempty');
      else
        Highlight(oTBody, 'filter-isempty');
    }
    else if(oTBody.className.match(RegExp('\\bnofilter\\b'))==null)
    {
      iRows = oTBody.rows.length;
      if(iRows < 1) continue;
      for(var y=0; y<iRows; y++) {
        oRow = oTBody.rows[y];
        iCols = oRow.cells.length;
        bMatch=0;
        for(var x=0; x<iCols; x++) {
          sCell=oRow.cells[x].innerHTML;
          sCell=sCell.replace(RegExp('\<[^\>]*\>', 'g'), ''); // FILTER HTML Tags !  
          sCell=sCell.toLowerCase();  
          if(sCell.indexOf(sFilter) >= 0) {
            bMatch=1;
            iMatches++;
            break;
          }
        }
        if(bMatch)
          Unhighlight(oRow, 'filter-mismatch');
        else
        {
          Highlight(oRow, 'filter-mismatch');
         	iFiltered++;
        }
      }
    }
  }
  
	if(iFiltered>0)
		Highlight(oTable, 'filter-active');
	else
		Unhighlight(oTable, 'filter-active');
	
  return sFilter;
}

function getCookie(sName)
{
	re = new RegExp("(^| )" + sName + "=([^;\n]*)(;|\n|$)");
	document.cookie.match(re);
	return(unescape(RegExp.$2));
}


function setCookie(sName, sValue, iExpireDays)
{
	var dExpireDate = new Date ();
	dExpireDate.setTime(dExpireDate.getTime() + (iExpireDays * 24 * 3600 * 1000));
	document.cookie = sName + "=" + escape(sValue) +
		((iExpireDays == null) ? "" : "; expires=" + dExpireDate.toGMTString());
}

function delCookie(sName)
{
	if (getCookie(sName)) {
		document.cookie = sName + "=; expires=Thu, 01-Jan-70 00:00:01 GMT";
	}
}
function DateDiffString(dStart, dEnd)
{
	var sDiff;
	var dDiff = new Date(dEnd.getTime() - dStart.getTime());
  var sMilliSec = parseInt((((dDiff.getMinutes() * 60) + dDiff.getSeconds()) * 1000) + dDiff.getMilliseconds()) + "";
  while(sMilliSec.length < 4) {
		sMilliSec = '0' + sMilliSec;
	}
  iLen = sMilliSec.length;
  
	sDiff = "" + sMilliSec.substring(0, iLen-3) + '.' + sMilliSec.substring(iLen-3) + ' sec.';
	return sDiff;
}
var oIFrame=null; // our IFrame object
var IFrameDoc=null;
var oSubTree=null;
function TreeClick(oObj)
{
	if(IFrameDoc != null)
		return true;
	
	// Find sub tree (dd)
	oSubTree = oObj;
	do {
		oSubTree = oSubTree.nextSibling;
		if(typeof oSubTree=='undefined')
			return
	}
	while(oSubTree.nodeName!='DD');
	
	iTreeID = oSubTree.getAttribute('treeid');
	if(typeof(oSubTree.textContent) == 'string')	// @@@ FF
		sInnerText = oSubTree.textContent;
	else
		sInnerText = oSubTree.innerText;						// IE (& DOM ?)

	if(!sInnerText.match(/[^\s]/) && iTreeID!='')
	{
		if(typeof(oSubTree.textContent) == 'string')	// @@@ FF
			oSubTree.textContent	= '... (loading) ...';	// FF
		else
			oSubTree.innerText		= '... (loading) ...';	// IE
		
		// Find root of tree
		oRoot = oObj;
		do {
			oRoot = oRoot.parentNode;
			if(oRoot.nodeName=='BODY')
				return
			sURL = oRoot.getAttribute('updates_src');
		}
		while(oRoot.nodeName!='DL' || sURL == null);
		
		callToServer(sURL + iTreeID);
	}
	
	if(HighlightToggle(oObj, 'open'))
		Highlight(oSubTree, 'open');
	else
		Unhighlight(oSubTree, 'open');
}

function TreeUpdate(id)
{
	if(typeof(oSubTree.textContent) == 'string')	// @@@ FF
	{
		IFrameDoc = oIFrame.contentWindow.document;
	}
	aDLs = oIFrame.contentWindow.document.getElementsByTagName('DL');
	aChilds = aDLs[0].childNodes;
	oNewSubTree = null;
	for(i=0; i<aChilds.length; i++)
	{
		if(aChilds[i].nodeName=='DD')
		{
			oNewSubTree = aChilds[i];
			break;
		}
	}
	
	if(typeof(oSubTree.textContent) == 'string')	// @@@ FF
		oSubTree.textContent	= '';	// FF
	else
		oSubTree.innerText		= '';	// IE

	if(oNewSubTree == null)
	{
		oSubTree.style.display = "none";
		IFrameDoc = null;
		return;
	}
	
	if(navigator.userAgent.indexOf('Gecko') !=-1 && !oIFrame.contentDocument)			// @@@ in real DOM:
	{
		oNewTree = oNewSubTree.cloneNode(true);	// alleen INHOUD van oNewSubTree, niet de DD zelf meeclonen!!
		oSubTree.appendChild(oNewTree);
	}
	else			// in IE
	{
		oSubTree.innerHTML = oNewSubTree.innerHTML;
	}
	
	IFrameDoc = null;
}
function callToServer(sURL) {
  if (!document.createElement) {return true};
  if (!oIFrame && document.createElement) {
	try {
		var tempIFrame=document.createElement('iframe');
		tempIFrame.setAttribute('id','RSIFrame');
		tempIFrame.style.border='0px';
		tempIFrame.style.width='0px';
		tempIFrame.style.height='0px';
		tempIFrame.style.visibility = "visible";
		oIFrame = document.body.appendChild(tempIFrame);
		if (document.frames) {
        oIFrame = document.getElementById('RSIFrame');
      }
    } catch(exception) {
      iframeHTML='\<iframe id="RSIFrame" style="';
      iframeHTML+='border:0px;';
      iframeHTML+='width:0px;';
      iframeHTML+='height:0px;';
      iframeHTML+='"><\/iframe>';
      document.body.innerHTML+=iframeHTML;
      oIFrame = new Object();
      oIFrame.document = new Object();
      oIFrame.document.location = new Object();
      oIFrame.document.location.iframe = document.getElementById('RSIFrame');
      oIFrame.document.location.replace = function(location) {
        this.iframe.src = location;
      }
    }
  }
  
  if (navigator.userAgent.indexOf('Gecko') !=-1 && !oIFrame.contentDocument) {
    setTimeout("callToServer('" + sURL + "')",10);
    return false;
  }
  
  if (oIFrame.contentDocument) {
    IFrameDoc = oIFrame.contentDocument; 
  } else if (oIFrame.contentWindow) {
    IFrameDoc = oIFrame.contentWindow.document;
  } else if (oIFrame.document) {
    IFrameDoc = oIFrame.document;
  } else {
    return true;
  }
  
  IFrameDoc.location.replace(sURL);
  return false;
}