<!--
// 空白チェック
function checknull(obj,msg){
	if(obj.value==''){
		alert(msg+'の入力は必須です');
		obj.focus();
		return false;
	}
	return true;
}
// 数字列のチェック
function checknumber(num){
	for(var i=0;i<num.length;i++){
		if(isNaN(parseInt(num.charAt(i),10))) return 0;
	}
	if(parseInt(num,10)<=0) return 0;
	return num.length;
}
// フォーマットエラーメッセージ
function alertmsg(msg,obj){
		alert(msg+'の形式が間違っています');
		obj.focus();
}
// 郵便番号チェック
function checkzip(obj,retnull){
	var retval=true;
	var value=obj.value;
	if (value=='') retval=retnull;	// 無入力時
	else {
		var del=value.indexOf('-');
		if (del==-1)
			retval=(value.length==3?(checknumber(value)>0):false);
		else if (del!=3 || (value.length-del)!=5)
			retval=false;
		else if (checknumber(value.substring(0,del))==0 ||
						checknumber(value.substring(del+1,value.length))==0){
			retval=false;
		}
	}
	if(retval==false) alert-msg('郵便番号',obj);
	return retval;
}
// メールアドレスチェック
function checkmail(obj,retnull){
	var retval=true;
	var value =obj.value;
	if (value=='') retval=retnull;
	else {
		var del=value.indexOf('@');
		retval = (del>0 && (value.length-del)>1
					 && value.substring(del+1).indexOf('@')==-1);
	}
	if(retval==false)
		alert-msg('E-Mailアドレス',obj);
	return retval;
}
// 電話番号チェック
function checktel(obj,retnull){
	var retval=true;
	var value =obj.value;
	if (value=='') retval=retnull;
	else {
		var st=0,del=value.indexOf('-'),s1=0,s2=0,s3=0;
		if(del<=st) retval=false;
		else if ((s1=checknumber(value.substring(st,del)))==0)
			retval=false;
		else {
			st=del+1; del=value.indexOf('-',st);
			if(del<=st || del==(value.length-1)) retval=false;
			else if ((s2=checknumber(value.substring(st,del)))==0 ||
							 (s3=checknumber(value.substring(del+1,value.length)))==0)
				retval=false;
		}
		if(retval && (s1+s2+s3)!=10) retval=false;
	}
	if (retval==false)
		alert-msg('電話番号',obj);
	return retval;
}
function checkdummy(obj){
	var txt = obj.value;
	if(txt!='') obj.value+=' = '+escape(txt);
}

//個別のFormCheck

// function を
// <form method="POST" action="A.xsl" name="cfa" onsubmit="return checkad(this);">
// の形で呼び出すこと


// Add
function checkad(cfa){
//Author 作者名
	if(!checknull(cfa.Author,	'名前'))	return false;
//Author_Email メールアドレス
	if(! checknull(cfa.Author_Email,	'メールアドレス'))	return false;
//Syntax 構文
	if(!checknull(cfa.Syntax,	'カスタム関数名・構文'))	return false;
//Summary 概要
	if(!checknull(cfa.Summary,	'カスタム関数概要'))	return false;
//Evaluate_Text 入力例
	if(!checknull(cfa.Evaluate_Text,	'入力例'))	return false;
//Evaluate_Result 結果
	if(!checknull(cfa.Evaluate_Result,	'結果'))	return false;
//Formula 式
	if(!checknull(cfa.Formula,	'カスタム関数の計算式'))	return false;
//Description 詳細説明
	if(!checknull(cfa.Description,	'詳細説明'))	return false;
	return true;
}


// Feedback
function checkfb(fb){
//Feedback_Name 名前
	if(!checknull(fb.Feedback_Name,	'名前'))	return false;
//Feedback_Email メールアドレス
	if(! checknull(fb.Feedback_Email,	'メールアドレス'))	return false;
//Feedback_Comments コメント
	if(!checknull(fb.Feedback_Comments,	'コメント'))	return false;
}

// -->
