function AceStyle(){this.color='#000000';this.backgroundColor='#FFFFFF';this.fontStyle='';this.fontWeight='';this.fontSize='';this.fontFamily='';this.borderWidth='1px';this.borderStyle='solid';this.borderColor='#FFFFFF';this.padding='0px';this.getStyle=function(){var sRet='';var aName=['border-width','border-style','border-color','color','background-color','font-style','font-weight','font-size','font-family','padding'];var aVal=[this.borderWidth,this.borderStyle,this.borderColor,this.color,this.backgroundColor,this.fontStyle,this.fontWeight,this.fontSize,this.fontFamily,this.padding];for(var i=0;i<aName.length;i++){sRet+=aName[i]+':'+aVal[i]+';';}return sRet;};};function ToUnicode(str){var ar=new Array(str.length);for(var i=0;i<str.length;i++){ar[i]=str.charCodeAt(i);}return ar;};function FromUnicode(ar){var str='';for(var i=0;i<ar.length;i++){str+=String.fromCharCode(ar[i]);}return str;};function AceCalendar(){this.ver=1.2;this.id=null;this.formId='aceCal';this.formTag=true;this.styles=Array(6);for(var i=0;i<this.styles.length;i++){this.styles[i]=new AceStyle();}this.yrId='yr_num';this.moId='mo_num';this.dtId='dt_num';this.months=['Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'];this.days =['M','T','W','T','F','S','S'];this.oDate=new Date();this.lastDay=7;this.setAction=function(){};this.getDate=function(){return this.oDate.getDate();};this.getDay=function(){return this.oDate.getDay();};this.getMonth=function(){return this.oDate.getMonth();};this.getYear=function(){return this.oDate.getFullYear();};this.getString=function(){return this.oDate.toLocaleString();};this.setName=function(name){this.id=name;};this.setFieldNames=function(yrName,moName,dtName){if(yrName!=null&&yrName!=''){this.yrId=yrName;}if(moName!=null&&moName!=''){this.moId=moName;}if(dtName!=null&&dtName!=''){this.dtId=dtName;}};this.setFormName=function(formName,formTag){this.formId=formName;this.formTag=formTag;};this.setStyle=function(){var id;if(arguments.length>0){id=arguments[0];}if(arguments.length>1&&arguments[1]!=''){this.styles[id].borderColor=arguments[1];}if(arguments.length>2&&arguments[2]!=''){this.styles[id].backgroundColor=arguments[2];}if(arguments.length>3&&arguments[3]!=''){this.styles[id].color=arguments[3];}if(arguments.length>4){if(arguments[4]==0){this.styles[id].fontStyle='normal';}else{this.styles[id].fontStyle='italic';}}if(arguments.length>5){if(arguments[5]==0){this.styles[id].fontWeight='normal';}else{this.styles[id].fontWeight='bold';}}};this.setFont=function(){if(arguments.length>0&&arguments[0]!=''){this.styles[5].fontFamily=arguments[0];}if(arguments.length>1&&arguments[1]!=''){this.styles[5].fontSize=arguments[1];}};this.setFirstDay=function(){var s=arguments[0];switch(s){case"1":this.days =['S','M','T','W','T','F','S'];this.lastDay=6;break;case"0":default:this.days =['M','T','W','T','F','S','S'];this.lastDay=7;break;}};this.display=function(){if(!document.getElementById)return;if(this.id==null)return;var m,y,d,w;var yr,mth;var str='';if(arguments.length>0&&arguments[0]!='')this.oDate.setYear(arguments[0]);if(arguments.length>1&&arguments[1]!='')this.oDate.setMonth(arguments[1]);if(arguments.length>2&&arguments[2]!='')this.oDate.setDate(arguments[2]);str+='<table border="0" cellpadding="0" cellspacing="0" style="'+this.styles[5].getStyle()+'">';str+='<tr><td style="text-align:center;" width="100%" colspan="7" align="center" nowrap>';str+='<select size="1" name="'+this.moId+'" onchange="'+this.id+'.changeDate()" onkeyup="'+this.id+'.changeDate()">';mth=this.oDate.getMonth();for(m=0;m<this.months.length;m++){if(m==mth){str+='<option value="'+m+'" selected>'+this.months[m]+'</option>';}else{str+='<option value="'+m+'">'+this.months[m]+'</option>';}}str+='</select>';str+='<select size="1" name="'+this.yrId+'" onchange="'+this.id+'.changeDate()" onkeyup="'+this.id+'.changeDate()">';yr=this.oDate.getFullYear();y=yr-10;str+='<option value="'+y+'">'+y+' &lt;&lt;</option>';for(y=yr-9;y<yr+10;y++){if(y==yr){str+='<option value="'+y+'" selected>'+y+'</option>';}else{str+='<option value="'+y+'">'+y+'</option>';}}y=yr+10;str+='<option value="'+y+'">'+y+' &gt;&gt;</option>';str+='</select>';str+='<input type="hidden" name="'+this.dtId+'">';str+='</td></tr>';str+='<tr>';for(d=0;d<this.days.length;d++){str+='<td style="text-align:center;" align="center"><div style="'+this.styles[4].getStyle()+'">'+this.days[d]+'</div></td>';}str+='</tr>';var id;for(w=0;w<6;w++){str+='<tr>';for(d=this.lastDay;d<this.days.length;d++){str+=this.writeDate(w,d);}for(d=0;d<this.lastDay;d++){str+=this.writeDate(w,d);}str+='</tr>';}str+='</table>';document.write(str);this.changeDate();this.displayDay();};this.writeDate=function(w,d){var id;var str='';if(d==5||d==6){id=1;}else{id=0;}str+='<td style="text-align:center;" align="center">';str+='<a style="text-decoration:none" href="" onclick="return false;">';str+='<div id="'+this.id+w+d+'" style="'+this.styles[id].getStyle()+'" onclick="'+this.id+'.changeDay(this.innerHTML)">&nbsp;</div>';str+='</a></td>';str+='</td>';return str;};this.parseDay=function(str){var re=new RegExp('\\D*(\\d+)\\D*','i');var arr=re.exec(str);if(arr!=null){return parseInt(arr[1]);}else{return 0;}};this.displayDay=function(){var day=this.oDate.getDate();var id;var oElement;document.forms[this.formId].elements[this.dtId].value=day;for(w=0;w<6;w++){for(d=0;d<7;d++){if(this.parseDay(document.getElementById(this.id+w+d).innerHTML)==day){oElement=document.getElementById(this.id+w+d);if(d==5||d==6){id=3;}else{id=2;}oElement.style.borderColor=this.styles[id].borderColor;oElement.style.backgroundColor=this.styles[id].backgroundColor;oElement.style.color=this.styles[id].color;oElement.style.fontWeight=this.styles[id].fontWeight;oElement.style.fontStyle=this.styles[id].fontStyle;break;}}}};this.changeDay=function(str){var day=this.parseDay(str);if(day!=0){this.resetDay();this.oDate.setDate(day);this.displayDay();this.setAction();}};this.resetDay=function(){var id;var oElement;for(w=0;w<6;w++){for(d=0;d<7;d++){oElement=document.getElementById(this.id+w+d);if(d==5||d==6){id=1;}else{id=0;}oElement.style.borderColor=this.styles[id].borderColor;oElement.style.backgroundColor=this.styles[id].backgroundColor;oElement.style.color=this.styles[id].color;oElement.style.fontWeight=this.styles[id].fontWeight;oElement.style.fontStyle=this.styles[id].fontStyle;}}};this.changeDate=function(){var d,w;var yr,mo;var day;var oDate=new Date();yr=document.forms[this.formId].elements[this.yrId].value;mo=document.forms[this.formId].elements[this.moId].value;this.oDate.setYear(yr);this.oDate.setMonth(mo);oDate.setDate(1);oDate.setYear(yr);oDate.setMonth(mo);for(w=0;w<6;w++){for(d=0;d<7;d++){document.getElementById(this.id+w+d).innerHTML='&nbsp;';}}this.resetDay();for(w=0,d=1;d<=31;d++){oDate.setDate(d);if(d!=oDate.getDate())break;day=oDate.getDay();if(day==0){day=6;}else{day=day-1;}document.getElementById(this.id+w+day).innerHTML=d;if(day==this.lastDay-1)w++;}this.displayDay();this.setAction();this.changeYear(oDate.getFullYear());};this.changeYear=function(yr){var oElement=document.forms[this.formId].elements[this.yrId];var oOption;var y;if(oElement.selectedIndex==0||oElement.selectedIndex==20){while(oElement.length>=1){oElement.options[0]=null;}y=yr-10;oOption=new Option(y+' <<',y);oElement.options[oElement.length]=oOption;for(y=yr-9;y<yr+10;y++){oOption=new Option(y,y);oElement.options[oElement.length]=oOption;}y=yr+10;oOption=new Option(y+' >>',y);oElement.options[oElement.length]=oOption;oElement.selectedIndex=10;}};}
