var last_obj
var last_className

//带1个参数的高亮函数
function SetHighLight(obj,key1,objkey1)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
	    key1.value=objkey1;
}
//带25个参数的高亮函数
function SetHighLight25(obj,key1,objkey1,key2,objkey2,key3,objkey3,key4,objkey4,key5,objkey5,key6,objkey6,key7,objkey7,key8,objkey8,key9,objkey9,key10,objkey10,key11,objkey11,key12,objkey12,key13,objkey13,key14,objkey14,key15,objkey15,key16,objkey16,key17,objkey17,key18,objkey18,key19,objkey19,key20,objkey20,key21,objkey21,key22,objkey22,key23,objkey23,key24,objkey24,key25,objkey25)
{
	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";

        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
	    key4.value=objkey4;
	    key5.value=objkey5;
	    key6.value=objkey6;
	    key7.value=objkey7;
	    key8.value=objkey8;
	    key9.value=objkey9;
	    key10.value=objkey10;
	    key11.value=objkey11;
	    key12.value=objkey12;
	    key13.value=objkey13;
	    key14.value=objkey14;
	    key15.value=objkey15;
	    key16.value=objkey16;
	    key17.value=objkey17;
	    key18.value=objkey18;
	    key19.value=objkey19;
	    key20.value=objkey20;	     
	    key21.value=objkey21;
	    key22.value=objkey22;
	    key23.value=objkey23;
	    key24.value=objkey24;
	    key25.value=objkey25;
}

//带2个参数的高亮函数
function SetHighLightt(obj,key1,objkey1,key2,objkey2)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
}
//带3个参数的高亮函数
function SetHighLighttt(obj,key1,objkey1,key2,objkey2,key3,objkey3)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
}
//带4个参数的高亮函数
function SetHighLight4(obj,key1,objkey1,key2,objkey2,key3,objkey3,key4,objkey4)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
	    key4.value=objkey4;
}
//带5个参数的高亮函数
function SetHighLight5(obj,key1,objkey1,key2,objkey2,key3,objkey3,key4,objkey4,key5,objkey5)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
	    key4.value=objkey4;
	    key5.value=objkey5;
}
//带6个参数的高亮函数
function SetHighLight6(obj,key1,objkey1,key2,objkey2,key3,objkey3,key4,objkey4,key5,objkey5,key6,objkey6)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
	    key4.value=objkey4;
	    key5.value=objkey5;
	    key6.value=objkey6;
}
//带7个参数的高亮函数
function SetHighLight7(obj,key1,objkey1,key2,objkey2,key3,objkey3,key4,objkey4,key5,objkey5,key6,objkey6,key7,objkey7)
{

	if(last_obj!=null)
		last_obj.className=last_className;

	last_obj=obj;
	last_className = new String(obj.className);

	if(obj.className!="Tablehead")
		obj.className="TablerowSelected";
        key1.value=objkey1;
	    key2.value=objkey2;
	    key3.value=objkey3;
	    key4.value=objkey4;
	    key5.value=objkey5;
	    key6.value=objkey6;
	    key7.value=objkey7;
}
//from表示:包含可选择项目的select对象名字 to表示:列出可选择项目的select对象名字
//你可以根据你的具体情况修改
function copyToList(from,to) 
{
  fromList = eval('document.form1.' + from);
  toList = eval('document.form1.' + to);
  if (toList.options.length > 0 && toList.options[0].value == 'temp')
  {
    toList.options.length = 0;
  }
  var sel = false;
  for (i=0;i<fromList.options.length;i++)
  {
    var current = fromList.options[i];
    if (current.selected)
    {
      sel = true;
      if (current.value == 'temp')
      {
        alert ('你不能选择这个项目!');
        return;
      }
      txt = current.text;
      val = current.value;
      toList.options[toList.length] = new Option(txt,val);
      fromList.options[i] = null;
      i--;
    }
  }
  if (!sel) alert ('你还没有选择任何项目');
}
//利用chosen框中选择的内容的option值用“,”分割，付给隐藏单行文本框chosen_s，提交后将chosen_s进行分割取得相应的值
//这是当用户按下提交按钮时，对列出选择的select对象执行全选工作，让递交至的后台程序能取得相关数据
function allSelect() 
{
  List = document.form1.chosen;
  document.all.chosen_s.value = "";
  if ((List.length==0) && (List.options[0].value == 'temp')) return false;
  for (i=0;i<List.length;i++)
  {
     List.options[i].selected = true;
	 if(i == 0){//判断不将,付到第一个字符前边
	 	document.all.chosen_s.value = List.options[i].value;
	 }
	 else{
	
	 document.all.chosen_s.value +=','+List.options[i].value;
	 }
  }
  
}

function s(){
return
}
function copyAll(from,to){
  var fromList = eval('document.form1.' + from);
  var toList = eval('document.form1.' + to);
  if (toList.options.length > 0 && toList.options[0].value == 'temp')
  {
    toList.options.length = 0;
  }
  for (i=0;i<fromList.options.length;i++)
  {
      var current = fromList.options[i];
      toList.options[toList.length] = new Option(current.text,current.value);
      fromList.options[i] = null;
      i--;
  }

}
//弹出窗口、日期
function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_openBrWindow(theURL,winName,features) {
		window.open(theURL,winName,features);
}

function closewindow()
{	
	window.close();
}

function MM_setTextOfTextfield(objName,x,newText) { //v3.0
  var obj = MM_findObj(objName); if (obj) obj.value = newText;
}

function fPopUpCalendarDlg(ctrlobj)
{
	showx = event.screenX - event.offsetX - 4 - 210 ; // + deltaX;
	showy = event.screenY - event.offsetY + 18; // + deltaY;
	newWINwidth = 210 + 4 + 18;

	retval = window.showModalDialog("CalendarDlg.htm", "", "dialogWidth:197px; dialogHeight:230px; dialogLeft:"+showx+"px; dialogTop:"+showy+"px; status:no; directories:yes;scrollbars:no;Resizable=no; "  );
	if( retval != null ){
		MM_setTextOfTextfield(ctrlobj,'',retval);
	}else{
		//alert("canceled");
	}
}
//日期
function Arabia_to_Chinese(Num){
   for(i=Num.length-1;i>=0;i--)
   {
    Num = Num.replace(",","")//替换tomoney()中的“,”
    Num = Num.replace(" ","")//替换tomoney()中的空格
   }
   Num = Num.replace("￥","")//替换掉可能出现的￥字符
   if(isNaN(Num)) { //验证输入的字符是否为数字
    alert("请检查小写金额是否正确");
    return;
   }
   //---字符处理完毕，开始转换，转换采用前后两部分分别转换---//
   part = String(Num).split(".");
   newchar = ""; 
   //小数点前进行转化
   for(i=part[0].length-1;i>=0;i--){
   if(part[0].length > 10){ alert("位数过大，无法计算");return "";}//若数量超过拾亿单位，提示
    tmpnewchar = ""
    perchar = part[0].charAt(i);
    switch(perchar){
    case "0": tmpnewchar="零" + tmpnewchar ;break;
    case "1": tmpnewchar="壹" + tmpnewchar ;break;
    case "2": tmpnewchar="贰" + tmpnewchar ;break;
    case "3": tmpnewchar="叁" + tmpnewchar ;break;
    case "4": tmpnewchar="肆" + tmpnewchar ;break;
    case "5": tmpnewchar="伍" + tmpnewchar ;break;
    case "6": tmpnewchar="陆" + tmpnewchar ;break;
    case "7": tmpnewchar="柒" + tmpnewchar ;break;
    case "8": tmpnewchar="捌" + tmpnewchar ;break;
    case "9": tmpnewchar="玖" + tmpnewchar ;break;
    }
    switch(part[0].length-i-1){
    case 0: tmpnewchar = tmpnewchar +"元" ;break;
    case 1: if(perchar!=0)tmpnewchar= tmpnewchar +"拾" ;break;
    case 2: if(perchar!=0)tmpnewchar= tmpnewchar +"佰" ;break;
    case 3: if(perchar!=0)tmpnewchar= tmpnewchar +"仟" ;break;
    case 4: tmpnewchar= tmpnewchar +"万" ;break;
    case 5: if(perchar!=0)tmpnewchar= tmpnewchar +"拾" ;break;
    case 6: if(perchar!=0)tmpnewchar= tmpnewchar +"佰" ;break;
    case 7: if(perchar!=0)tmpnewchar= tmpnewchar +"仟" ;break;
    case 8: tmpnewchar= tmpnewchar +"亿" ;break;
    case 9: tmpnewchar= tmpnewchar +"拾" ;break;
    }
    newchar = tmpnewchar + newchar;
   }
   //小数点之后进行转化
   if(Num.indexOf(".")!=-1){
   if(part[1].length > 2) {
   // alert("小数点之后只能保留两位,系统将自动截段");
    part[1] = part[1].substr(0,2)
    }
   for(i=0;i<part[1].length;i++){
    tmpnewchar = ""
    perchar = part[1].charAt(i)
    switch(perchar){
    case "0": tmpnewchar="零" + tmpnewchar ;break;
    case "1": tmpnewchar="壹" + tmpnewchar ;break;
    case "2": tmpnewchar="贰" + tmpnewchar ;break;
    case "3": tmpnewchar="叁" + tmpnewchar ;break;
    case "4": tmpnewchar="肆" + tmpnewchar ;break;
    case "5": tmpnewchar="伍" + tmpnewchar ;break;
    case "6": tmpnewchar="陆" + tmpnewchar ;break;
    case "7": tmpnewchar="柒" + tmpnewchar ;break;
    case "8": tmpnewchar="捌" + tmpnewchar ;break;
    case "9": tmpnewchar="玖" + tmpnewchar ;break;
    }
    if(i==0)tmpnewchar =tmpnewchar + "角";
    if(i==1)tmpnewchar = tmpnewchar + "分";
    newchar = newchar + tmpnewchar;
   }
   }
   //替换所有无用汉字
   while(newchar.search("零零") != -1)
    newchar = newchar.replace("零零", "零");
   newchar = newchar.replace("零亿", "亿");
   newchar = newchar.replace("亿万", "亿");
   newchar = newchar.replace("零万", "万");
   newchar = newchar.replace("零元", "元");
   newchar = newchar.replace("零角", "");
   newchar = newchar.replace("零分", "");

   if (newchar.charAt(newchar.length-1) == "元" || newchar.charAt(newchar.length-1) == "角")
    newchar = newchar+"整"
   return newchar;
  }
var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#808080";
var gcToggle = "#C1E3CC";
var gcToggle1="#FF8080";
var gcBG = "#FFF9AE";
var gcBG1="#0066CC";
var previousObject = null;


var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();

var gCalMode = "";
var gCalDefDate = "";

var CAL_MODE_NOBLANK = "2";

function fSetDate(iYear, iMonth, iDay){
  //VicPopCal.style.visibility = "hidden";
  if ((iYear == 0) && (iMonth == 0) && (iDay == 0)){
  	gdCtrl.value = "";
  }else{
  	iMonth = iMonth + 100 + "";
  	iMonth = iMonth.substring(1);
  	iDay   = iDay + 100 + "";
  	iDay   = iDay.substring(1);
  	gdCtrl.value = iYear+"-"+iMonth+"-"+iDay;
  }
  
  for (i in goSelectTag)
  	goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;
  
  window.returnValue=gdCtrl.value;
  window.close();
}

function HiddenDiv()
{
	var i;
  VicPopCal.style.visibility = "hidden";
  for (i in goSelectTag)
  	goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;

}
function fSetSelected(aCell){
  var iOffset = 0;
  var iYear = parseInt(tbSelYear.value);
  var iMonth = parseInt(tbSelMonth.value);
  
  aCell.bgColor = gcBG;
  with (aCell.children["cellText"]){
  	var iDay = parseInt(innerText);
  	if (color==gcGray)
		iOffset = (Victor<10)?-1:1;

	/*** below temp patch by maxiang ***/
	if( color == gcGray ){
		iOffset = (iDay < 15 )?1:-1;
	}
	/*** above temp patch by maxiang ***/

	iMonth += iOffset;
	if (iMonth<1) {
		iYear--;
		iMonth = 12;
	}else if (iMonth>12){
		iYear++;
		iMonth = 1;
	}
  }
  fSetDate(iYear, iMonth, iDay);
}

function Point(iX, iY){
	this.x = iX;
	this.y = iY;
}

function fBuildCal(iYear, iMonth) {
  
  var aMonth=new Array();
  for(i=1;i<7;i++)
  	aMonth[i]=new Array(7);
  
  for ( i=1;i<7;i++) {
  	 	for ( j=0;j<7;j++) {
  	 	   aMonth[i][j] = new Array(2);
  	 	   aMonth[i][j][0] = 0;
  	 	   aMonth[i][j][1] = 1;
  	 	}
  }	 	   
  
  var dCalDate=new Date(iYear, iMonth-1, 1);
  
  var iDayOfFirst=dCalDate.getDay();
  
  var iDaysInMonth=new Date(iYear, iMonth, 0).getDate();
  
  var iOffsetLast=new Date(iYear, iMonth-1, 0).getDate()-iDayOfFirst+1;
  
  var iDate = 1;
  var iNext = 1;

  for (d = 0; d < 7; d++) {
	aMonth[1][d][0] = (d<iDayOfFirst)?-(iOffsetLast+d):iDate++;
   if (isToday(iYear,iMonth,iDate-1)) {
      aMonth[1][d][1] = 0;            
      
   }   
  } 
  for (w = 2; w < 7; w++) {
  	for (d = 0; d < 7; d++) {
		aMonth[w][d][0] = (iDate<=iDaysInMonth)?iDate++:-(iNext++);		
	   
	   if (isToday(iYear,iMonth,iDate-1)) {
      	aMonth[w][d][1] = 0;
      	
      }
	}
  }		
  return aMonth;
}

function isToday(iYear,iMonth,iDate) {
   var gdCurDate1 = new Date();
   var giYear1 = gdCurDate.getFullYear();
   var giMonth1 = gdCurDate.getMonth()+1;
   var giDay1 = gdCurDate.getDate();
   if (iYear == giYear1 && iMonth==giMonth1 && giDay1 ==iDate) {
        return true;
   }            
}       


function fDrawCal(iYear, iMonth, iCellHeight, sDateTextSize) {
  var WeekDay = new Array("日","一","二","三","四","五","六");
  var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' height='"+iCellHeight+"' style='font-size:12px; ";
  with (document) {
	write("<tr>");
		write("<td colspan=7 align=center><font color=#ff3333 size=2>日&nbsp;&nbsp;</font><font size=2 color=#000000>一&nbsp;&nbsp;二&nbsp;&nbsp;三&nbsp;&nbsp;四&nbsp;&nbsp;五&nbsp;</font><font size=2 color=#ff3333>&nbsp;六</font></td>");
	write("</tr>");

  	for (w = 1; w < 7; w++) {
		write("<tr>");
		for (d = 0; d < 7; d++) {
						
			write("<td "+styleTD+"cursor:hand;' onMouseOver='this.bgColor=gcToggle' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)' id=cellTd>");
			write("<font id=cellText ></font>");
			write("</td>")
		}
		write("</tr>");
	}
  }
}

function fUpdateCal(iYear, iMonth) {
  myMonth = fBuildCal(iYear, iMonth);
  var i = 0;
  for (w = 0; w < 6; w++) {
	for (d = 0; d < 7; d++) {
		with (cellText[(7*w)+d]) {
			Victor = i++;
			if (myMonth[w+1][d][0]<0) {
				color = gcGray;
				innerText = -myMonth[w+1][d][0];
			}else{
				if( d == 0 ){
					color = "#996633";
				}else if( d == 6 ){
					color = "#996633";
				}else{
					color = "#996633";
				}
				// End of above maxiang
				innerText = myMonth[w+1][d][0];
			}
			if (myMonth[w+1][d][1] ==0 && myMonth[w+1][d][0]>0) {			   
			   color= "red";
			}			
		}
		
		
	 }
  } 	 	   
		
		
}

function fSetYearMon(iYear, iMon){
  tbSelMonth.options[iMon-1].selected = true;
  for (i = 0; i < tbSelYear.length; i++)
	if (tbSelYear.options[i].value == iYear)
		tbSelYear.options[i].selected = true;
  fUpdateCal(iYear, iMon);
}

function fPrevMonth(){
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;
  if(iMon==1&&iYear==1930){
  return;
   }
  if (--iMon<1) {
	  iMon = 12;
	  iYear--;
  }
  
  fSetYearMon(iYear, iMon);
}

function fNextMonth(){
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;
  if(iMon==12&&iYear==2049){
  return;
   }
  if (++iMon>12) {
	  iMon = 1;
	  iYear++;
  }
  
  fSetYearMon(iYear, iMon);
}

function fToggleTags(){
  with (document.all.tags("SELECT")){
 	for (i=0; i<length; i++)
 		if ((item(i).Victor!="Won")&&fTagInBound(item(i))){
 			item(i).style.visibility = "hidden";
 			goSelectTag[goSelectTag.length] = item(i);
 		}
  }
}

function fTagInBound(aTag){
  with (VicPopCal.style){
  	var l = parseInt(left);
  	var t = parseInt(top);
  	var r = l+parseInt(width);
  	var b = t+parseInt(height);
	var ptLT = fGetXY(aTag);
	return !((ptLT.x>r)||(ptLT.x+aTag.offsetWidth<l)||(ptLT.y>b)||(ptLT.y+aTag.offsetHeight<t));
  }
}

function fGetXY(aTag){
  var oTmp = aTag;
  var pt = new Point(0,0);
  do {
  	pt.x += oTmp.offsetLeft;
  	pt.y += oTmp.offsetTop;
  	oTmp = oTmp.offsetParent;
  } while(oTmp.tagName!="BODY");
  return pt;
}


function fPopCalendar(popCtrl, dateCtrl, mode, defDate){
	
	gCalMode = mode;
	gCalDefDate = defDate;
	
  if (popCtrl == previousObject){
	  	if (VicPopCal.style.visibility == "visible"){
  		//HiddenDiv();
  		return true;
  	}
  	
  }
  previousObject = popCtrl;
  gdCtrl = dateCtrl;
  fSetYearMon(giYear, giMonth); 
  var point = fGetXY(popCtrl);

	if( gCalMode == CAL_MODE_NOBLANK ){
		document.all.CAL_B_BLANK.style.visibility = "hidden";	
	}else{
		document.all.CAL_B_BLANK.style.visibility = "visible";
	}	

  with (VicPopCal.style) {
  	left = point.x;
	top  = point.y+popCtrl.offsetHeight;
	width = VicPopCal.offsetWidth;
	height = VicPopCal.offsetHeight;
	fToggleTags(point); 	
	visibility = 'visible';
  }
}

var gMonths = new Array("1月","2月","3月","4月","5月","6月","7月","8月","9月","10月","11月","12月");

with (document) {
write("<Div id='VicPopCal' style='OVERFLOW:hidden;POSITION:absolute;VISIBILITY:hidden;border:0px ridge;width:100%;height:100%;top:0;left:0;z-index:100;overflow:hidden'>");
write("<table border='0'>");
write("<TR>");
write("<td valign='middle' align='center'><input type='button' name='PrevMonth' value='<' style='height:20;width:20;FONT:bold;background-color:#83B899;color:#ffffff' onClick='fPrevMonth()'>");
write("&nbsp;<SELECT name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");
for(i=1930;i<2050;i++)
	write("<OPTION value='"+i+"'>"+i+"年</OPTION>");
write("</SELECT>");
write("&nbsp;<select name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");
for (i=0; i<12; i++)
	write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
write("&nbsp;<input type='button' name='PrevMonth' value='>' style='height:20;width:20;FONT:bold;background-color:#83B899;color:#ffffff' onclick='fNextMonth()'>");
write("</td>");
write("</TR><TR>");
write("<td align='center'>");
write("<DIV style='background-color:#83B899'><table width='100%'border='0'>");
fDrawCal(giYear, giMonth, 8, '40');
write("</table></DIV>");
write("</td>");
write("</TR><TR><TD align='center'>");
write("<TABLE width='100%'><TR><TD align='center' width=50%>");
write("<B ID=\"CAL_B_BLANK\" style='color:"+gcBG1+"; visibility:visible; cursor:hand; font-size:12px' onclick='fSetDate(0,0,0)' onMouseOver='this.style.color=gcToggle1' onMouseOut='this.style.color=gcBG1'>[清空]</B>");
write("</td><td algin='center' width=50%>");
write("<B style='color:"+gcBG1+";cursor:hand; font-size:12px' onclick='fSetDate(giYear,giMonth,giDay)' onMouseOver='this.style.color=gcToggle1' onMouseOut='this.style.color=gcBG1'>["+giYear+"-"+giMonth+"-"+giDay+"]</B>");
write("</td></tr></table>");
write("</TD></TR>");
write("</TABLE></Div>");
}