function Com_Chk_Suji(pValue,pKoumoku,pNull,pMin,pMax,pFltMax,pType,pMinus,pZero,pPreZero,pTel){var ret={result:true,errPt:0,val:null,afterVal:""};var strBuffer=comTrim(pValue);var numCheck;if(strBuffer.length==0){if(pNull){mtdAlert(pKoumoku,"cmn",-1);ret.result=false;}else{ret.val=[strBuffer];return ret;}}if(ret.result){if(pTel)strBuffer=Com_Rmv_TelMark(strBuffer);strBuffer=Com_Chg_HanZenNumVal(strBuffer,1,0);strBuffer=Com_Chg_Alpha(strBuffer,1);if(pType==1)numCheck=Com_Chk_Seisu(strBuffer,pKoumoku,pMin,pMax,pMinus,pZero,pPreZero,pTel);else numCheck=Com_Chk_Syosu(strBuffer,pKoumoku,pMax,pFltMax,pMinus);strBuffer=numCheck.num;if(!numCheck.result)ret.result=false;else{var strInt;if(pType==2)strInt=String(parseInt(strBuffer,10));else strInt=String(strBuffer);if(strInt.length<pMin){if(pMin==pMax)mtdAlert(pKoumoku,"cmn",-8,pMin);else mtdAlert(pKoumoku,"cmn",-3,pMin);ret.result=false;}else ret.result=true;}}ret.val=[strBuffer];ret.afterVal=strBuffer;return ret;}function Com_Chk_Seisu(pValue,pKoumoku,pMin,pMax,pMinus,pZero,pPreZero,pTel){var lc_chkInt;var lc_numBuf;var lc_max;var ret={result:true,num:null};var lc_num=ret.num=pValue;if(pTel){lc_num=ret.num=Com_Rmv_TelMark(lc_num);lc_chkInt=Com_Chk_Integer(lc_num);if(lc_chkInt!=0){mtdAlert(pKoumoku,"num",-7);ret.result=false;return ret;}}else{lc_chkInt=Com_Chk_Integer(lc_num);if(lc_chkInt==-1){mtdAlert(pKoumoku,"num",-2);ret.result=false;return ret;}else if(lc_chkInt==1 && !pMinus){mtdAlert(pKoumoku,"num",-3);ret.result=false;return ret;}lc_numBuf=parseInt(lc_num,10);if(!pZero){if(lc_numBuf==0){mtdAlert(pKoumoku,"cmn",-6,lc_num);ret.result=false;return ret;}}if(pPreZero)lc_num=ret.num=lc_numBuf;}if(pMax!=0){if(lc_chkInt==1)lc_max=eval(pMax+1);else lc_max=parseInt(pMax,10);if(String(lc_num).length>lc_max){if(pMin==pMax)mtdAlert(pKoumoku,"cmn",-8,pMin);else mtdAlert(pKoumoku,"cmn",-2,pMax);ret.result=false;return ret;}}return ret;}function Com_Chk_Syosu(pValue,pKoumoku,pMax,pFltMax,pMinus){var lc_num;var lc_chk_num;var lc_int;var lc_flt_chk;var lc_int_max;var lc_all_max;var checkOk=true;var ret={result:true,num:null};lc_num=ret.num=pValue;lc_flt_chk=Com_Chk_Float(lc_num,pMinus);switch(lc_flt_chk){case 1:mtdAlert(pKoumoku,"num",-1);checkOk=false;break;case 2:if(!pMinus){mtdAlert(pKoumoku,"num",-4);checkOk=false;}break;case 3:mtdAlert(pKoumoku,"num",-5);checkOk=false;break;case 4:mtdAlert(pKoumoku,"num",-6);checkOk=false;break;case 5:mtdAlert(pKoumoku,"num",-5);checkOk=false;break;}if(!checkOk){ret.result=false;return ret;}lc_chk_num=Math.pow(10,pFltMax);lc_num=ret.num=Math.round(lc_num * lc_chk_num)/ lc_chk_num;if(lc_flt_chk==2)lc_all_max=eval(pMax+1);else lc_all_max=pMax;lc_int_max=lc_all_max-pFltMax;lc_int=Math.floor(lc_num);if(String(lc_int).length>lc_int_max){if(pFltMax>0){var alertTxt=""+eval(pMax-pFltMax);mtdAlert(pKoumoku,"cmn",-2,alertTxt);}else{mtdAlert(pKoumoku,"cmn",-2,lc_all_max);}ret.result=false;}return ret;}
