conInt = 0;
conLev=1;
zVal=1.96;
zValC=3.8416;
ss=0;
pop=0;
perc=0;
pf = 0;

function css(obj) {

  if (obj.CInt.value == "") {
    conInt=0
  }
  else {
    conInt = eval(obj.CInt.value)
  }

  if (obj.TPop.value == "") { 
     pop=0
   }
  else {
     pop = eval(obj.TPop.value)
  }

  if (conInt == 0) {
      alert("Insert a valid Confidence Interval value/ Introduceti o valoare valida pentru Intervalul de Incredere 0.1 - 50.0")
   }
  else {  
     if (pop == 0) {
        ss = ((zVal *zVal) * 0.25) / ((conInt / 100) *(conInt / 100))
     }
     else {
       ss = ((zVal *zVal) * 0.25) / ((conInt / 100) *(conInt / 100));
       ss=ss/(1+(ss-1)/pop)
     }
        
     obj.SSz.value=parseInt(ss+.5)

  }
}

function CLevF1(obj){
   zVal=1.96
}
function CLevF2(obj){
   zVal=2.58
}
function CLevCiF1(obj){
   zValC=3.8416 ;
}
function CLevCiF2(obj){
   zValC=6.6564 ;
}

//   conf int SScalc --
function cci(obj) {

  if (obj.SSz.value == "") {
    ss=0
  }
  else {
    ss = eval(obj.SSz.value)
  }

  if (obj.TPop.value == "") { 
     pop=0
   }
  else {
     pop = eval(obj.TPop.value)
  }

  if (obj.TPop.value == "") { 
     pop=0}
  else {
     pop = eval(obj.TPop.value)}

  if (obj.Prc.value == "") { 
     perc=0}
  else {
     perc = eval(obj.Prc.value)}

  if (ss == 0 || perc < 1 || perc >99) {
      alert("Insert Sample Size and/ or a valid Percent value/ Introduceti Dimensiunea Esantionului si/sau o valoare valida pentru Procent 1 - 99")
   }
  else {  
     if (pop == 0) {
        pf = 1 }
     else {
       pf = (pop - ss) / (pop - 1) }
     conInt = Math.sqrt(zValC * (perc / 100) * (1 - perc / 100) / ss * pf) * 100   
     // round and display
     pf=parseInt(conInt);
     conInt=Math.round((conInt-pf)*100);
     obj.CIntCi.value=pf+conInt/100
     //obj.CIntCi.value=pf
  }
}


function ClrSS(obj, string) {
  obj.CInt.value = string;
  obj.TPop.value = string;
  obj.SSz.value = string;
}
function ClrCi(obj, string) {
  obj.CIntCi.value = string;
  obj.TPop.value = string;
  obj.SSz.value = string;
  obj.Prc.value = string;
}



  function VVal(val) {  var sTmp=""; var sAllow="1234567890"
  for(i=0;i<val.length;i++) if(sAllow.indexOf(val.charAt(i))>=0) sTmp+=val.charAt(i);
  return sTmp;}  // End -->


