function isEmpty(inputStr) {
   if (inputStr == "" || inputStr == null) {
      return true
   }
   return false
}

function isNumb(inputStr) {
	for (var i = 0; i < inputStr.length; i++) {
		var oneChar = inputStr.substring(i, i + 1)
		if (oneChar < "0" || oneChar > "9") {
			return false
		}
	}
	return true
}

function isNumber(inputStr) {

	if (!isNumb(inputStr))	{
		alert("Lauks var saturēt tikai ciparus.")
		return false
	}

	return true
}

function isNumbFull(inputStr) {
   return ((!isEmpty(inputStr))&&(isNumb(inputStr)))
}

function DalskaitlisBg(inputStr) {
   var nPunktuSk = 0

   for (var i = 0; i < inputStr.length; i++) {
      var oneChar = inputStr.substring(i, i + 1)

      if ((oneChar < "0" || oneChar > "9" )&&(oneChar != ".")) {
	 alert("Lauks var saturēt tikai ciparus un simbolu '.'")
         return false
      }

      if (oneChar == ".") {
         nPunktuSk = nPunktuSk +1

         if (nPunktuSk > 1) {
            alert("Lauks var saturēt tikai vienu simbolu '.'")
            return false
         }

      }

   }

   return true

}

function DalskaitlisBgNeg(inputStr) {
   var nPunktuSk = 0
   var nMinSk = 0

   for (var i = 0; i < inputStr.length; i++) {
      var oneChar = inputStr.substring(i, i + 1)

      if ((oneChar < "0" || oneChar > "9" )&&(oneChar != ".")&&(oneChar != "-")) {
		 alert("Lauks var saturēt tikai ciparus un simbolus '.' vai '-'")
         return false
      }

      if (oneChar == ".") {
         nPunktuSk = nPunktuSk +1

         if (nPunktuSk > 1) {
            alert("Lauks var saturēt tikai vienu simbolu '.'")
            return false
         }

      }

      if (oneChar == "-") {
         nMinSk = nMinSk +1

         if (nMinSk > 1) {
            alert("Lauks var saturēt tikai vienu simbolu '-'")
            return false
         }

         if (i > 0) {
            alert("Simbolam '-' jābūt pirmajam")
            return false
         }

	  }

   }

   return true

}

function Dalskaitlis(inputStr) {

   if (isEmpty(inputStr)) {
      return true
   } 

   return DalskaitlisBg(inputStr)
}

function DalskaitlisNeg(inputStr) {

   if (isEmpty(inputStr)) {
      return true
   } 

   return DalskaitlisBgNeg(inputStr)
}

function Nav0(inputStr) {

   if (inputStr*1==0) {
      alert('Lauka vērtība nevar būt 0!')
		return false
   } 

   return true
}

function DalskaitlisPilns(inputStr,cMess) {

   if (isEmpty(inputStr)) {
      alert(cMess+' lauka vērtība nevar būt tukša')
	  return false
   } 

   return DalskaitlisBg(inputStr)
}

function SetFocusSelect(kontrole) {
           kontrole.focus()

		   if (kontrole.tagName!='SELECT') {
  	          kontrole.select()
		   }

}
function Numuri(lauks,garums) {
	var nVertiba = lauks.value
      if (isEmpty(nVertiba)) {
             return true
	} 
      if (isNumber(nVertiba)) {
         if (nVertiba.length != garums) {
		alert("Nepareizs lauka garums.")
	   } else {
	     return true
	   } 
	} 
      SetFocusSelect(lauks)
      return false
}

function irDalsk(lauks) {

	if (lauks == undefined){
		return true
	}

   var nVertiba = lauks.value

   if (Dalskaitlis(nVertiba)) {
      return true
   } else {
      SetFocusSelect(lauks)
      return false
   }

}

function irDalskNe0(lauks) {
   var nVertiba = lauks.value

   if ((Dalskaitlis(nVertiba))&&(Nav0(nVertiba))) {
      return true
   } else {
      SetFocusSelect(lauks)
      return false
   }

}

function ToNum(oKontr) {
   return((oKontr == undefined) ? 0 : nvl(oKontr.value,0)*1)
}

function irDalskN(lauks) {
   var aArg=irDalskN.arguments,lAtb=true

   for (var i=0;i<aArg.length;i++){
      lAtb = (lAtb)&&(irDalsk(aArg[i]))
   }

   return lAtb
}

function irDalskPilns(lauks,cMess) {
   var nVertiba = lauks.value

   if (DalskaitlisPilns(nVertiba,cMess)) {
      return true
   } else {
      SetFocusSelect(lauks)
      return false
   }

}

function irDalsk0AizK(lauks,nAizKom) {
   var nVertiba = chrtran(lauks.value+'',',','.')

   if (Dalskaitlis(nVertiba)) {
	  lauks.value = Dalsk0AizKom(nVertiba,nAizKom)
      return true
   } else {
      SetFocusSelect(lauks)
      return false
   }

}

function irDalsk0AizKNeg(lauks,nAizKom) {
   var nVertiba = rtrim(ltrim(chrtran(lauks.value+'',',','.'),' '),' ')

   if (DalskaitlisNeg(nVertiba)) {
	  lauks.value = Dalsk0AizKom(nVertiba,nAizKom)
      return true
   } else {
      SetFocusSelect(lauks)
      return false
   }

}

function irNumurs(lauks) {
	var nVertiba = lauks.value

	if (isEmpty(nVertiba)) {
             return true
	} 

	 if (!isNumber(nVertiba)) {
		SetFocusSelect(lauks)
        return false
	} 

	return true
}

function irNumuriN(lauks) {
   var aArg=irNumuriN.arguments,lAtb=true

   for (var i=0;i<aArg.length;i++){
      lAtb = (lAtb)&&(irNumurs(aArg[i]))
   }

   return lAtb
}

function irNumursFull(lauks) {
	var nVertiba = lauks.value

	if (isEmpty(nVertiba)) {
      alert('Lauks nevar būt tukšs!')
		SetFocusSelect(lauks)
		return false
	} 

	 if (!isNumber(nVertiba)) {
		SetFocusSelect(lauks)
      return false
	} 

	return true
}

function nvl(vertiba,tukss) {

   if (isEmpty(vertiba))  {
      return tukss
   }

   return vertiba
}

function Dalsk0AizKom(cSkaitlis,nAizKom) {
   var cVertiba = cSkaitlis

   if ((isEmpty(cVertiba))||(nAizKom==0)) {
       return cSkaitlis
   } 
 
   cVertiba = ltrim(cVertiba,' ')
   var nPunktaPos = cVertiba.indexOf(".")
   var cNulles = '.000000000000000'

   if (nPunktaPos == -1) {
      cVertiba = cVertiba+cNulles.substring(0,nAizKom+1) 
   } else {
        
      var nNulluSk = nPunktaPos+nAizKom+2-cVertiba.length

      if (nNulluSk >  0) {
         cVertiba = cVertiba+cNulles.substring(1,nNulluSk) 
      }

       if (nPunktaPos == 0) {
          cVertiba = '0'+cVertiba
       }

   }

   return cVertiba
}

function round(nSkaitl,nAizKom) {
   var nPak = Math.pow(10,nAizKom)
   return Math.round(nSkaitl*nPak)/nPak
}

function SkaitlisNoLidz(lauks) {
   var cVertiba = lauks.value
   var oProp = BernsPecName(lauks.parentNode,'prop')
   var aNoLidz = oProp.value.split('/')

   if (isEmpty(cVertiba)) {
       return true
   } 

   if (!irNumurs(lauks)) {
       return false
   } 

   if ((cVertiba*1 < aNoLidz[0]*1)
      || (cVertiba*1 > aNoLidz[1]*1)) {
       alert('Vērtībai jābūt robežās no '+aNoLidz[0]+' līdz '+aNoLidz[1]+'!')
      SetFocusSelect(lauks)
		return false
   } 

	return true
}

function DalskNoLidz(lauks,nAizKom) {
   var cVertiba = lauks.value
   var oProp = BernsPecName(lauks.parentNode,'prop')
   var aNoLidz = oProp.value.split('/')

   if (isEmpty(cVertiba)) {
       return true
   } 

   if (!irDalsk0AizK(lauks,nAizKom)) {
       return false
   } 

   if ((cVertiba*1 < aNoLidz[0]*1)
      || (cVertiba*1 > aNoLidz[1]*1)) {
       alert('Vērtībai jābūt robežās no '+aNoLidz[0]+' līdz '+aNoLidz[1]+'!')
      SetFocusSelect(lauks)
		return false
   } 

	return true
}

function NulleUzTukss(nSkaitlis) {
	return ((nSkaitlis==0) ? '' : nSkaitlis+'')
}

function isEmail(string) {
    return (string.search(
		/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/)
		!= -1)
}

function isEmailEmpty(string) {
    return (isEmpty(string)||isEmail(string))
}

function irEpasts(oKontr) {

	if (!isEmailEmpty(oKontr.value)){
		alert("Nepareizs e-pasta adreses formāts")
		SetFocusSelect(oKontr)
		return false
	}

	return true
}