var Cal = 0;
var FIELD;
var FORMAT;
var SelectedYear , SelectedMonth , SelectedDay;
var DOW = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
//===========================
function Cal_Open(F,Format) {
  FORMAT = Format;
  var F1=eval("document.forms[0]." + F);
  FIELD=F1;
  var NOW = new Date(FIELD.value);
  if (isNaN(NOW)) NOW = new Date();
  var Y,M;
  SelectedYear= NOW.getYear();
  if (SelectedYear < 0) SelectedYear = 1900 + SelectedYear;  //Mozilla Fix
  if (SelectedYear < 200) SelectedYear = 1900 + SelectedYear;  //Mozilla Fix
  SelectedMonth=NOW.getMonth() + 1;
  SelectedDay= NOW.getDate();
  if (Cal!=0) WriteDiv("D"+Cal,"");
  Cal=F;
  PCal(SelectedYear , SelectedMonth , SelectedDay);
  Over();
  var TIMER = setTimeout("Close_Cal()",1000); // Timer to close cal
} 
//===========================
function Set_Date(V) {
  var SetDate = new Date(V);
  if (FORMAT == "dow dd/mm/yy") V = DOW[SetDate.getDay()] + " " + V;
  else if (FORMAT == "dd/mm") V = (SetDate.getMonth() + 1) + "/" + SetDate.getDate();
  FIELD.value=V;
  WriteDiv("D"+Cal,"");
} 
//===========================
function PCal(Y,M) {
  var DT1= new Date(Y,M-1,1,0,0,0);
  var FIRST=DT1.getDay(); // DOW of 1st day of the month
  var MON = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
  var FEB = (leapYear(Y)) ? 29 : 28;
  var All_DAYS= new Array(31,FEB,31,30,31,30,31,31,30,31,30,31);
  var DAYS = All_DAYS[M-1];
  //Start
  var T;
  T="<table border=0 class = \"CalStyle\" border=0 cellpadding = 1 cellspacing = 1";
  T=T+" onmousemove=Over() onmouseout=Out()>";
  var LastY;
  var LastM;
  var NextY;
  var NextM;
  LastY = Y;
  LastM = M-1;
  if (LastM<1) {LastM=12;LastY=LastY-1;}
  NextY = Y;
  NextM = M+1;
  if (NextM>12) {NextM=1;NextY=NextY+1;}
  var LastY2;
  var NextY2;
  LastY2 = Y-1;
  NextY2 = Y+1;
  T=T+"<tr>";
  T=T+"<td><a class=CalHREF href=\"Javascript:PCal("+LastY2+","+M+")\"><<</a></td>";
  T=T+"<td colspan=5 bgcolor= black align=center>";
  T=T+"<font style=\"font-family:Verdana;font-size:7pt;color:white;\">" + Y + "</font></td>";
  T=T+"<td><a class=CalHREF href=\"Javascript:PCal("+NextY2+","+M+")\">>></a></td>";
  T=T+"</tr>";
  T=T+"<tr>";
  T=T+"<td><a class=CalHREF href=\"Javascript:PCal("+LastY+","+LastM+")\"><<</a></td>";
  T=T+"<td colspan=5 bgcolor= black align=center>";
  T=T+"<font style=\"font-family:Arial;font-size:7pt;color:white;\">" + MON[M-1] + "</font></td>";
  T=T+"<td><a class=CalHREF href=\"Javascript:PCal("+NextY+","+NextM+")\">>></a></td>";
  T=T+"</tr>";
  T=T+"<tr>";
  var START=1;
  START = START + FIRST;
  if (START >1) T=T+"<td colspan=" + FIRST + "></td>"
  for (i=START,DAY=1;DAY<=DAYS;i++,DAY++) {
    if (Y==SelectedYear && M==SelectedMonth && DAY==SelectedDay) {BGC='#000000';TXTC='#c0c0c0';}
    else {BGC='#c0c0c0';TXTC='#000000';}
    T=T+"<td onmouseover=DayOver(this) onmouseout=DayOut(this,'"+BGC+"','"+TXTC+"')";
    T=T+" onclick=Set_Date('" + M + "/" + DAY + "/" + Y + "') ";
    T=T+" style=\"color:" + TXTC + ";background-color:" + BGC + "\">";
    T=T+"<font style=\"font-size:7pt;font-family:Arial\">" + DAY + "</font></td>";
    if (i%7 == 0) T=T+"</tr><tr>";
  }
  T=T+"</tr>";
  T=T + "</table>";
  WriteDiv("D"+Cal,T);
}
//===========================
function leapYear(Y) {
  if (Y%4 ==0) return true;
  else return false;
}
//===========================
function Over() {
  if (Cal != 0) {var D=setdivA("D"+Cal); D.isOn=true;}
}
//===========================
function Out() {
  if (Cal != 0) {var D=setdivA("D"+Cal); D.isOn=false;}
  var TIMER = setTimeout("Close_Cal()",500); // Timer to close cal
}
//===========================
function DayOver(D) {
  D.style.color = '#ffffff';
  D.style.backgroundColor='#000000';
}
//===========================
function DayOut(D,BackColor,TextColor) {
  D.style.color = TextColor;
  D.style.backgroundColor=BackColor;
}
//===========================
function Close_Cal() {
  if (Cal != 0) {
    var D=setdivA("D"+Cal);
    if (D.isOn!=true) {
     D.isOn=false;
     WriteDiv("D"+Cal,"");
     Cal=0;
    }
  }
}