function myRound(pValue, pNum)
{
	//Javascript提供的四捨五入的方式與一般認定的四捨五入方式不同，所以要自己撰寫四捨五入的程式
	return Math.round(pValue * Math.pow(10,pNum) + (0.01 / Math.pow(10,pNum))) / Math.pow(10,pNum);
}


function ChkNum(mKind,id)
{
	switch(mKind) 
	{
	//允許負數-能輸入小數點
	case "1":
		//小數點只能出現一次
		var v1;
		var v2;
		v1 = document.all(id).value;
		v2 = v1.indexOf(".",0);
		
		if (((window.event.keyCode >=48) && (window.event.keyCode <=57)) || ((window.event.keyCode == 46) && (v2 < 0)) || (window.event.keyCode == 45))
		{
			window.event.returnValue = true;
		}
		else
		{
			window.event.returnValue = false;
		}
		break;
	//允許負數-不能輸入小數點
	case "2":
		if ((window.event.keyCode >=48 && window.event.keyCode <=57) || window.event.keyCode == 45)
		{
			window.event.returnValue = true;
		}
		else
		{
			window.event.returnValue = false;
		}
		break;
	//允許正整數-能輸入小數點
	case "3":
		//小數點只能出現一次
		var v1;
		var v2;
		v1 = document.all(id).value;
		v2 = v1.indexOf(".",0);
		
		if (((window.event.keyCode >=48) && (window.event.keyCode <=57)) || ((window.event.keyCode == 46) && (v2 < 0)))
		{
			window.event.returnValue = true;
		}
		else
		{
			window.event.returnValue = false;
		}
		break;
	//允許正整數-不能輸入小數點
	case "4":
		if (window.event.keyCode >=48 && window.event.keyCode <=57)
		{
			window.event.returnValue = true;
		}
		else
		{
			window.event.returnValue = false;
		}
		break;    
	}
}

function ChkEmail(Field) 
{
  //var FieldValue=Field.value;
  var FieldValue=document.all(Field).value;
  
  if (FieldValue!='')
   {
    if (FieldValue.indexOf("@",0)==-1) 
      {
        return(true);
      }
    else
      {
        return(false);
      }
   }
}


function ChkKey(mTable,mField)
{		
	//檢查Key值是否重複
	var resultObj;
	var callObj = CreateCallObj(false,"ExcuteSQL");
	var WhereStr;
	var aObj = new Array();
	var bObj = new Array();
	aObj = mField.split(",");
	
	WhereStr = " where ";
	
	var i = 0;
	for(i=0;i<aObj.length;i++)
	{
		if (i != 0)
		{
			WhereStr += " and "
		}
		WhereStr += aObj[i] + "='" + document.all(aObj[i]).value + "'";
		//alert( document.all(aObj[i]).value);
	}
	VSQL = "SELECT " + mField + " FROM " + mTable + WhereStr ;
	
	//alert('VSQL=' + VSQL);
	
	resultObj = _Service.WService.callService(callObj,VSQL);

	if(!resultObj.error)
	{
		var objNodeList = GetXmlNodeList(resultObj.value);
		var str1 = ""
		
		if (objNodeList.length > 0)
		{
			//str1 += js_ChkKey
			return(true);
		}
		else
		{
			return(false);
		}
		
		//return(str1);
	}
	else
	{
		CallServiceError(resultObj);
		return(false);
	}
}



//檢查統編
function ValidateNO(myValue)
{
	var CheckNum = new Array(1,2,1,2,1,2,4,1); 
	i=0; 
	Amount=0;
    Amount2 = 0;
    
    if (myValue.length != 8)
    { 
        return false;
    }

    for (i=0;i<=7;i++) 
    { 
	   	if (!((myValue.substr(i,1)>="0") && (myValue.substr(i,1)<="9"))) 
		{ 
			return false; 
		} 
		else 
		{
			if (i==6)
			{
				Amount  += (CalNO_Unit(parseInt(myValue.substr(i,1)) * CheckNum[i],2));
				Amount2 += (CalNO_Unit(parseInt(myValue.substr(i,1)) * CheckNum[i],1));
			}
			else
			{
				Amount += (CalNO(parseInt(myValue.substr(i,1)) * CheckNum[i]));
				Amount2 += (CalNO(parseInt(myValue.substr(i,1)) * CheckNum[i]));
			}
		}
    } 
    
    if (((Amount % 10)  == 0) || ( (Amount2 % 10) == 0)  )
    {
		return true;
    }
    else
    {
		return false;
    }
}

function CalNO(singleValue)
{
    if (singleValue > 9) 
    {
	    return (parseInt(singleValue.toString().substr(0,1)) + parseInt(singleValue.toString().substr(1,1)));
    }
    else
    {
		return singleValue;
    }

}  

		
function CalNO_Unit(singleValue,nflag)
{
    if (singleValue > 9)
    {
	    subresult = parseInt(singleValue.toString().substr(0,1)) + parseInt(singleValue.toString().substr(1,1));
    
		if (subresult > 9) 
		{
			if (nflag==2)
			{
				return parseInt(subresult.toString().substr(0,1));
			}
			else
			{
				return parseInt(subresult.toString().substr(1,1));
			}
		}
		else
		{
			return subresult;
		}
    }
    else
    { 
    return singleValue;
    }
}	


//取代單引號
function ReplaceStr(FormValue)
{
   var ans,i,str,strReplace;
   var str=/'/i;
   ans='';
   strReplace="'";
   
   for (i=0;i<=FormValue.length;i++)
   {
     if (FormValue.charAt(i)!='')
     {
        str=FormValue.charAt(i);
        ans+=str.replace(strReplace,"''");
     } 
   }
   //alert(FormValue + '     =' +ans);
   return ans;
}


function WSTrim(myValue)
{
  if (myValue.length == 0 ) 
  {
    return ""; 
  }
  else
  {
    startbit = 0;
    for (startbit=0;startbit<=myValue.length-1;startbit++) 
    { 
       if (myValue.substr(startbit,1) != " ")
       {
          break;
       }
    }
    
    endbit = myValue.length-1;
    for (endbit=myValue.length-1;endbit>=0;endbit--)
    {
      if (myValue.substr(endbit,1) != " ")
      {
          break;
      }
    }

    if ((startbit > myValue.length-1 ) || (endbit < 0))
    {
       return "";
    }
    else
    {
       return myValue.substring(startbit,endbit+1);   
    } 
  }
}

function IsLock(mValue) 
{
//檢查是否已關帳
  var mYmm;
  mYmm = (new Date(mValue)).getFullYear();
  mYmm +=Int2Str((new Date(mValue)).getMonth()+1);
  
  var SQL;
  SQL = "select Count(*) as Cnt from BWEX where BSNAM >= '" + mYmm + "' and BSNUM = 'FMMSK' and BSITM = 'VYMM'";
  
  SQLScale.SQL =  SQL;
  SQLScale.getXml();
  return(SQLScale.value);
}

function Int2Str(i) {
	var s;
	if (i < 10) {
		s = "0" +i;
	}
	else {
		s = i;
	}
	return s;
		
}


function CheckYYYYMM(sValue)
{

	var bResult = 0; // 0代表false
		
	if (sValue.length==6)		
		if (!isNaN(parseInt(sValue)))				
			if ((sValue.substring(4, 6)>='01') && (sValue.substring(4, 6)<='12'))			
				bResult = 1;
	
	return bResult;
}

function TranZero(mValue)	
{
	if (isNaN(mValue))
	{
		return 0;
	}
	else if (mValue=="") 
	{
	   return 0;
	}
	else
	{
		return mValue;
	}
}


function checkchinese(str) {
  var strlen=str.length;   	
  if(strlen>0){
    var oldstrlen=str.length
    for(var i=0;i<strlen;i++) {
      c='';  c = escape(str.charAt(i));	
      if( c.charAt(0) == '%') {	
        var cc=''; 
        cc = c.charAt(1); //IE~u,NS~A
        if(cc =='A' ||cc =='u'){ return true; }
      }
    }
  return false; 
  } else { 
      return false; 
  }
}

function ChkEng(str) 
{  
  var FieldValue=str.toUpperCase();
  //alert(FieldValue);
  var English='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
  //var strlen=FieldValue.length;
  var Engcount;
  var Englen=English.length;
  if (FieldValue!='')
   {
		for(var i=0;i<Englen;i++) {	
			if (FieldValue.indexOf(English.charAt(i),0) != -1) {
				return true; 
				break;
			}         
		} 	
	} 
   
}