Calendar

var weekend=[0,6];var weekendColor="#e0e0e0";var fontface="Arial";var gNow=new Date();var ggWinCal;var isNav=(navigator.appName.indexOf("Netscape")!=-1)?true:false;var bIsIE=(navigator.appName.indexOf("Microsoft")!=-1)?true:false;Calendar.Months=["January","February","March","April","May","June","July","August","September","October","November","December"];Calendar.DOMonth=[31,28,31,30,31,30,31,31,30,31,30,31];Calendar.lDOMonth=[31,29,31,30,31,30,31,31,30,31,30,31];var isId=false;function Calendar(p_item,p_WinCal,p_month,p_year,p_format){if((p_month==null)&&(p_year==null)){return}if(p_WinCal==null){this.gWinCal=ggWinCal}else{this.gWinCal=p_WinCal}if(p_month==null){this.gMonthName=null;this.gMonth=null;this.gYearly=true}else{this.gMonthName=Calendar.get_month(p_month);this.gMonth=new Number(p_month);this.gYearly=false}this.gYear=p_year;this.gFormat=p_format;this.gBGColor="white";this.gFGColor="black";this.gTextColor="black";this.gHeaderColor="black";var escQ=/'/g;this.gReturnItem=p_item.replace(escQ,"\\'")}Calendar.get_month=Calendar_get_month;Calendar.get_daysofmonth=Calendar_get_daysofmonth;Calendar.calc_month_year=Calendar_calc_month_year;Calendar.print=Calendar_print;function Calendar_get_month(monthNo){return Calendar.Months[monthNo]}function Calendar_get_daysofmonth(monthNo,p_year){if((p_year%4)==0){if((p_year%100)==0&&(p_year%400)!=0){return Calendar.DOMonth[monthNo]}return Calendar.lDOMonth[monthNo]}else{return Calendar.DOMonth[monthNo]}}function Calendar_calc_month_year(p_Month,p_Year,incr){var ret_arr=new Array();if(incr==-1){if(p_Month==0){ret_arr[0]=11;ret_arr[1]=parseInt(p_Year)-1}else{ret_arr[0]=parseInt(p_Month)-1;ret_arr[1]=parseInt(p_Year)}}else{if(incr==1){if(p_Month==11){ret_arr[0]=0;ret_arr[1]=parseInt(p_Year)+1}else{ret_arr[0]=parseInt(p_Month)+1;ret_arr[1]=parseInt(p_Year)}}}return ret_arr}function Calendar_print(){ggWinCal.print()}function Calendar_calc_month_year(p_Month,p_Year,incr){var ret_arr=new Array();if(incr==-1){if(p_Month==0){ret_arr[0]=11;ret_arr[1]=parseInt(p_Year)-1}else{ret_arr[0]=parseInt(p_Month)-1;ret_arr[1]=parseInt(p_Year)}}else{if(incr==1){if(p_Month==11){ret_arr[0]=0;ret_arr[1]=parseInt(p_Year)+1}else{ret_arr[0]=parseInt(p_Month)+1;ret_arr[1]=parseInt(p_Year)}}}return ret_arr}new Calendar();Calendar.prototype.getMonthlyCalendarCode=function(){var vCode="";var vHeader_Code="";var vData_Code="";vCode=vCode+'';vHeader_Code=this.cal_header();vData_Code=this.cal_data();vCode=vCode+vHeader_Code+vData_Code;vCode=vCode+"

";return vCode};Calendar.prototype.show=function(){var vCode="";this.gWinCal.document.open();this.wwrite("");this.wwrite("Calendar");this.wwrite("