<!--

function CheckFloatText( strData, intSize, blnNull, blnZero, blnNeg ) {
	var strIntData,strDecimalData,intPos,intWork,blnDecimalFlg,blnCanmaFlg;
	//Get integer and decimal data
	intPos = strData.indexOf(".",0);
	if (intPos!=-1) {intWork = strData.indexOf(".",intPos+1);if (intWork==-1) {blnDecimalFlg = true;strIntData=strData.substring(0,intPos);strDecimalData=strData.substring(intPos+1,strData.length);}else return false;}
	else {blnDecimalFlg=false;strIntData=strData;strDecimalData="";}	
	//Check integer data
	intCount = 0; blnCanmaFlg = false;
	for (intI=strIntData.length;intI>0;intI--)	{
		strWork = strIntData.substring(intI-1,intI);
		if (strWork>="0" && strWork <="9") {intCount++;}
		else if (strWork==",") {blnCanmaFlg = true;if (intCount==3) {intCount = 0;}else{return false}}
		else {return false;}
	}
	if (blnCanmaFlg==true && intCount>3) {return false;}
	if (strIntData.length>1 && strWork=="0") {return false;}
	//Check decimal data
	if (blnDecimalFlg==true) {if (intSize<strDecimalData.length || strDecimalData.length==0) {return false;}for (intI=0;intI<strDecimalData.length;intI++) {strWork = strDecimalData.substring(intI,intI+1);if (!(strWork>="0" && strWork<="9")) {return false;}}}
	if (!blnNull && strData=="") return false;
	if (!blnZero && parseFloat(strData)==0) return false;
	if (!blnNeg  && parseFloat(strData)<0) return false;
	return true;
}

function CheckRate(strData) {
	if (!isNaN(strData)){if (parseFloat(strData)>=0){return true;} else{return false;}} else{return false;}
}

function Clear( objForm ) {
	objForm.ar.value = "";
	objForm.br.value = "";
	objForm.cr.value = "";
	objForm.dr.value = "";
	objForm.er.value = "";
	objForm.f.value = "";
}

function Calculate( objForm ) {
	var objRemittance = objForm.f;
	var strRate;
	if (!CheckFloatText(objRemittance.value,0,false,false,false)) {alert("送金額を正しく入力してください。"); objRemittance.focus(); return false;}
	strRate = objForm.a.value; SetDollar(CheckRate(strRate),strRate,objRemittance.value,objForm.ar);
	strRate = objForm.b.value; SetDollar(CheckRate(strRate),strRate,objRemittance.value,objForm.br);
	strRate = objForm.c.value; SetDollar(CheckRate(strRate),strRate,objRemittance.value,objForm.cr);
	strRate = objForm.d.value; SetDollar(CheckRate(strRate),strRate,objRemittance.value,objForm.dr);
	strRate = objForm.e.value; SetDollar(CheckRate(strRate),strRate,objRemittance.value,objForm.er);
	return false;
}

function SetDollar(blnSet,strRate,strRemittance,objDollar) {
	var intNum,intDec1,intDec2;
	if (!blnSet) {objDollar.value="-"; return false;}
	intNum = Math.round((strRemittance/strRate)*100);
	intDec2 = intNum - Math.floor(intNum/10)*10;
	intDec1 = Math.floor(intNum/10) - Math.floor(intNum/100)*10; 
	objDollar.value = "" + Math.floor(intNum/100) + "." + intDec1 + intDec2;
}

//-->