
function runde(x) {
var k = (Math.round(x * 100) / 100).toString();
  k += (k.indexOf('.') == -1)? '.00' : '00';
  var p = k.indexOf('.'), m = k.indexOf('-.');
  var f = (p == 0 || m == 0)? '0,' : ',';
  return k.substring(0, p) + f + k.substring(p+1, p+3);

}

 function InZahl (Wert)
    {   // Erstellt von Ralf Pfeifer, www.ArsTechnica.de
        var PosKomma = Wert.indexOf(",",0);
  

        // Enthaelt die Variable 'Wert' ein Komma ?
        PosKomma = Wert.indexOf(",",0);
        if (PosKomma >= 0)
           { Wert = Wert.substring(0, PosKomma) + "." + Wert.substring(PosKomma + 1, Wert.length); }

        return parseFloat(Wert);
        }

function Umrechnen(c1,c2,c3,c4,c5,c6){
document.calc.e1.value = runde(c1 * 88.4);
document.calc.e2.value = runde(c2 / 1000);
document.calc.e3.value = runde(c3 * 0.1665);
document.calc.e4.value = runde(c4 * 2.144);
document.calc.e5.value = runde(c5 * 0.357);
document.calc.e6.value = runde(c6 * 0.0555);
}

function SchreibeErgebnis(	blut_Na, blut_K, blut_Cl, blut_P, blut_Kreatin, blut_BUN, blut_Osm, blut_Glukose, 
				harn_Na, harn_K, harn_Cl, harn_P, harn_Kreatin, harn_BUN, harn_Osm, harn_Glukose, harn_Vol, harn_Ca){
				
blut_Na = InZahl (blut_Na);
blut_K = InZahl (blut_K);
blut_Cl=InZahl (blut_Cl);
blut_P=InZahl (blut_P);
blut_Kreatin=InZahl (blut_Kreatin);
blut_BUN=InZahl (blut_BUN);
blut_Osm=InZahl (blut_Osm);
blut_Glukose=InZahl (blut_Glukose);
harn_Na=InZahl (harn_Na);
harn_K=InZahl (harn_K);
harn_Cl=InZahl (harn_Cl);
harn_P=InZahl (harn_P);
harn_Kreatin=InZahl (harn_Kreatin);
harn_BUN=InZahl (harn_BUN);
harn_Osm=InZahl (harn_Osm);
harn_Glukose=InZahl (harn_Glukose);
harn_Vol=InZahl (harn_Vol);
harn_Ca=InZahl (harn_Ca);

validateFormOnSubmit(calc);
//if(validateFormOnSubmit(calc))
{				
document.calc.calc1.value =  runde(((harn_Na * blut_Kreatin) / (blut_Na * harn_Kreatin)) * 100);
document.calc.calc2.value =  runde(((harn_Cl * blut_Kreatin) / (blut_Cl * harn_Kreatin)) * 100);
document.calc.calc3.value =  runde(((harn_BUN * 2.144 * blut_Kreatin) / (blut_BUN * 2.144 * harn_Kreatin)) * 100);
document.calc.calc4.value =  runde(2 * blut_Na + (blut_Glukose * 0.0555) + (blut_BUN * 0.357));
document.calc.calc5.value =  runde(harn_Vol * (1 - [(harn_Na + harn_K) / blut_Na]));
document.calc.calc6.value =  runde(harn_K / (harn_Osm / blut_Osm) / blut_K);
document.calc.calc7.value =  runde(2 * (harn_Na + harn_K) + (harn_Glukose * 0.0555) + (harn_BUN  * 0.357));
document.calc.calc8.value =  runde( blut_P - (harn_P * blut_Kreatin / harn_Kreatin));
document.calc.calc9.value =  runde(harn_Ca/(harn_Kreatin * 0.0884));
}
}

function validateFormOnSubmit(theForm) {
var reason = "";

	reason += RequiredField(calc.blut_Na);
	reason += RequiredField(calc.blut_K);
	reason += RequiredField(calc.blut_Cl);
	reason += RequiredField(calc.blut_P);	
	reason += RequiredField(calc.blut_Kreatin);
	reason += RequiredField(calc.blut_BUN);
	reason += RequiredField(calc.blut_Osm);
	reason += RequiredField(calc.blut_Glukose);
	reason += RequiredField(calc.harn_Na);
	reason += RequiredField(calc.harn_K);
	reason += RequiredField(calc.harn_Cl);
	reason += RequiredField(calc.harn_P);
	reason += RequiredField(calc.harn_Kreatin);
	reason += RequiredField(calc.harn_BUN);
	reason += RequiredField(calc.harn_Osm);
	reason += RequiredField(calc.harn_Glukose);
	reason += RequiredField(calc.harn_Vol);
	reason += RequiredField(calc.harn_Ca);
			  
   
  if (reason != "") {
    //alert("Ein oder mehrere Felder haben keine Werte:\n" + reason);
    return false;
  }
  
  function RequiredField(fld) {
    var error = "";
  
    if (fld.value.length == 0) {
        fld.style.background = '#cc3333'; 
        error = "Ein benötigtes Feld wurde nicht ausgefüllt.\n"
    } else {
        fld.style.background = 'White';
    }
    return error;   
}

  return true;
}
