function GetXmlHttpObject() {
 		var xmlHttp=null;
 		try { xmlHttp=new XMLHttpRequest(); } catch (e) { try { xmlHttp=new ActiveXObject("Msxml2.XMLHTTP"); } catch (e) { xmlHttp=new ActiveXObject("Microsoft.XMLHTTP"); } } return xmlHttp;
	}

	function donations(page,t){

		if (eval(document.getElementById('oRows'))) {

			urli = "lib/nkp.asp"
			urli = urli + "?page="+page
			try {

				if ( t.src.indexOf("-up.gif")>0 ) {
					t.src="/images/bg/nkp-down.gif"
					urli = urli + "&field="+t.name
					urli = urli + "&direction=asc"
				} else {
					t.src="/images/bg/nkp-up.gif"
					urli = urli + "&field="+t.name
					urli = urli + "&direction=desc"
				}
			
			} catch(err) {

			}
			document.getElementById('oRows').innerHTML='';
			url = urli
			xmlHttp=GetXmlHttpObject();
			if (xmlHttp==null) { return false; } 
			xmlHttp.onreadystatechange = function() {
				if (xmlHttp.readyState == 4) {
					if (xmlHttp.status == 200) {
						var xmlDoc = xmlHttp.responseXML;
						var x=xmlDoc.getElementsByTagName("row");

						var oTable = document.createElement("TABLE");
						var oTHead = document.createElement("THEAD");
						var oTBody0 = document.createElement("TBODY");
						var oTBody1 = document.createElement("TBODY");
						var oTFoot = document.createElement("TFOOT");
						var oRow, oCell;

						oTable.appendChild(oTHead);
						oTable.appendChild(oTBody0);
						oTable.appendChild(oTBody1);
						oTable.appendChild(oTFoot);

						oTable.border=0;
						oTable.cellSpacing=0;
						oTable.cellPadding=1;

						

						links = ''
						var j=xmlDoc.getElementsByTagName("paging");

						oRow = document.createElement("TR");
						oTHead.appendChild(oRow);
				
						document.getElementById('totaali').innerHTML=j[0].getElementsByTagName("total")[0].childNodes[0].nodeValue

						if ( j[0].getElementsByTagName("prev")[0].childNodes[0].nodeValue>0 ) {
							links = links + '<img class="pager" src="/images/bg/nkp-prev.png" onclick="donations('+j[0].getElementsByTagName("prev")[0].childNodes[0].nodeValue+',\'\')" border="0">'
						} else {
							links = links + '<img class="pager" src="/images/bg/nkp-prev-0.png" border="0">'
						}
						if ( j[0].getElementsByTagName("next")[0].childNodes[0].nodeValue>0 ) {
							links = links + '<img class="pager" src="/images/bg/nkp-next.png" onclick="donations('+j[0].getElementsByTagName("next")[0].childNodes[0].nodeValue+',\'\')" border="0">'
						} else {
							links = links + '<img class="pager" src="/images/bg/nkp-next-0.png" border="0">'
						}

						oRow.appendChild(create_element("TD",2,"data-com",links))
					

						oRow = document.createElement("TR");
						oTHead.appendChild(oRow);
						if ( j[0].getElementsByTagName("field")[0].childNodes[0].nodeValue=="0" || j[0].getElementsByTagName("field")[0].childNodes[0].nodeValue=="1" && j[0].getElementsByTagName("direction")[0].childNodes[0].nodeValue=="desc" ) {
							oRow.appendChild(create_element("TD",0,"head-com","Yritys&nbsp;<img name=\"yritys\" onclick=\"donations(1,this)\" src=\"/images/bg/nkp-up.gif\">"))
						} else {
							oRow.appendChild(create_element("TD",0,"head-com","Yritys&nbsp;<img name=\"yritys\" onclick=\"donations(1,this)\" src=\"/images/bg/nkp-down.gif\">"))
						}
						if ( j[0].getElementsByTagName("field")[0].childNodes[0].nodeValue=="3" && j[0].getElementsByTagName("direction")[0].childNodes[0].nodeValue=="desc" ) {
							oRow.appendChild(create_element("TD",0,"head-don","<img name=\"summa\" onclick=\"donations(1,this)\" src=\"/images/bg/nkp-up.gif\">&nbsp;Summa"))
						} else {
							oRow.appendChild(create_element("TD",0,"head-don","<img name=\"summa\" onclick=\"donations(1,this)\" src=\"/images/bg/nkp-down.gif\">&nbsp;Summa"))
						}

						for (i=0;i<x.length;i++){
							oRow = document.createElement("TR");
							oTHead.appendChild(oRow);
							oRow.appendChild(create_element("TD",0,"data-com",x[i].getElementsByTagName("company")[0].childNodes[0].nodeValue))
							oRow.appendChild(create_element("TD",0,"data-don",x[i].getElementsByTagName("donation")[0].childNodes[0].nodeValue))
						}
						if ( i!=25 ) {
							r = (25-i)
							for (i=0;i<r;i++){
								oRow = document.createElement("TR");
								oTHead.appendChild(oRow);
								oRow.appendChild(create_element("TD",0,"data-com","&nbsp;"))
								oRow.appendChild(create_element("TD",0,"data-don","&nbsp;"))
							}

						}
						document.getElementById('oRows').appendChild(oTable);

					}
				}
			};
			xmlHttp.open("GET",url,true);
			xmlHttp.send(null);
		} else {
			urli = "lib/nkp.asp"
			url = urli
			xmlHttp=GetXmlHttpObject();
			if (xmlHttp==null) { return false; } 
			xmlHttp.onreadystatechange = function() {
				if (xmlHttp.readyState == 4) {
					if (xmlHttp.status == 200) {
						var xmlDoc = xmlHttp.responseXML;
						var x=xmlDoc.getElementsByTagName("row");
						try {
							document.getElementById('totaali').innerHTML=x[0].getElementsByTagName("total")[0].childNodes[0].nodeValue
						} catch(err) {

						}
					}
				}
			};
			xmlHttp.open("GET",url,true);
			xmlHttp.send(null);
		}
	}

	function create_element(element_type,element_cspan,element_class,element_value) {
		oCellStr = document.createElement(element_type);
		if ( element_cspan>0 ) {
			oCellStr.colSpan = element_cspan;
		}
		oCellStr.className = element_class;
		if (element_class=="data-don" && element_value!="&nbsp;" ) { 
			oCellStr.innerHTML = element_value+" &euro;" ;
		} else {
			oCellStr.innerHTML = element_value ;
		}
		return oCellStr
	}

	function getCheckedValue(radioObj) {
		if(!radioObj)
			return "";
		var radioLength = radioObj.length;
		if(radioLength == undefined)
			if(radioObj.checked)
				return radioObj.value;
			else
				return "";
		for(var i = 0; i < radioLength; i++) {
			if(radioObj[i].checked) {
				return radioObj[i].value;
			}
		}
		return "";
	}

  
	function submitform(s) {

		//document.getElementById('submitter').disabled='true';

		var emailfmt= /^\w+([.-]\w+)*@\w+([.-]\w+)*\.\w{2,8}$/;
		var x = document.forms[0]
		var cnt = 0 ;
		var errori = 0 ;
		for(i=0; i<x.elements.length; i++){
			if ( x.elements[i].type=="radio" && x.elements[i].checked==true ) { 
				cnt++;
			} 
		}
		var messu = "";
		var tnt = 0
		if ( cnt==0 && ( parseFloat(x.muusumma.value.replace(/,/,"."),10)==(x.muusumma.value.replace(/,/,".")*1))==false ) {
			messu = messu + 'Summa : puuttuu\t\t\n'
			tnt++
		} else if ( getCheckedValue(x.summa)==0 && ( parseFloat(x.muusumma.value.replace(/,/,"."),10)==(x.muusumma.value.replace(/,/,".")*1))==false ) {
			messu = messu + 'Summa : puuttuu\t\t\n'
			tnt++
		}
		if ( x.yritys.value.length<5 ) {
			messu = messu + 'Yritys : puuttuu\t\t\n'
			tnt++
		}
		if ( x.yhteyshenkilo.value.length<5 ) {
			messu = messu + 'Yhteyshenkilö : puuttuu\t\t\n'
			tnt++
		}
		if(!emailfmt.test(x.email.value)) { 
			messu = messu + 'Email : väärä muoto\t\t\n'
			tnt++
		} 
		if ( x.laskutusosoite.value.length<5 ) {
			messu = messu + 'Laskutusosoite : puuttuu\t\t\n'
			tnt++
		}
		if ( tnt!=0 ) {
			alert(messu)
			return false;
		} else  {
			x.submit() ;
		}
	}

	function kutsukaverit(){

		//document.getElementById('submitter').disabled='true';

		var emailfmt= /^\w+([.-]\w+)*@\w+([.-]\w+)*\.\w{2,8}$/;
		var x = document.forms[0]
		var messu = "" ; 
		var tnt = 0;
		if(!emailfmt.test(x.email.value)) { 
			tnt++
			messu = messu + 'Oma email : puuttui ja/tai väärä muoto\t\t\n'
		} 

		var cc = 0 ;
		var ee = 0 ;
		oInputs = x.kaverinemail
		for ( i = 0; i < oInputs.length; i++ ) { 
			if ( oInputs[i].type == 'text' ) {
				if ( oInputs[i].value.length>0 ) {
					if(!emailfmt.test(oInputs[i].value)) { 
						ee++ ;
					} else {
						cc++ ; 
					}
				}
			}
		}

		if ( ee!=0 ) {
			tnt++
			messu = messu + 'Kaverin email : väärä muoto\t\t\n'
		}
		if ( ee==0 && cc==0 ) {
			tnt++
			messu = messu + 'Kaverin email : puuttui\t\t\n'
		}


		if ( messu.length > 0 ) {
			alert(messu)
			return false;
		}
		if ( cc==0 ) {
			alert ('Et antanut yhtään kaverin sähköpostiosoitetta\t')	
			return false ; 
		}
		x.submit();
	}