﻿var Flg=true;function FixMny(b,d){var a,c;c=b.value;a=strToFloatRange(c,0,100000,d);a=_numToUnits(a,2);b.value=a;if(Flg==false){Alert(b);Flg=true}if(b==form2.Bdpst)if(a==0)document.form2.Bnscnt.value=0;else if(document.form2.Bnscnt.value==0)document.form2.Bnscnt.value=2}function FixMny2(b,d){var a,c;c=b.value;a=strToFloatRange3(c,0,100000,d);a=_numToUnits(a,2);b.value=a;if(Flg==false){Alert(b);Flg=true}}function FixRate2(b,d,e){var a,c;c=b.value;a=strToFloatRange2(c,0,e,d);a=_numToUnits(a,3);b.value=a;if(Flg==false){Alert(b);Flg=true}}function FixRate(b,d){var a,c;c=b.value;a=strToFloatRange2(c,0,100,d);a=_numToUnits(a,3);b.value=a;if(Flg==false){Alert(b);Flg=true}if(b==form2.Brate)if(a==0)document.form2.Bnscnt.value=0;else if(document.form2.Bnscnt.value==0)document.form2.Bnscnt.value=2}function FixTerm(b,d){var a,c;c=b.value;a=strToIntRange(c,0,100,d);a=_numToUnits(a,0);b.value=a;if(Flg==false){Alert(b);Flg=true}}function strToIntRange(e,d,c,b){var a=strToInt(e);if(a<=d||a>=c){a=b;Flg=false}return a}function strToFloatRange(e,d,c,b){var a=strToFloat(e);if(a<d||a>=c){a=b;Flg=false}return a}function strToFloatRange2(e,d,c,b){var a=strToFloat(e);if(a<d||a>c){a=b;Flg=false}return a}function strToFloatRange3(e,d,c,b){var a=strToFloat(e);if(a<=d||a>c){a=b;Flg=false}return a}function strToInt(b){if(isNaN(b))a=-1;else var a=parseInt(removeNonNumerics(b));if(isNaN(a))a=0;return a<0?0:a}function strToFloat(b){if(b==0)return b;if(isNaN(b))a=-1;else var a=parseFloat(removeNonNumerics(b));if(isNaN(a))a=-1;return a<0?-1:a}function Alert(a){alert("数値が正しくありません。正しい数値を入力してください。");window.focus();a.select();a.focus()}function checkSelect(b,a){var d=b,c=d.value;if(c==0)if(a==3)document.form2.Brate.value="0.00";else document.form2.Bdpst.value="0.00";else if(a==3&&document.form2.Brate.value==0)document.form2.Brate.value="25.00";else if(a!=3&&document.form2.Bdpst.value==0)document.form2.Bdpst.value="10.00"}function CheckEnable(b,a){if(b==1)a.disabled=0;else a.disabled=1}function isNumeric(a){return a=="."||a=="-"||a>="0"&&a<="9"}function removeNonNumerics(b){if(b==null)return null;b=""+b;var a="";if(b.charAt(0)=="0")a=a+"0";var e=true;for(var d=0;d<b.length;d++){var c=b.charAt(d);if(isNumeric(c)){if(e==true&&c=="0")continue;else e=false;a=a+c}}if(a.charAt(0)=="."){a=-1;Flg=false}return a}function _numToUnits(i,j){if(isOverflow(i))return "<i>numeric overflow</i>";var l=i<0?true:false,c="",b=j,f=Math.abs(Math.round(i*Math.pow(10,j)));if(f==0){var g="0";if(b>0){g+=".";for(var e=0;e<b;e++)g+="0"}return g}if(b==0){var o=""+f;c=o}else{var a=""+f,h=""+f,d=a.length;for(e=0;e<b+1-d;e++){a="0"+a;h="0"+h}d=a.length;var k=d-b,n=a.substring(0,k),m=h.substring(k,d);c=n+"."+m}if(l)c="-"+c;return c}function isOverflow(a){return isNaN(a)||a==Number.POSITIVE_INFINITY||a==Number.NEGATIVE_INFINITY}var strUrl=document.URL,index=strUrl.indexOf("?");if(index>0)strUrl=strUrl.substring(0,index);strUrl=strUrl+"?p=";var strUrl2="savecalcp.aspx?p=";function formAction1(d,c){var a,b,e;a=0;for(i=0;i<4;i++)if(document.form1.Objcnt[i].checked){a=document.form1.Objcnt[i].value;break}b=strUrl+d+c+"&Objcnt="+a;location.replace(b)}function formAction2(d,c,b){var a;if(c==1)a=strUrl+d+b+"&Adpst="+document.form2.Adpst.value+"&Rdpst="+document.form2.Rdpst.value+"&Bnscnt="+document.form2.Bnscnt.value+"&Bdpst="+document.form2.Bdpst.value+"&Term="+document.form2.Term.value;else if(c==2)a=strUrl+d+b+"&Adpst="+document.form2.Adpst.value+"&Rdpst="+document.form2.Rdpst.value+"&Bnscnt="+document.form2.Bnscnt.value+"&Bdpst="+document.form2.Bdpst.value+"&Odpst="+document.form2.Odpst.value;else if(c==3)a=strUrl+d+b+"&Adpst="+document.form2.Adpst.value+"&Bnscnt="+document.form2.Bnscnt.value+"&Brate="+document.form2.Brate.value+"&Odpst="+document.form2.Odpst.value+"&Term="+document.form2.Term.value;else if(c==4)a=strUrl+d+b+"&Adpst="+document.form2.Adpst.value+"&Rdpst="+document.form2.Rdpst.value+"&Bnscnt="+document.form2.Bnscnt.value+"&Bdpst="+document.form2.Bdpst.value;location.replace(a)}function formAction3(c,b){var a;a=strUrl+c+b+"&Anrtrn="+document.form3.Anrtrn.value;location.replace(a)}function formAction4(d,c){var a,b,e;for(i=0;i<2;i++)if(document.form4.Flgtax[i].checked){a=document.form4.Flgtax[i].value;break}b=strUrl+d+c+"&Flgtax="+a+"&Tax="+document.form4.Tax.value;location.replace(b)}function formAction5(c,b){var a;a=strUrl+c+b;location.replace(a)}function formAction6(c,b){var a;a=strUrl+c+b;location.replace(a)}function formActionP(c,a){var b;b=window.open(strUrl2+c+a,"_blank")}function formActionError(c,b){var a;a=strUrl+c+b;location.replace(a)}function formActionFieldError(d,c,b){var a;a=strUrl+d+c+b;location.replace(a)}