/*压缩类型：标准*/
/***********************************************
JS文件说明：
该文件是系统中最基础的JS文件，所有页面必须首先载入该文件。
该文件提供了一些常用的方法，并提供了跨浏览器的JS替代方案。

作者：叶中奇
版本：1.0 2006-4-3
***********************************************/

Com_RegisterFile("common.js");

/***********************************************
功能：引入JS文件
参数
	fileList：文件名列表，用|分隔多值
	contextPath：文件路径，默认值为"js/"
	extendName：文件扩展名，默认从文件名中获取
***********************************************/
function Com_IncludeFile(fileList, contextPath, extendName){
	var i, j, fileType;
	if(contextPath==null)
		contextPath = "js/";
	fileList = fileList.split("|");
	for(i=0; i<fileList.length; i++){
		fileList[i] = (contextPath+fileList[i]).toLowerCase();
		if(Com_ArrayGetIndex(Com_Parameter.JsFileList, fileList[i])==-1){
			Com_Parameter.JsFileList[Com_Parameter.JsFileList.length] = fileList[i];
			if(extendName==null){
				j = fileList[i].lastIndexOf(".");
				if(j>-1)
					fileType = fileList[i].substring(j+1);
				else
					fileType = "js";
			}else{
				fileType = extendName;
			}
			switch(fileType){
				case "js":
					document.writeln("<script src="+Com_Parameter.ResPath+fileList[i]+"></script>");
					break;
				case "css":
					document.writeln("<link rel=stylesheet href="+Com_Parameter.ResPath+fileList[i]+">");
			}
		}
	}
}

/***********************************************
功能：注册js文件
参数：
	fileName：文件名
***********************************************/
function Com_RegisterFile(fileName){
	fileName = "js/"+fileName.toLowerCase();
	if(Com_ArrayGetIndex(Com_Parameter.JsFileList, fileName)==-1)
		Com_Parameter.JsFileList[Com_Parameter.JsFileList.length] = fileName;
}

/***********************************************
功能：获取数组中指定关键字的位置
参数：
	arr：数组
	key：关键字
返回：关键字所在的位置，找不到则返回-1
***********************************************/
function Com_ArrayGetIndex(arr, key){
	for(var i=0; i<arr.length; i++)
		if(arr[i]==key)
			return i;
	return -1;
}

/***********************************************
功能：关闭窗口
***********************************************/
function Com_CloseWindow(){
	if(Com_Parameter.CloseInfo!=null)
		if(!confirm(Com_Parameter.CloseInfo))
			return;
	try{
		var win = window;
		for(var frameWin = win.parent; frameWin!=null && frameWin!=win; frameWin=win.parent){
			if(frameWin["Frame_CloseWindow"]!=null){
				frameWin["Frame_CloseWindow"](win);
				return;
			}
			win = frameWin;
		}
	}catch(e){}
	try{
		top.opener = top;
		top.close();
	}catch(e){}
}

/***********************************************
功能：设置窗口的标题
参数：
	Title：标题文本
***********************************************/
function Com_SetWindowTitle(Title){
	try{
		top.document.title = Title;
	}catch(err){
	}
}

Com_Parameter.IE = (typeof window.ActiveXObject!="undefined");		//全局变量，判断当前浏览器是否为IE浏览器

/***********************************************
功能：往某个对象中添加一个事件
参数：
	obj：对象，如：window、document等
	eventType：事件名称，不以on开始，比如："load"、"mouseover"
	func：需要执行的函数
***********************************************/
function Com_AddEventListener(obj, eventType, func){
	if(Com_Parameter.IE)
		obj.attachEvent("on"+eventType, func);
	else
		obj.addEventListener(eventType, func, false);
}

/***********************************************
功能：往某个对象中删除一个事件
参数：
	obj：对象，如：window、document等
	eventType：事件名称，不以on开始，比如："load"、"mouseover"
	func：已经添加的函数
***********************************************/
function Com_RemoveEventListener(obj, eventType, func){
	if(Com_Parameter.IE)
		obj.detachEvent("on"+eventType, func);
	else
		obj.removeEventListener(eventType, func, false);
}

/***********************************************
功能：打开一个新窗口
参数：
	url：窗口路径，若Com_Parameter.IsAutoTransferPara设置为True，则自动往URL中添加当前窗口的参数
	target：
		null/""：在下一个帧中打开，若在第一帧调用则打开第三帧页面
		1/2/3/4：在指定的帧打开（见首页界面说明）
		string：目标帧名称
	winStyle：
		当在首页帧结构集中打开，仅当打开第4帧时该参数有效，其值可为：
			"max"：新开窗口最大化
			"mid"：新开窗口跟视图窗口各分一半的空间
			"min"：新开窗口最小化
		若不是在首页真结构集打开时，跟window.open的参数一样
返回：新窗口对象
***********************************************/
function Com_OpenWindow(url, target, winStyle){
	if(Com_Parameter.IsAutoTransferPara)
		url = Com_CopyParameter(url);
	url = Com_SetUrlParameter(url, "s_css", Com_Parameter.Style);
	var eventObj = Com_GetEventObject();
	if(eventObj!=null && eventObj.shiftKey==true){
		target = "_blank";
		document.selection.empty();
	}
	if(target=="1" || target=="2" || target=="3" || target=="4")
		target = parseInt(target);
	if(target==null || target=="" || target==1 || target==2 || target==3 || target==4){
		var win = Com_RunMainFrameFunc("Frame_OpenWindow", url, target, winStyle);
		if(win==null) {
			target = Com_GetUrlParameter(location.href, "s_target");
			if(target==null)
				target = "_blank";
			win = window.open(url, target);
		}
		return win;
	}else
		if(winStyle==null || winStyle=="")
			return window.open(url, target);
		else
			return window.open(url, target, winStyle);
}

/***********************************************
功能：拷贝当前URL的参数拷贝到指定的URL中
参数：
	url：目标URL
返回：拷贝后的新的URL
***********************************************/
function Com_CopyParameter(url){
	if(location.search=="")
		return url;
	var paraList = location.search.substring(1).split("&");
	var i, j, para, value;
	for(i=0; i<paraList.length; i++){
		j = paraList[i].indexOf("=");
		if(j==-1)
			continue;
		para = paraList[i].substring(0, j);
		value = Com_GetUrlParameter(url, para);
		if(value==null)
			url = Com_SetUrlParameter(url, para, decodeURIComponent(paraList[i].substring(j+1)));
	}
	return url;
}

/***********************************************
功能：提交表单，并保持提交后的URL参数不进行改变
参数：
	formObj：表单对象
	method：提交方法
***********************************************/
function Com_Submit(formObj, method, clearParameter){
	if (!bCancel){
		if(formObj.onsubmit!=null && !formObj.onsubmit())
			return false;
		for(var i=0; i<Com_Parameter.event["submit"].length; i++)
			if(!Com_Parameter.event["submit"][i]())
				return false;
	}
	var i;
	var url = Com_CopyParameter(formObj.action);
	if(clearParameter!=null){
		clearParameter = clearParameter.split(":");
		for(i=0; i<clearParameter.length; i++)
			url = Com_SetUrlParameter(url, clearParameter[i], null);
	}
	if(method!=null)
		url = Com_SetUrlParameter(url, "method", method);
	var seq = parseInt(Com_GetUrlParameter(url, "s_seq"));
	seq = isNaN(seq)?1:seq+1;
	url = Com_SetUrlParameter(url, "s_seq", seq);
	formObj.action = url;
	var btns = document.getElementsByTagName("INPUT");
	for(i=0; i<btns.length; i++)
		if(btns[i].type=="button" || btns[i].type=="image")
			btns[i].disabled = true;
	btns = document.getElementsByTagName("A");
	for(i=0; i<btns.length; i++){
		btns[i].disabled = true;
		btns[i].removeAttribute("href");
		btns[i].onclick = null;
	}
	formObj.submit();
	return true;
}


/***********************************************
功能：提交表单，并保持提交后的URL参数不进行改变,所有按钮不变灰
参数：
	formObj：表单对象
	method：提交方法
***********************************************/
function Com_SubmitNoEnabled(formObj, method){
	if (!bCancel){
		if(formObj.onsubmit!=null && !formObj.onsubmit())
			return false;
		for(var i=0; i<Com_Parameter.event["submit"].length; i++)
			if(!Com_Parameter.event["submit"][i]())
				return false;
	}
	var url = Com_CopyParameter(formObj.action);
	if(method!=null)
		url = Com_SetUrlParameter(url, "method", method);
	var seq = parseInt(Com_GetUrlParameter(url, "s_seq"));
	seq = isNaN(seq)?1:seq+1;
	url = Com_SetUrlParameter(url, "s_seq", seq);
	formObj.action = url;
	formObj.submit();
	return true;
}

/***********************************************
功能：获取URL中的参数（调用该函数不需要考虑编码的问题）
参数：
	url：URL
	param：参数名
返回：参数值
***********************************************/
function Com_GetUrlParameter(url, param){
	var re = new RegExp();
	re.compile("[\\?&]"+param+"=([^&]*)", "i");
	var arr = re.exec(url);
	if(arr==null)
		return null;
	else
		return decodeURIComponent(arr[1]);
}

/***********************************************
功能：设置URL参数，若参数不存在则添加一个，否则覆盖原有参数
参数：
	url：URL
	param：参数名
	value：参数值
返回：URL
***********************************************/
function Com_SetUrlParameter(url, param, value){
	var re = new RegExp();
	re.compile("([\\?&]"+param+"=)[^&]*", "i");
	if(value==null){
		if(re.test(url)){
			url = url.replace(re, "");
		}
	}else{
		value = encodeURIComponent(value);
		if(re.test(url)){
			url = url.replace(re, "$1"+value);
		}else{
			url += (url.indexOf("?")==-1?"?":"&") + param + "=" + value;
		}
	}
	if(url.charAt(url.length-1)=="?")
		url = url.substring(0, url.length-1);
	return url;
}

/***********************************************
功能：替换HTML代码中的敏感字符
***********************************************/
function Com_HtmlEscape(s){
	if(s==null || s=="")
		return "";
	var re = /&/g;
	s = s.replace(re, "&amp;");
	re = /\"/g;
	s = s.replace(re, "&quot;");
	re = /</g;
	s = s.replace(re, "&lt;");
	re = />/g;
	return s.replace(re, "&gt;");
}

/***********************************************
功能：获取Event对象，必须在事件触发中调用
返回：Event对象
***********************************************/
function Com_GetEventObject(){
	if(Com_Parameter.IE)
		return event;
	var rtnVal = null;
	for(var func=Com_GetEventObject.caller; func!=null; func=func.caller)
		if(func.arguments[0] && func.arguments[0].constructor==Event)
			return func.arguments[0];
	return null;
}

/***********************************************
功能：设置对象的OuterHTML
参数：
	obj：对象
	htmlCode：html代码
返回：html代码
***********************************************/
function Com_SetOuterHTML(obj, htmlCode){
	if(Com_Parameter.IE)
		obj.outerHTML = htmlCode;
	else
	{
		if(htmlCode=="")
			obj.parentNode.removeChild(obj);
		else
		{
			var r = obj.ownerDocument.createRange();
			r.setStartBefore(obj);
			var df = r.createContextualFragment(htmlCode);
			obj.parentNode.replaceChild(df, obj);
		}
	}
	return htmlCode;
}

/***********************************************
功能：将某个对象中的属性值替换字符串中的“!{属性名}”变量
注意：若对象中没有该属性，此方法会自动认为该属性为""
参数：
	str：原字符串
	obj：查找属性值的对象
返回：替换后的字符串
***********************************************/
function Com_ReplaceParameter(str, obj){
	var re = new RegExp("!\\{(.+?)\\}");
	for(var arr=re.exec(str); arr!=null; arr=re.exec(str)){
		var value = eval("obj."+arr[1]);
		str = RegExp.leftContext+(value==null?"":encodeURIComponent(value))+RegExp.rightContext;
	}
	return str;
}

/***********************************************
功能：禁止当前事件的默认行为
***********************************************/
function Com_EventPreventDefault(){
	var eventObj = Com_GetEventObject();
	if(eventObj!=null){
		if(Com_Parameter.IE)
			eventObj.returnValue = false;
		else
			eventObj.preventDefault();
	}
}
//=============================以下函数为内部函数，普通模块请勿调用==============================

/***********************************************
功能：运行主帧的一个函数
参数：
	funcName：函数名（字符串）
	arg1、arg2、arg3、arg4：参数
返回：函数的返回值
***********************************************/
function Com_RunMainFrameFunc(funcName, arg1, arg2, arg3, arg4){
	try{
		var win = window;
		for(var frameWin = win.parent; frameWin!=null && frameWin!=win; frameWin=win.parent){
			if(frameWin[funcName]!=null)
				return frameWin[funcName](win, arg1, arg2, arg3, arg4);
			win = frameWin;
		}
	}catch(e){}
	return null;
}

var bCancel = false; 
Com_Parameter.event = new Array;
Com_Parameter.event["submit"] = new Array;

Com_Parameter.Loaded = false;
Com_AddEventListener(window, "load", function(){
	Com_Parameter.Loaded = true;
})
//=============================以上函数为内部函数，普通模块请勿调用==============================