/**
  Drei Schritte machen die Tabelle sortierbar:
    1. Die Javascript-Library einbinden: <script src="sorttable.js"></script>
    2. Die Tabelle als sortierbar markieren durch eine Klasse "sortable":
       <table class="sortable">
    3. ein beliebiges id-Attribut auf die Tabelle legen:
       <table class="sortable" id="unique_id">
       damit immer nur eine Tabelle sortiert wird.
  Damit die Tabelle obendrein auch auch wechselnde Farben in den 
       Tabellenreihen aufweist, der Tabelle zusätzlich die 
       Klasse twoColors zuweisen:
    1. <table class="sortable twoColors" id="unique_id">
    2. und Stile für die Tabellenreihen deklarieren: die Klassen "odd" und "even".
*/

/** 
* Register Events 
*/
addLoadEvent (sortables_init);
addLoadEvent (alternate);
addLoadEvent (alternateListLines);
addLoadEvent (popupLinks);
addLoadEvent (tableTriColor);
addLoadEvent (trRuler);
addLoadEvent (printDateModified);

function printDateModified() 
{
	var dateModified = document.lastModified;
	mydate = dateModified.slice(0,10);
	if (!document.getElementById) return;
	var dateBox = document.getElementById('dateBox');
	if (dateBox && document.lastModified) {
		dateBox.innerHTML = '<em>Letztes Update ' + mydate + '</em>';
	}
}
/**
/* Script Registrar from Simon Wilson 
*/
function addLoadEvent(func) {
	var oldonload = window.onload;
	if (typeof window.onload != 'function') {
		window.onload = func;
	} else {
		window.onload = function() {
			oldonload();
			func();
		}
	}
}

/** 
/* Event Listener des W3C
*/
function addEvent(obj, evType, fn, useCapture){
  if (obj.addEventListener){
    obj.addEventListener(evType, fn, useCapture);
    return true;
  } else if (obj.attachEvent){
    var retVal = obj.attachEvent("on"+evType, fn);
    return retVal;
  } else {
    return false;
  }
}

var SORT_COLUMN_INDEX;

/**
* Find all tables with class sortable and make them sortable
*/
function sortables_init() {
	if (!document.getElementsByTagName) return;
	tbls = document.getElementsByTagName("table");
	for (ti=0;ti<tbls.length;ti++) {
		thisTbl = tbls[ti];
		if (((' '+thisTbl.className+' ').indexOf("sortable") != -1) && (thisTbl.id)) {
			//initTable(thisTbl.id);
			ts_makeSortable(thisTbl);
		}
	}
}

/**
* Take Headers and make their contents clickable links
*/
function ts_makeSortable(table) {
	if (table.rows && table.rows.length > 0) {
		var firstRow = table.rows[0];
	}
	if (!firstRow) return;

	for (var i=0, cell; cell=firstRow.cells[i]; i++) {
		var txt = ts_getInnerText(cell);
		cell.innerHTML = '<a href="#" class="sortheader" onclick="ts_resortTable(this, '+i+');return false;">'+txt+'<span class="sortarrow">&nbsp;&nbsp;&nbsp;</span></a>';
	}
}

function ts_getInnerText(el) {
	if (typeof el == "string") return el;
	if (typeof el == "undefined") { return el };
	if (el.innerText) return el.innerText;	//Not needed but it is faster
	var str = "";
	var cs  = el.childNodes;
	var l = cs.length;
	
	for (var i=0, cell; cell=cs[i]; i++) {
	//for (var i=0; i<l; i++) {
		switch (cell.nodeType) {
			case 1: //ELEMENT_NODE
				str += ts_getInnerText(cell);
				break;
			case 3:	//TEXT_NODE
				str += cell.nodeValue;
				break;
		}
	}
	return str;
}

function ts_resortTable(lnk, clid) {
	// get the span
	var span;
	for (var ci=0; ci<lnk.childNodes.length; ci++) {
		if (lnk.childNodes[ci].tagName && lnk.childNodes[ci].tagName.toLowerCase() == 'span') span = lnk.childNodes[ci];
	}
	var spantext = ts_getInnerText(span);
	var td = lnk.parentNode;
	var column = clid || td.cellIndex;
	var table = getParent(td,'TABLE');
	
	// Work out a type for the column
	if (table.rows.length <= 1) return;
	var itm = ts_getInnerText(table.rows[1].cells[column]);
	sortfn = ts_sort_caseinsensitive;
	if (itm.match(/^\d\d[\/-]\d\d[\/-]\d\d\d\d$/)) sortfn = ts_sort_date;
	if (itm.match(/^\d\d[\/-]\d\d[\/-]\d\d$/)) sortfn = ts_sort_date;
	if (itm.match(/^[€$]/)) sortfn = ts_sort_currency;
	if (itm.match(/^[\d\.]+$/)) sortfn = ts_sort_numeric;
	SORT_COLUMN_INDEX = column;
	var firstRow = new Array();
	var newRows = new Array();
	for (i=0; i<table.rows[0].length; i++) { firstRow[i] = table.rows[0][i]; }
	for (j=1; j<table.rows.length; j++)    { newRows[j-1] = table.rows[j]; }

	newRows.sort(sortfn);

	if (span.getAttribute("sortdir") == 'down') {
		ARROW = '&nbsp;&nbsp;&uarr;';
		newRows.reverse();
		span.setAttribute('sortdir','up');
	} else {
		ARROW = '&nbsp;&nbsp;&darr;';
		span.setAttribute('sortdir','down');
	}
	
	// We appendChild rows that already exist to the tbody, so it moves them rather than creating new ones
	// don't do sortbottom rows
	for (i=0;i<newRows.length;i++) { if (!newRows[i].className || (newRows[i].className && (newRows[i].className.indexOf('sortbottom') == -1))) table.tBodies[0].appendChild(newRows[i]);}
	// do sortbottom rows only
	for (i=0;i<newRows.length;i++) { if (newRows[i].className && (newRows[i].className.indexOf('sortbottom') != -1)) table.tBodies[0].appendChild(newRows[i]);}
	
	// Delete any other arrows there may be showing
	var allspans = document.getElementsByTagName("span");
	for (var ci=0; ci<allspans.length; ci++) {
		if (allspans[ci].className == 'sortarrow') {
			if (getParent(allspans[ci],"table") == getParent(lnk,"table")) { // in the same table as us?
				allspans[ci].innerHTML = '&nbsp;&nbsp;&nbsp;';
			}
		}
	}
	span.innerHTML = ARROW;
	alternate();
}

function getParent (el, pTagName) {
	if (el == null) return null;
	else if (el.nodeType == 1 && el.tagName.toLowerCase() == pTagName.toLowerCase())	// Gecko bug, supposed to be uppercase
		return el;
	else
		return getParent(el.parentNode, pTagName);
}

function ts_sort_date(a,b) {
	// y2k notes: two digit years less than 50 are treated as 20XX, greater than 50 are treated as 19XX
	aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
	bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]);
	if (aa.length == 10) {
		dt1 = aa.substr(6,4)+aa.substr(3,2)+aa.substr(0,2);
	} else {
		yr = aa.substr(6,2);
		if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
		dt1 = yr+aa.substr(3,2)+aa.substr(0,2);
	}
	if (bb.length == 10) {
		dt2 = bb.substr(6,4)+bb.substr(3,2)+bb.substr(0,2);
	} else {
		yr = bb.substr(6,2);
		if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
		dt2 = yr+bb.substr(3,2)+bb.substr(0,2);
	}
	if (dt1==dt2) return 0;
	if (dt1<dt2) return -1;
	return 1;
}

function ts_sort_currency(a,b) { 
	aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]).replace(/[^0-9.]/g,'');
	bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]).replace(/[^0-9.]/g,'');
	return parseFloat(aa) - parseFloat(bb);
}

function ts_sort_numeric(a,b) { 
	aa = parseFloat(ts_getInnerText(a.cells[SORT_COLUMN_INDEX]));
	if (isNaN(aa)) aa = 0;
	bb = parseFloat(ts_getInnerText(b.cells[SORT_COLUMN_INDEX])); 
	if (isNaN(bb)) bb = 0;
	return aa-bb;
}

function ts_sort_caseinsensitive(a,b) {
	aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]).toLowerCase();
	bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]).toLowerCase();
	if (aa==bb) return 0;
	if (aa<bb) return -1;
	return 1;
}

function ts_sort_default(a,b) {
	aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
	bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]);
	if (aa==bb) return 0;
	if (aa<bb) return -1;
	return 1;
}


/**
* Alternating table rows 
*/
function alternate() {
	if (!document.getElementsByTagName) return true;
	var rows = document.getElementsByTagName("tr");
	for (var i=0, row; row=rows[i]; i++){
		if (/twoColors/.test(row.parentNode.parentNode.className)) {
		//manipulate rows
			if (i%2 == 0) {
				row.className = "even";
			} else { 
				row.className = "odd";
			}
		}
	}
}

/**
* Alternating List Lines in ordered lists (ol)
*/
function alternateListLines() {
	if (!document.getElementsByTagName) return true;
	var lines = document.getElementsByTagName("li");
	for (var i=0, line; line=lines[i]; i++) {
		if (/code/.test(line.parentNode.className)) {
			if (i%2 == 0) {
				line.className = "odd";
			} else {
				line.className = "even";
			}
		}
	}
}


/**
* popupLinks öffent ein Popup-Fenster, wenn ein Link mit einer 
* in der Konfiguration angegebenen Klasse angeklickt wurde.
* Im Array mit der Konfiguration des Popup-Fensters werden die 
* Fenstergrößen angelegt. Dem Array können jederzeit weitere 
* Elemente hinzugefügt werden, ohne dass das popupLinks-Skript 
* geändert werden muss 
*/
var popupLinkConfig = new Array;
// Die folgenden Zeilen löschen oder neue Zeilen hinzufügen, um Popup-Klassen hinzuzufügen
// oder zu löschen. Einstellungen für das Popup-Fenster:
// new Array ("target","settings");

popupLinkConfig["imPopup"] = new Array ("", "width=600,height=480,resizable=no,scrollbars=no");
popupLinkConfig["popup"]   = new Array ("", "width=480,height=500,scrollbars=yes");
popupLinkConfig["hilfe"]   = new Array ("", "width=550,height=350,resizable=no,scrollbars=no");


function popupLinks()
{
	if (!document.getElementsByTagName) return true;
	var pageLinks = document.getElementsByTagName("a");
	for (var i=0, pageLink; pageLink=pageLinks[i]; i++) {
		// Damit der Check nicht bei jedem Link durchgeführt wird
		// prüfen ob der Link ein class-Attribut enthält
		if (pageLink.className) {
			for (var theKey in popupLinkConfig) {
				myRegEx = new RegExp (theKey);
				if (pageLink.className.match(myRegEx)) {
					pageLink.settings = popupLinkConfig[theKey][1];
					pageLink.target   = popupLinkConfig[theKey][0];
					pageLink.onclick = pageLink.onfocus = function(event) {
						newWin = window.open(this.href, this.target, this.settings);
						return false;
					}
				}
			}
		}
	}
}

function popUp()
{
	
	newWin.focus();
	return false;
} 



/**
*	tableTriColor färbt die Reihen von Tabellen in drei Farben, die im 
*	Stylesheet deklariert werden müssen
*/

function tableTriColor () { 
  var rows = document.getElementsByTagName ('tr');
  for (var i=0, row; row=rows[i]; i++) {
    // zusätzlich: die Abfrage, ob das table-Objekt die Klasse triColor deklariert,
    // damit nicht alle Tabellen der Seite eingefärbt werden
    if (/triColor/.test(row.parentNode.parentNode.className)) {
        if (i%3 == 0) { 
                row.setAttribute ('class', 'triCola');
                row.setAttribute ('className', 'triCola'); /* Für MSIE */
        }
        if (i%3 == 1) {
                row.setAttribute ('class', 'triColb');
                row.setAttribute ('className', 'triColb'); /* Für MSIE */
        }
        if (i%3 == 2) {
                row.setAttribute ('class', 'triColc');
                row.setAttribute ('className', 'triColc'); /* Für MSIE */
        }
    }
  } 
}


/**
*	trRuler wechselt die Hintergrundfarbe einer Tabellenzeile 
*	beim Rollover mit der Maus
*/
function trRuler() {
  var rows = document.getElementsByTagName ('tr');
  for (var i=0, row; row=rows[i]; i++) {
    if (/rollBug/.test(row.parentNode.parentNode.className)) {
      row.onmouseover = function() {
         this.setAttribute ("class", "trHover");
         this.setAttribute ("className", "trHover");   /* Für MSIE */
      }
      row.onmouseout  = function() {
         this.removeAttribute ("class","trHover");
         this.removeAttribute ("className","trHover"); /* Für MSIE */
         // tableTriColor aufrufen, damit die Zeilen neu eingefärbt werden
        tableTriColor();
      }
    }
  }
}



