var weekend=[0,6];var weekendColor="#ffffff";var fontweekendColor="#ff0000";var fontface="Verdana";var fontsize=2;var gNow=new Date();var ggWinCal;isNav=(navigator.appName.indexOf("Netscape")!=-1)?true:false;isIE=(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];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="blue";this.gTextColor="black";this.gHeaderColor="black";this.gWeekEndHeaderColor="red";this.gWeekDayHeaderColor="black"
this.gReturnItem=p_item;}
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("Concorde Calendar");this.wwrite("");this.wwrite("");this.wwriteA("");this.wwriteA("
");var prevMMYYYY=Calendar.calc_month_year(this.gMonth,this.gYear,-1);var prevMM=prevMMYYYY[0];var prevYYYY=prevMMYYYY[1];var nextMMYYYY=Calendar.calc_month_year(this.gMonth,this.gYear,1);var nextMM=nextMMYYYY[0];var nextYYYY=nextMMYYYY[1];this.wwrite("");this.wwrite("");this.wwrite("| ")
this.wwrite("");this.wwriteA(this.gMonthName+" "+this.gYear);this.wwrite(" |
");vCode=this.getMonthlyCalendarCode();this.wwrite(vCode);this.wwrite("");this.gWinCal.document.close();}
Calendar.prototype.showY=function(){var vCode="";var i;var vr,vc,vx,vy;var vxf=285;var vyf=200;var vxm=10;var vym;if(isIE)vym=75;else if(isNav)vym=25;this.gWinCal.document.open();this.wwrite("");this.wwrite("Calendar");this.wwrite("");this.wwrite("");this.wwrite("");this.wwrite("");this.wwrite("Year : "+this.gYear);this.wwrite("
");var prevYYYY=parseInt(this.gYear)-1;var nextYYYY=parseInt(this.gYear)+1;this.wwrite("
");var j;for(i=11;i>=0;i--){if(isIE)
this.wwrite("");else if(isNav)
this.wwrite("");this.gMonth=i;this.gMonthName=Calendar.get_month(this.gMonth);vCode=this.getMonthlyCalendarCode();this.wwrite(this.gMonthName+"/"+this.gYear+"
");this.wwrite(vCode);if(isIE)
this.wwrite("
");else if(isNav)
this.wwrite("");}
this.wwrite("
");this.gWinCal.document.close();}
Calendar.prototype.wwrite=function(wtext){this.gWinCal.document.writeln(wtext);}
Calendar.prototype.wwriteA=function(wtext){this.gWinCal.document.write(wtext);}
Calendar.prototype.cal_header=function(){var vCode="";vCode=vCode+"";vCode=vCode+"| Sun | ";vCode=vCode+"Mon | ";vCode=vCode+"Tue | ";vCode=vCode+"Wed | ";vCode=vCode+"Thu | ";vCode=vCode+" Fri | ";vCode=vCode+"Sat | ";vCode=vCode+"
";return vCode;}
Calendar.prototype.cal_data=function(){var vDate=new Date();vDate.setDate(1);vDate.setMonth(this.gMonth);vDate.setFullYear(this.gYear);var vFirstDay=vDate.getDay();var vDay=1;var vLastDay=Calendar.get_daysofmonth(this.gMonth,this.gYear);var vOnLastDay=0;var vCode="";vCode=vCode+"";for(i=0;i ";}
for(j=vFirstDay;j<7;j++){if((j==0)||(j==6)){vCode=vCode+"| "+""+""+
this.format_day(vDay)+""+" | ";vDay=vDay+1;}
else{vCode=vCode+""+""+
this.format_day(vDay)+""+" | ";vDay=vDay+1;}}
vCode=vCode+"
";for(k=2;k<7;k++){vCode=vCode+"";for(j=0;j<7;j++){if((j==0)||(j==6)){vCode=vCode+"| "+""+""+
this.format_day(vDay)+""+" | ";vDay=vDay+1;}
else{vCode=vCode+""+""+
this.format_day(vDay)+""+" | ";vDay=vDay+1;}
if(vDay>vLastDay){vOnLastDay=1;break;}}
if(j==6)
vCode=vCode+"
";if(vOnLastDay==1)
break;}
for(m=1;m<(7-j);m++){if(this.gYearly)
vCode=vCode+" | ";else
vCode=vCode+""+m+" | ";}
return vCode;}
Calendar.prototype.format_day=function(vday){var vNowDay=gNow.getDate();var vNowMonth=gNow.getMonth();var vNowYear=gNow.getFullYear();if(vday==vNowDay&&this.gMonth==vNowMonth&&this.gYear==vNowYear)
return(""+vday+"");else
return(vday);}
Calendar.prototype.write_weekend_string=function(vday){var i;for(i=0;i 
"+"
<\/A>"+"
<\/A>