/////////////////////////////////////////////////////////////////////////////////////////////
//Validate intiger param obj -> pointer to text control

function vint(obj) 
          {
	   obj.value = obj.value.replace(" ", "");
	   obj.value =obj.value.replace("-", "");
           while ((parseInt(obj.value) != obj.value) && (obj.value.length>0) )
	    {
	     obj.value = obj.value.substr(0, obj.value.length - 1)
	    } 
	  }

	  function vintm(obj) 
          {
	   obj.style.background = "#FF9999"
	   obj.value = obj.value.replace(" ", "");
	   obj.value =obj.value.replace("-", "");
           while ((parseInt(obj.value) != obj.value) && (obj.value.length>0) )
	    {
	     obj.value = obj.value.substr(0, obj.value.length - 1)
        } 
	  }

/////////////////////////////////////////////////////////////////////////////////////////////

function isint(testvalue)
 {
  if(isNaN(testvalue)) 
    {
     return 0;
    }else return 1;
 }


/////////////////////////////////////////////////////////////////////////////////////////////
function checkint(number)
 { 
  var y,m,d
  str=new String(number);
  for(var p=0;p<str.length;p++)
   {
       if ( (str.charAt(p)!=0x30)&& (str.charAt(p)!='0')&&(str.charAt(p)!='1')&&(str.charAt(p)!='2')&&(str.charAt(p)!='3')&&(str.charAt(p)!='4')&&(str.charAt(p)!='5')&&(str.charAt(p)!='6')&&(str.charAt(p)!='7')&&(str.charAt(p)!='8')&&(str.charAt(p)!='9'))   
        {
         return 0
        } 
   } 
   pstr=parseInt(str,[10]);
   if (isNaN(pstr))
    {
      return 0
    }
      
  return 1
 }

/////////////////////////////////////////////////////////////////////////////////////////////
function checkintlist(list)
 {
  //Author Artur Halarewicz email:arturh@abcdata.com.pl
  //Functions check if numbers in text box are type of integer
  //Numbers must be separated by ';' 
  //Parameters:
  // list ->reference to text box of the form
  // Return value 0 -> Error ; 1-> OK

   numbers=list.value;
   var str =  new String(numbers);
   var strlen =str.length;
   var index = new Array();
   var i=1;
   index[0]=0; 
   for(var k=1;k<strlen;k++)
    {
     if(str.charAt(k)==';')
      {
       index[i]=k+1; 
       i++;
      }
    }     
   var z=0;
   for(var k=0;k<index.length;k++)
    {
      z=k+1
      if(z < index.length)
       {
        dat=str.substring(index[k],index[z]-1);
           if(!checkint(dat)) { alert("Zła liczba na pozycji -> " + z  ); return 0 }
       }else
         {
           dat=str.substring(index[k],str.length);
           if(!checkint(dat)) { alert("Zła liczba na pozycji -> " + z  ); return 0 }
         }
    }      

   return 1 
 }


/////////////////////////////////////////////////////////////////////////////////////////////
//Validate float param obj -> pointer to text control


function vfloat(obj) 
  {
   var tobj 
   obj.value = obj.value.replace(" ", "");
   while ((parseFloat(obj.value.replace(",",".")) != obj.value.replace(",",".")) && (obj.value.length>0) )
    {
     obj.value = obj.value.substr(0, obj.value.length - 1)
    } 
  }

function vfloatm(obj) 
  {
   var tobj 
   obj.style.background = "#FF9999"
   obj.value = obj.value.replace(" ", "");
   while ((parseFloat(obj.value.replace(",",".")) != obj.value.replace(",",".")) && (obj.value.length>0) )
    {
     obj.value = obj.value.substr(0, obj.value.length - 1)
    } 
  }