function Is_NaN(frm_oname,msg)
{
var i;
var obj;
var fvalue;

   obj="document."+frm_oname;
   fvalue=eval(obj).value
   if (isNaN(fvalue))
    {
     alert(msg);
     eval(obj).focus();
     return false;
    }
  return true;
}

//****************************************

function Is_Null(frm_oname,lange,msge)
{
var i;
var obj;
var job=0;
obj="document."+frm_oname;
 
  switch (lange){
    case "Dutch":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Selecteer een model !!!";
                break;
           case "errorMsg03": msg = "Dit veld is verplicht !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "English":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Please select a Model !!!";
                break;
           case "errorMsg03": msg = "This column must be written !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "German":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Bitte wählen Sie ein Produkt !!!";
                break;
           case "errorMsg03": msg = "Dieses Feld muss ausgefüllt werden !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "French":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Choisissez une modèle !!!";
                break;
           case "errorMsg03": msg = "Veuillez compléter les champs suivants qui sont obligatoires !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "Korea":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "모델을 선택하십시오.";
                break;
           case "errorMsg03": msg = "본 란은 반드시 기입하십시오.";
                break;
           default: msg = "Error !"
         }
         break;
    case "Portuguese":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Favor selecionar o Modelo !!!";
                break;
           case "errorMsg03": msg = "Esta coluna deve ser escrita !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "SChinese":
         switch (msge){
           case "errorMsg01": msg = "请选择一个选项 !!!";
                break;
           case "errorMsg02": msg = "请选择一个机种 !!!";
                break;
           case "errorMsg03": msg = "这个字段需要填写 !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "Spanish":
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Please select a Model !!!";
                break;
           case "errorMsg03": msg = "This column must be written !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "TChinese":
         switch (msge){
           case "errorMsg01": msg = "請選擇一個選項 !!!";
                break;
           case "errorMsg02": msg = "請選擇一個機種 !!!";
                break;
           case "errorMsg03": msg = "這個欄位需要填寫 !!!";
                break;
           default: msg = "Error !"
         }
         break;
    default:
         switch (msge){
           case "errorMsg01": msg = "Please select a item !!!";
                break;
           case "errorMsg02": msg = "Please select a Model !!!";
                break;
           case "errorMsg03": msg = "This column must be written !!!";
                break;
           default: msg = "Error !"
         }      
  }

   if (eval(obj).value=="")
      {	
        if (msg!="") {alert(msg);}
           eval(obj).focus();
           return false;
      }
   return true;
}

//*******************************************

function IsEmail(frm_oname,lange,msge)
{
var obj;
var fvalue;
var chkStr=new RegExp("^([0-9a-zA-Z])([0-9a-zA-Z_-])*(\\.[0-9a-zA-Z_-]+)*@([0-9a-zA-Z_-]+\\.)+([0-9a-zA-Z_-]+)([a-zA-Z])$","g")
obj="document."+frm_oname;
fvalue=eval(obj).value

  switch (lange){
    case "Dutch":
         switch (msge){
           case "errorMsg21": msg = "Gelieve de juiste informatie op te geven !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "English":
         switch (msge){
           case "errorMsg21": msg = "Please enter correct information !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "German":
         switch (msge){
           case "errorMsg21": msg = "Bitte geben Sie korrekte Angaben an !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "French":
         switch (msge){
           case "errorMsg21": msg = "Entrez votre information valide !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "Korea":
         switch (msge){
           case "errorMsg21": msg = "정확한 정보를 입력하십시오.";
                break;
           default: msg = "Error !"
         }
         break;
    case "Portuguese":
         switch (msge){
           case "errorMsg21": msg = "Favor digitar a informação correta !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "SChinese":
         switch (msge){
           case "errorMsg21": msg = "请输入正确的数据 !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "Spanish":
         switch (msge){
           case "errorMsg21": msg = "Please enter correct information !!!";
                break;
           default: msg = "Error !"
         }
         break;
    case "TChinese":
         switch (msge){
           case "errorMsg21": msg = "請輸入正確的資料 !!!";
                break;
           default: msg = "Error !"
         }
         break;
    default:
         switch (msge){
           case "errorMsg21": msg = "Please enter correct information !!!";
                break;
           default: msg = "Error !"
         }      
  }

 if ((fvalue=="")||fvalue.match(chkStr)==null)
     { 
        alert(msg);
        eval(obj).focus();
        return false;
     }
return true;  
}

//****************************************

function Ischar(frm_oname,str,mag)
{
var obj;
var fvalue;
obj="document."+frm_oname;
fvalue=eval(obj).value;

 if (fvalue.indexOf (str) == -1)
     { alert(mag);
      
      eval(obj).focus();
      return false; 
     }
return true;  
}

//****************************************

function IsSame(frm_oname,frm_oname2,msg)
{
var obj;
var fvalue,fvalue2;
obj="document."+frm_oname;
fvalue=eval(obj).value
obj="document."+frm_oname2;
fvalue2=eval(obj).value
//alert(fvalue+'='+fvalue2)
 if (fvalue!=fvalue2)
     { 
     alert(msg);
     eval(obj).focus();
     return false; 
     }
  else
    { 
      return true; 
    }
}

//****************************************

function chk_len(frm_oname)
{
 var obj;
 obj="document."+frm_oname;
 var pp=eval(obj).value
 if (pp.length<4||pp.length>8)
   {
   alert("Please input 4-8 character password");
   eval(obj).focus();
   return false; 
   }
  else
  {
  return true;
  } 
}

//****************************************

function depparseInt(str)
{
 var a=parseInt(str);
 var pos=0;
 str=Cstr(str);
 var str1=str.substring(pos,pos+1);
 var lenth;
 if (str1.indexOf("-")!=-1)
 {pos++;a=parseInt(str.substring(pos,str.length)); var tag=1}
 
 while (a==0)
 {  //remove 0 char in front of the str
   lenth=str.length;
   if (isNaN(parseInt(str.substring(pos,pos+1)))) return 0;
   str=str.substring(pos+1,lenth);
   a=parseInt(str);
   pos++;
 }
 if (isNaN(a)) return 0;
 if (tag==1) a=parseInt('-'+Cstr(a));
 return a;
}