var dx="div4"; 
   var pr="pran"; 
   var pirma = new Array(); 
   var antra = new Array(); 
   var pp="";
   var query=""; 
   var rt=""; 
   var ppt=true; 
   var kr=false; 
   var indx=0; 
   var grnr=0; 
   var rc=1;
   var sx=new Object( ); 
   var rcx=0;
   
	function check() {
		var cBoxes = document.orderform.sort;
		for(var i=0, n=cBoxes.length; i<n; ++i){
			cBoxes[i].checked = false;
		}
	}
   
   
   function inits(){
   pp="grupes"; 
   ppt=true;;
   read_from_server();
  }  
  
  function read_from_server(){
   par="query="+pp;
   ajax_request();
   look_for_loginr();
  }
  
 function look_for_loginr() {
   if(rezult.length < 2 ) { setTimeout("look_for_loginr()",300); }
   else {
   rt=rezult; rezult="";
    if(ppt){
    // $("pran").innerHTML="grupes nuskaitytos"+rt+"<br>";
       ppt = false;
       grupes();
       pp="produkcija";
       read_from_server();
     } else {
       produkcija();
       append_row();
     }
    }
   }
     
      function ajax_request() {
           rezult="";
           var myAjax = new Ajax.Request("http://www.kalorijos.lt/skaic_ajax.php",
			{metod: 'get', 	parameters: par, 
				onComplete: showResponse }); }
     function showResponse(originalRequest)	{rezult = originalRequest.responseText;  }
    
 function grupes() {
    pirma=rt.split("_|_");
    pirma=pirma.slice(0,pirma.length-1);
    for(i=0;i<pirma.length;i++){
      tt=pirma[i];
      pirma[i]=tt.split("||");
    }
    //$("pran").innerHTML+="grupiu sk:"+pirma.length+"<br>";
}     


function sortByName(a,b){    
	// this sorts the array using the second element        
	return ((a[3] < b[3]) ? -1 : ((a[3] > b[3]) ? 1 : 0));
}
function sortByKalo(a,b){    
	// this sorts the array using the second element        
	return ((parseFloat(a[4]) < parseFloat(b[4])) ? -1 : ((parseFloat(a[4]) > parseFloat(b[4])) ? 1 : 0));
}
function sortByAngl(a,b){    
	// this sorts the array using the second element        
	return ((parseFloat(a[5]) < parseFloat(b[5])) ? -1 : ((parseFloat(a[5]) > parseFloat(b[5])) ? 1 : 0));
}
function sortByBalt(a,b){    
	// this sorts the array using the second element        
	return ((parseFloat(a[6]) < parseFloat(b[6])) ? -1 : ((parseFloat(a[6]) > parseFloat(b[6])) ? 1 : 0));
}
function sortByRieb(a,b){    
	// this sorts the array using the second element        
	return ((parseFloat(a[7]) < parseFloat(b[7])) ? -1 : ((parseFloat(a[7]) > parseFloat(b[7])) ? 1 : 0));
}


function produkcija() {
    antra=rt.split("_|_");
    antra=antra.slice(0,antra.length-1);
    for(i=0;i<antra.length;i++){
      tt=antra[i];
      antra[i]=tt.split("||");
      if(parseInt(antra[i][4]) < 0 || parseInt(antra[i][5]) < 0 || parseInt(antra[i][6]) < 0 || parseInt(antra[i][7]) <0 ) {
      antra[i][1]="";antra[i][2]="";antra[i][3]="";}
    }
    
  $("pran").innerHTML+="<span color='#9AE684'>Produktų kiekis:</span> "+antra.length+"<br>";
  //for(i=50;i<antra.length;i++){
  //$("pran").innerHTML+=antra[i][0]+"||"+antra[i][1]+"||"+antra[i][2]+"||"+antra[i][3]+"||<br>";
  //}
  
  //$("pran").innerHTML+=rt;
}
  function append_row() {
    var tr = document.createElement("tr");
    tr.setAttribute("id","tr"+rc);
    var td0 = document.createElement("td");
    td0.setAttribute("id","td0"+rc);
    var txt1 = document.createTextNode(".."); 
    td0.appendChild(txt1);
    tr.appendChild(td0);
   
    var td = document.createElement("td");
    //$("pran").innerHTML+=s;
    //td.firstChild.nodeValue=s;
    var sx= document.createElement("select");
    var o = document.createElement("option");
    sx.appendChild(o);
    for(i=0;i<pirma.length;i++){
       o = document.createElement("option");
      var tt = document.createTextNode(pirma[i][2]);
      o.appendChild(tt);
      sx.appendChild(o);
    }
    var rcc=rc;   
    //sx kategorijos
    //s_c(rcc) isrenka produktus
    sx.onchange = function() {s_c(rcc); }
    sx.setAttribute("id","sx"+rc);
    td.appendChild(sx); 
    tr.appendChild(td);
    var sy= document.createElement("select");
    sy.setAttribute("disabled","true");
    sy.setAttribute("id","ss"+rc);
    sy.setAttribute("class","sy");
    sy.onchange = function() {s_cs(rcc); }
    sy.setAttribute("width","146px");
    var td2 = document.createElement("td");
    td2.appendChild(sy); 
    tr.appendChild(td2);
    var td3 = document.createElement("td");
    var inp=document.createElement("input");
    inp.setAttribute("disabled","true");
    inp.setAttribute("type","text");
    inp.setAttribute("size","5");
    inp.setAttribute("id","inp"+rc);
    inp.onchange = function(){skaic2(rcc,this.value); }
    td3.appendChild(inp);  
    tr.appendChild(td3);
    var ttx4=document.createTextNode("-");
    var td4 = document.createElement("td");
    var dv4 = document.createElement("div");
    dv4.setAttribute("id","td2"+rc);
    dv4.className = 'divr';
    dv4.style.fontWeight = "bold";
    dv4.appendChild(ttx4);
    td4.appendChild(dv4);
    tr.appendChild(td4);
    var ttx5=document.createTextNode("-");
    var td5 = document.createElement("td");
    var dv5 = document.createElement("div");
    dv5.setAttribute("id","td3"+rc);
    dv5.className = 'divr';
    dv5.appendChild(ttx5);
    td5.appendChild(dv5);
    tr.appendChild(td5);
    var ttx6=document.createTextNode("-");
    var td6 = document.createElement("td");
    var dv6 = document.createElement("div");
    dv6.setAttribute("id","td4"+rc);
    dv6.className = 'divr';
    dv6.appendChild(ttx6);
    td6.appendChild(dv6);
    tr.appendChild(td6);
    var ttx7=document.createTextNode("-");
    var td7 = document.createElement("td");
    var dv7 = document.createElement("div");
    dv7.setAttribute("id","td5"+rc);
    dv7.className = 'divr';
    dv7.appendChild(ttx7);
    td7.appendChild(dv7);
    tr.appendChild(td7);
   
    var td8 = document.createElement("td");
    td8.setAttribute("id","td8"+rc);
    td8.setAttribute("class","td3");
    td8.innerHTML = '&nbsp;';
    tr.appendChild(td8);
    var trv =document.getElementById("trv");
    trv.parentNode.insertBefore(tr,trv);
    if(rc>1){
     for(i=1;i<rc;i++){   
       if($("tr"+i)) {
	var a = document.createElement("a");
	var ax="<a href=\"javascript:delr("+i+")\"><img src=\"http://www.kalorijos.lt/img/delete.jpg\"  border=\"0\"/></a>";
	$("td8"+i).innerHTML=ax;
	}
     }
    }
	rc++;
 }

function s_c(ind) {
   // $("pran").innerHTML+="indexas:"+ind;
    var sx= $("sx"+ind);
    var sz=sx.selectedIndex;
    var sy= $("ss"+ind);
    do{
      var last = sy.lastChild;   
      if(last==null) break;
      sy.removeChild(last);
    } while(true);
    var o = document.createElement("option");
    sy.appendChild(o);
//$("pran").innerHTML+=sz; 
 if(sz>0) {
  var sz1=parseFloat(pirma[sz-1][0]);
 // $("pran").innerHTML+=sz1;
 
 
   //galima rusiuoti cia perrusiuot visa masyva antra
  //randam orderform'os sort radio buttono reiksme
  var radioGrp = document['forms']['orderform']['sort'];
	for(i=0; i < radioGrp.length; i++){
    if (radioGrp[i].checked == true) {
        var radioValue = radioGrp[i].value;
    }
  }
  
  antra.sort(sortByName);
  if(radioValue == 1) antra.sort(sortByKalo);  
  if(radioValue == 2) antra.sort(sortByAngl);  
  if(radioValue == 3) antra.sort(sortByBalt);  
  if(radioValue == 4) antra.sort(sortByRieb);  
  //if(radioValue == 'undefined') antra.sort(sortByUnde);  

 
 
   for(i=0;i<antra.length;i++){
      if(antra[i][2]==sz1) {
        if(parseFloat(antra[i][4])>=0 && parseFloat(antra[i][5])>=0
		&& parseFloat(antra[i][6])>=0 && parseFloat(antra[i][7])>=0 ){    
			//cia reiktu surusiuoti    
       		var o = document.createElement("option");
        	var tt = document.createTextNode(antra[i][3]);
        	o.appendChild(tt);
        	//sy antro selecto class=sy
        	sy.appendChild(o);
        	//antra[i][2] - turbut grupes ID
        	//antra[i][3] - produkto pavadinimas
        	//antra[i][4] - KCAL  
        	//antra[i][5] - Anglv.(g) 
        	//antra[i][6] - Baltym.(g) 
        	//antra[i][7] - Riebal.(g)
         	//$("pran").innerHTML+=antra[i][3]+' '+antra[i][4]+' '+antra[i][5]+' '+antra[i][6]+' '+antra[i][7]+'<br>';
		}
      }
     }
  }
    sy.style.background="RGB(255,255,255)" ;
    sy.disabled=false;
    $("inp"+ind).value=0;
    $("td2"+ind).firstChild.nodeValue=".";
    $("td3"+ind).firstChild.nodeValue="-";
    $("td4"+ind).firstChild.nodeValue="-";
    $("td5"+ind).firstChild.nodeValue="-";
   
    skaiciuoti();  
 }
 
function s_cs(ind) {
   var sx= $("sx"+ind);
   var gr=$(sx).selectedIndex;
   var sz=$("ss"+ind).selectedIndex;
   //sz1 - grupes ID (pvz majonezai 30)
   //sz - pasirinkto produkto indexas 1..n ++
   var sz1=parseFloat(pirma[gr-1][0]);
   //$("pran").innerHTML+=sz+"||"+sz1+"<br>";  
      
   $("inp"+ind).disabled=false;
   $("inp"+ind).style.background="RGB(255,255,255)" ;
   var kk=0;
   $("inp"+ind).value=10;
   $("td2"+ind).firstChild.nodeValue=".";
    $("td3"+ind).firstChild.nodeValue="-";
    $("td4"+ind).firstChild.nodeValue="-";
    $("td5"+ind).firstChild.nodeValue="-";
        
    for(i=0;i<antra.length;i++) {
    //$("pran").innerHTML+="a2:"+antra[i][2]+"<br>";
      if(antra[i][2]==sz1) {kk++; 
      //$("pran").innerHTML+=kk+"||"+sz+"<br>";
        if(kk==sz) { //uzpildom reiksmes
         $("inp"+ind).value=100;
          $("td2"+ind).firstChild.nodeValue=antra[i][4];
          $("td3"+ind).firstChild.nodeValue=antra[i][5];
          $("td4"+ind).firstChild.nodeValue=antra[i][6];
          $("td5"+ind).firstChild.nodeValue=antra[i][7];
          $("inp"+ind).focus();
         break;
        }
      }
    }
  
   skaiciuoti(); 
   new_row();
  }
  
function skaiciuoti() {
   var v1=0; var v2=0; var v3=0; var v4=0;
    var iii=1
    for(i=1;i<rc;i++) {
    if($("td0"+i)) {
      $("td0"+i).firstChild.nodeValue=iii+"."; iii++;
      }
    } 
   for(i=1;i<rc;i++){
        if($("tr"+i)) {
        if(parseFloat($("td2"+i).firstChild.nodeValue)>0) {
          v1+=parseFloat($("td2"+i).firstChild.nodeValue); }
        if(parseFloat($("td3"+i).firstChild.nodeValue)>0) {
          v2+=parseFloat($("td3"+i).firstChild.nodeValue);}
        if(parseFloat($("td4"+i).firstChild.nodeValue)>0) {
          v3+=parseFloat($("td4"+i).firstChild.nodeValue);}
        if(parseFloat($("td5"+i).firstChild.nodeValue)>0) {
          v4+=parseFloat($("td5"+i).firstChild.nodeValue);}
        }
   }
   $("tv2").firstChild.nodeValue=Math.round(v1*100)/100;
   $("tv3").firstChild.nodeValue=Math.round(v2*100)/100;
   $("tv4").firstChild.nodeValue=Math.round(v3*100)/100;
   $("tv5").firstChild.nodeValue=Math.round(v4*100)/100;
  }
  function skaic2(ind,vv) {
   var k =  parseFloat(vv)/100;
 //  var s="sx"+ind;
 //  var s2="ss"+ind;
 //  var gr = $(s).selectedIndex;
 //  var pr = $(s2).selectedIndex;
   
     var sx= $("sx"+ind);
   var gr=$(sx).selectedIndex;
   var sz=$("ss"+ind).selectedIndex;
    var sz1=parseFloat(pirma[gr-1][0]);
  //   $("pran").innerHTML+="grupe:"+gr+" produkcija:"+pr+"<br>";
   var kk=0;
    for(i=0;i<antra.length;i++) {
      if(antra[i][2]==sz1) {kk++; 
        if(kk==sz) { //uzpildom reiksmes
           $("td2"+ind).firstChild.nodeValue=Math.round(antra[i][4]*k*100)/100;
           $("td3"+ind).firstChild.nodeValue=Math.round(antra[i][5]*k*100)/100;
           $("td4"+ind).firstChild.nodeValue=Math.round(antra[i][6]*k*100)/100;
           $("td5"+ind).firstChild.nodeValue=Math.round(antra[i][7]*k*100)/100;
           skaiciuoti();
         //  $("pran").innerHTML+="suskaiciavom:"+k+"<br>";
           break
        }
      }
    }
    new_row();
  }
  function skaic3(ind,vv) {
    //$("pran").innerHTML+="skaiciuosim:"+k+"<br>";
   //var k =  parseFloat($(d+"0").firstChild.nodeValue)/100;
   //var k =  parseFloat($("in"+ind).value)/100;
   var k =  parseFloat(vv)/100;
   var s="sx"+ind;
   var s2="ss"+ind;
   var gr = $(s).selectedIndex;
   var pr = $(s2).selectedIndex;
  //   $("pran").innerHTML+="grupe:"+gr+" produkcija:"+pr+"<br>";
   var kk=0;
    for(i=0;i<antra.length;i++) {
      if(antra[i][2]==gr) {kk++; 
        if(kk==pr) { //uzpildom reiksmes
           $("td2"+ind).firstChild.nodeValue=Math.round(antra[i][4]*k*100)/100;
           $("td3"+ind).firstChild.nodeValue=Math.round(antra[i][5]*k*100)/100;
           $("td4"+ind).firstChild.nodeValue=Math.round(antra[i][6]*k*100)/100;
           $("td5"+ind).firstChild.nodeValue=Math.round(antra[i][7]*k*100)/100;
           skaiciuoti();
         //  $("pran").innerHTML+="suskaiciavom:"+k+"<br>";
           break
        }
      }
    }
    new_row();
  }
  
 function new_row(){
   var yra=false
   for(i=1;i<rc;i++){
    if($("tr"+i) && ($("sx"+i).selectedIndex==0 || $("ss"+i).selectedIndex==0)) {yra=true; break;}
   }
   if(!yra)   append_row();
 }
 function delr(ind) {
  $("tr"+ind).parentNode.removeChild($("tr"+ind));
  skaiciuoti();
 }
 //var trr=" <tr><td><select id="s1" onchange="s_c(1)"></select></td><td><select id="ss1" onchange="s_cs(1)"></select></td>
 //   <td id="t11"><input type="text" value="." onChange="skaic2(1,this.value)" size="5" id="i1">
 //   </td><td class="td2" id="t12">-</td><td class="td3" id="t13">-</td>
 //   <td class="td3" id="t14">-</td><td class="td3" id="t15">-</td> </tr>";