// default settings
var fontFace="verdana";
var fontSize=9;

var titleWidth=90;
var titleMode=1;
var dayWidth=12;
var dayDigits=1;

var titleColor="#cccccc";
var daysColor="#cccccc";
var bodyColor="#ffffff";
var dayColor="#ffffff";
var currentDayColor="#adadad";
var footColor="#cccccc";
var borderColor="#333333";

var titleFontColor = "#333333";
var daysFontColor = "#333333";
var dayFontColor = "#333333";
var currentDayFontColor = "#ffffff";
var footFontColor = "#333333";

var calFormat = "dd.mm.yyyy";
var calendarContainer=1;  //0- контент для слоя; 1- контент для страницы. 

var weekDay = 1;
// ------

// codes
var calWidth=150, calHeight=175, calOffsetX=-150, calOffsetY=16;
if (CalendarLoadFlag==null) {
var calWin=null;
var winX=0, winY=0;
var cal="cal";
var cals=new Array();
var currentCal=null;
}

var yxMonths=new Array("Январь", "Февраль", "Март", "Апрель", "Май", "Июнь", "Июль", "Август", "Сентябрь", "Октябрь", "Ноябрь", "Декабрь");
var yxDays=new Array("Воскресенье", "Понедельник", "Вторник", "Среда", "Четверг", "Пятница", "Суббота", "Воскресенье");
var yxLinks=new Array("[закрыть]", "[очистить]");

var isOpera=(navigator.userAgent.indexOf("Opera")!=-1)?true:false;
var isOpera5=(navigator.appVersion.indexOf("MSIE 5")!=-1 && navigator.userAgent.indexOf("Opera 5")!=-1)?true:false;
var isOpera6=(navigator.appVersion.indexOf("MSIE 5")!=-1 && navigator.userAgent.indexOf("Opera 6")!=-1)?true:false;
var isN6=(navigator.userAgent.indexOf("Gecko")!=-1);
var isN4=(document.layers)?true:false;
var isMac=(navigator.userAgent.indexOf("Mac")!=-1);
var isIE=(document.all && !isOpera && (!isMac || navigator.appVersion.indexOf("MSIE 4")==-1))?true:false;

if (isN4) {
  fontSize+=2;
}

var span2="</span>";

function CreateCalendarDiv(e) {
    var e = window.event ? window.event : e;
    var src = window.event ? e.srcElement : e.target;
    if(src.tagName!="IMG" && src.tagName!="BUTTON") return;
    var parentObj=src.parentNode;
    var DivTag=document.createElement("DIV");
	 DivTag.setAttribute("id","CalendarLayer");
	 DivTag.style.position="absolute";
	 DivTag.style.display="none";
	 DivTag.style.zIndex="100";
     if (isIE) {
       DivTag.style.marginLeft="-110px";
	   DivTag.style.marginTop="20px";
	 }
	 if (src.tagName=="IMG")
         parentObj.parentNode.appendChild(DivTag);
	 else parentObj.appendChild(DivTag);

}

function calendarBody(part) {
var str="";
 if(part=="top") {
	str+='<table cellspacing=0 cellpadding=0 border=0 width="100%" height="100%"><tr><td style="background-color:white; border:#8E8E8E 1px solid;">\n';
    str+='<table width="100%" cellpadding=0 cellspacing=0><tr><td style="cursor:default;">';
	if (calendarContainer==1) str+='<iframe style="display:block;margin:0px;" name="calIFrame" id="calIFrame" frameborder=0></iframe>';
 }
 else if (part=="bottom") {
	str+='</td></tr></table>';
    str+='</td><td height=100%><table cellpadding=0 cellspacing=0 height=100%><tr><td height=4><img src="images/e.gif" width=5 height=6></td></tr><tr><td height=100% style="width:3px; background-repeat:repeat-y;" background="images/win_bg.gif" valign=top>&nbsp;</td></tr></table></td></tr>';
    str+='<tr><td><table width="100%" cellspacing=0 cellpadding=0><tr><td><img src="images/e.gif" width=5 height=4></td><td style="width:98%; font-size:3px; background-repeat:repeat-x;" background="images/win_vbg.gif" valign=top>&nbsp;</td></tr></table></td><td valign=top><img src="images/ugol_bg.gif" width=3 height=3></td></tr></table>';
 }
return str;
}

function span1(tag) {
  return "<span class='"+tag+"'>";
}
function spanx(tag, color) {
  return "."+tag+" { font-family:"+fontFace+"; font-size:"+fontSize+"px; color:"+color+"; }\n";
}


function a1(tag) {
//  return "<a class='"+tag+"' style='cursor:pointer;color:#173C74;' onclick=";
  return "<a class='aOff' onMouseOver=\"this.className='aOn'\" onMouseOut=\"this.className='aOff'\"  onclick=";
}

function ax(tag, color) {
  return "."+tag+" { text-decoration:none; color:"+color+"; }\n";
}

function calOBJ(title, attrName, form,message,dataField,fieldPrefix) {
  if(form == null)form = document.forms[document.forms.length-1];
  if(!fieldPrefix) fieldPrefix="";
  this.name = fieldPrefix + "calendar(" + attrName + ")";
  this.field     = fieldPrefix + "date(" + attrName + ")";
  if(dataField){
  	this.dataField = dataField + "(" + attrName + ")";
  } else {
  	this.dataField = fieldPrefix + "data(" + attrName + ")";
  }
  this.hhField   = fieldPrefix + "hh(" + attrName + ")";
  this.mmField   = fieldPrefix + "mm(" + attrName + ")";
  this.ssField   = fieldPrefix + "ss(" + attrName + ")";

  this.message = message;
  this.title = title;

  if(form.tagName){
	  this.formName = form.name;
	  this.form = form;
  } else {
	  this.formName = form;
	  this.form = document.forms[this.formName];
  }

  if(this.form[this.dataField] && this.form[this.dataField].value != ""){
	  if(this.form[this.field]) this.form[this.field].value = getFormatedDate(this.form[this.dataField].value);
	  
	  setHour(this.form[this.hhField],this.form[this.dataField].value);
	  setMinute(this.form[this.mmField],this.form[this.dataField].value);
	  setSecond(this.form[this.ssField],this.form[this.dataField].value);
  }
	  addCalendarConvertEvent(this);
}
function toDate(value){
	var tmpD = new Date();tmpD.setTime(value);
	return tmpD;
}
function setHour(field,value){
	if(field)field.value = toDate(value).getHours();
}
function setMinute(field,value){
	if(field)field.value = toDate(value).getMinutes();
}
function setSecond(field,value){
	if(field)field.value = toDate(value).getSeconds();
}

function setFont(font, size) {
  if (font != "") {
    fontFace=font;
  }
  if (size > 0) {
    fontSize=size;

    if (isN4) {
      fontSize+=2;
    }
  }
}

function setWidth(tWidth, tMode, dWidth, dDigits) {
  if (tWidth > 0) {
    titleWidth=tWidth;
  }
  if (tMode == 1 || tMode == 2) {
    titleMode=tMode;
  }
  if (dWidth > 0) {
    dayWidth=dWidth;
  }
  if (dDigits > 0) {
    dayDigits=dDigits;
  }
}

function setColor(tColor, dsColor, bColor, dColor, cdColor, fColor, bdColor) {
  if (tColor != "") {
    titleColor=tColor;
  }
  if (dsColor != "") {
    daysColor=dsColor;
  }
  if (bColor != "") {
    bodyColor=bColor;
  }
  if (dColor != "") {
    dayColor=dColor;
  }
  if (cdColor != "") {
    currentDayColor=cdColor;
  }
  if (fColor != "") {
    footColor=fColor;
  }
  if (bdColor != "") {
    borderColor=bdColor;
  }
}

function setFontColor(tColorFont, dsColorFont, dColorFont, cdColorFont, fColorFont) {
  if (tColorFont != "") {
    titleFontColor=tColorFont;
  }
  if (dsColorFont != "") {
    daysFontColor=dsColorFont;
  }
  if (dColorFont != "") {
    dayFontColor=dColorFont;
  }
  if (cdColorFont != "") {
    currentDayFontColor=cdColorFont;
  }
  if (fColorFont != "") {
    footFontColor=fColorFont;
  }
}

function setFormat(format) {
  calFormat = format;
}

function setSize(width, height, ox, oy) {
  if (width > 0) {
    calWidth=width;
  }
  if (height > 0) {
    calHeight=height;
  }

  calOffsetX=ox;
  calOffsetY=oy;
}

function setWeekDay(wDay) {
  if (wDay == 0 || wDay == 1) {
    weekDay = wDay;
  }
}

function setMonthNames(janName, febName, marName, aprName, mayName, junName, julName, augName, sepName, octName, novName, decName) {
  if (janName != "") {
    yxMonths[0] = janName;
  }
  if (febName != "") {
    yxMonths[1] = febName;
  }
  if (marName != "") {
    yxMonths[2] = marName;
  }
  if (aprName != "") {
    yxMonths[3] = aprName;
  }
  if (mayName != "") {
    yxMonths[4] = mayName;
  }
  if (junName != "") {
    yxMonths[5] = junName;
  }
  if (julName != "") {
    yxMonths[6] = julName;
  }
  if (augName != "") {
    yxMonths[7] = augName;
  }
  if (sepName != "") {
    yxMonths[8] = sepName;
  }
  if (octName != "") {
    yxMonths[9] = octName;
  }
  if (novName != "") {
    yxMonths[10] = novName;
  }
  if (decName != "") {
    yxMonths[11] = decName;
  }
}

function setDayNames(sunName, monName, tueName, wedName, thuName, friName, satName) {
  if (sunName != "") {
    yxDays[0] = sunName;
    yxDays[7] = sunName;
  }
  if (monName != "") {
    yxDays[1] = monName;
  }
  if (tueName != "") {
    yxDays[2] = tueName;
  }
  if (wedName != "") {
    yxDays[3] = wedName;
  }
  if (thuName != "") {
    yxDays[4] = thuName;
  }
  if (friName != "") {
    yxDays[5] = friName;
  }
  if (satName != "") {
    yxDays[6] = satName;
  }
}

function setLinkNames(closeLink, clearLink) {
  if (closeLink != "") {
    yxLinks[0] = closeLink;
  }
  if (clearLink != "") {
    yxLinks[1] = clearLink;
  }
}

function addCalendar(title, attrName, form,message,dataField,fieldPrefix) {
  cals[cals.length] = new calOBJ(title, attrName, form,message,dataField,fieldPrefix);
}

function findCalendar(name) {
  for (var i = 0; i < cals.length; i++) {
    if (cals[i].name == name) {
      if (cals[i].form == null) {
        if (cals[i].formName == "") {
          if (document.forms[0]) {
            cals[i].form = document.forms[0];
          }
        }
        else if (document.forms[cals[i].formName]) { 
          cals[i].form = document.forms[cals[i].formName];
        }
      }

      return cals[i];
    }
  }

  return null;
}

function getDayName(y,m,d) {
  var wd=new Date(y,m,d);
  return yxDays[wd.getDay()].substring(0,3);
}

function getMonthFromName(m3) {
  for (var i = 0; i < yxMonths.length; i++) {
    if (yxMonths[i].toLowerCase().substring(0,3) == m3.toLowerCase()) {
      return i;
    }
  }

  return 0;
}

function getFormat() {
  var calF = calFormat;

  calF = calF.replace(/\\/g, '\\\\');
  calF = calF.replace(/\//g, '\\\/');
  calF = calF.replace(/\[/g, '\\\[');
  calF = calF.replace(/\]/g, '\\\]');
  calF = calF.replace(/\(/g, '\\\(');
  calF = calF.replace(/\)/g, '\\\)');
  calF = calF.replace(/\{/g, '\\\{');
  calF = calF.replace(/\}/g, '\\\}');
  calF = calF.replace(/\</g, '\\\<');
  calF = calF.replace(/\>/g, '\\\>');
  calF = calF.replace(/\|/g, '\\\|');
  calF = calF.replace(/\*/g, '\\\*');
  calF = calF.replace(/\?/g, '\\\?');
  calF = calF.replace(/\+/g, '\\\+');
  calF = calF.replace(/\^/g, '\\\^');
  calF = calF.replace(/\$/g, '\\\$');

  calF = calF.replace(/dd/i, '\\d\\d');
  calF = calF.replace(/mm/i, '\\d\\d');
  calF = calF.replace(/yyyy/i, '\\d\\d\\d\\d');
  calF = calF.replace(/day/i, '\\w\\w\\w');
  calF = calF.replace(/mon/i, '\\w\\w\\w');

  return new RegExp(calF);
}

function getDateNumbers(date) {
  var y, m, d;
  var yIdx = calFormat.search(/yyyy/i);
  var mIdx = calFormat.search(/mm/i);
  var m3Idx = calFormat.search(/mon/i);
  var dIdx = calFormat.search(/dd/i);

  y=date.substring(yIdx,yIdx+4)-0;
  if (mIdx != -1) {
    m=date.substring(mIdx,mIdx+2)-1;
  }
  else {
    var m = getMonthFromName(date.substring(m3Idx,m3Idx+3));
  }
  d=date.substring(dIdx,dIdx+2)-0;

  return new Array(y,m,d);
}

function hideCal() {

  if (calWin!=null) {
     calWin.close();
     calWin = null;
  }
  else if (document.getElementById("CalendarLayer"))
          {  var obj=document.getElementById("CalendarLayer");
	          var parentObj=obj.parentNode;
	          obj.style.display="none";
			  parentObj.removeChild(obj);
          }
  window.status = "";
}

function getLeftIE(x,m) {
  var dx=0;
  if (x.tagName=="TD"){
    dx=x.offsetLeft;
  }
  else if (x.tagName=="TABLE") {
    dx=x.offsetLeft;
    if (m) { dx+=(x.cellPadding!=""?parseInt(x.cellPadding):2); m=false; }
  }
  return dx+(x.parentElement.tagName=="BODY"?0:getLeftIE(x.parentElement,m));
}
function getTopIE(x,m) {
  var dy=0;
  if (x.tagName=="TR"){
    dy=x.offsetTop;
  }
  else if (x.tagName=="TABLE") {
    dy=x.offsetTop;
    if (m) { dy+=(x.cellPadding!=""?parseInt(x.cellPadding):2); m=false; }
  }
  return dy+(x.parentElement.tagName=="BODY"?0:getTopIE(x.parentElement,m));
}

function getLeftN4(l) { return l.pageX; }
function getTopN4(l) { return l.pageY; }

function getLeftN6(l) { return l.offsetLeft; }
function getTopN6(l) { return l.offsetTop; }

function lastDay(d) {
  var yy=d.getFullYear(), mm=d.getMonth();
  for (var i=31; i>=28; i--) {
    var nd=new Date(yy,mm,i);
    if (mm == nd.getMonth()) {
      return i;
    }
  }
}

function firstDay(d) {
  var yy=d.getFullYear(), mm=d.getMonth();
  var fd=new Date(yy,mm,1);
  return fd.getDay();
}

function dayDisplay(i) {
  if (dayDigits == 0) {
    return yxDays[i];
  }
  else {
    return yxDays[i].substring(0,dayDigits);
  }
}

function calMakeCmd(cmdName,param)
{  var mycalCmd="";
    if (cmdName==null || cmdName=="") return;
    if (param==null) param="";
	if (window.document.getElementById("CalendarLayer")) {
	  	if (calendarContainer==1)  mycalCmd="if(self.parent && self.parent."+cmdName+") self.parent."+cmdName+"("+param+")"; 
		else mycalCmd=cmdName+"("+param+")"; 
	}
    else mycalCmd="if(window.opener && !window.opener.closed && window.opener."+cmdName+") window.opener."+cmdName+"("+param+")";

  return mycalCmd;
}

function calTitle(d) {
  var yy=d.getFullYear(), mm=yxMonths[d.getMonth()];
  var s="<table align='center' border='0' bgcolor='"+borderColor+"' cellspacing='0' cellpadding='1'><tr><td>\n<table cellspacing='1' cellpadding='3' border='0'>\n";

  if (titleMode == 2) {
    s+="<tr align='center' bgcolor='"+titleColor+"'><td colspan='7'>\n<table cellpadding='0' cellspacing='0' border='0'><tr align='center' valign='middle'><td align='right'>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("moveYear","-10")+"'>&nbsp;&lt;&lt;</a>&nbsp;"+a1("titlea")+"'"+calMakeCmd("moveYear","-1")+"'>&lt;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><b>"+span1("title")+yy+span2+"</b></td><td align='left'>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("moveYear","1")+"'>&nbsp;&gt;</a>&nbsp;"+a1("titlea")+"'"+calMakeCmd("moveYear","10")+"'>&gt;&gt;&nbsp;</a></b>"+span2+"</td></tr><tr align='center' valign='middle'><td align='right'>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("prepMonth",d.getMonth())+"'>&nbsp;&lt;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><b>"+span1("title")+mm+span2+"</b></td><td align='left'>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("nextMonth",d.getMonth())+"'>&nbsp;&gt;&nbsp;</a></b>"+span2+"</td></tr></table>\n</td></tr><tr align='center' bgcolor='"+daysColor+"'>";
  }
  else {
    s+="<tr align='center' bgcolor='"+titleColor+"'><td colspan='7'>\n<table cellpadding='0' cellspacing='0' border='0'><tr align='center' valign='middle'><td>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("moveYear","-1")+"'>&nbsp;&lt;&lt;</a>&nbsp;"+a1("titlea")+"'"+calMakeCmd("prepMonth",d.getMonth())+"'>&lt;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><nobr><b>"+span1("title")+mm+" "+yy+span2+"</b></nobr></td><td>"+span1("title")+"<b>"+a1("titlea")+"'"+calMakeCmd("nextMonth",d.getMonth())+"'>&nbsp;&gt;</a>&nbsp;"+a1("titlea")+"'"+calMakeCmd("moveYear","1")+"'>&gt;&gt;&nbsp;</a></b>"+span2+"</td></tr></table>\n</td></tr><tr align='center' bgcolor='"+daysColor+"'>";
  }

  for (var i=weekDay; i<weekDay+7; i++) {
    s+="<td width='"+dayWidth+"'>"+span1("days")+dayDisplay(i)+span2+"</td>";
  }

  s+="</tr>\n";

  return s;
}

function calStyle() {
  return "<style type='text/css'>\n .aOn {cursor:pointer;color:red;font-size:"+fontSize+"px; text-decoration:underline;}\n .aOff {cursor:pointer;color:#173C74;font-size:"+fontSize+"px;}\n"+spanx("title",titleFontColor)+spanx("days",daysFontColor)+spanx("foot",footColor)+spanx("day",dayFontColor)+spanx("currentDay",currentDayFontColor)+ax("titlea",titleFontColor)+ax("daya",dayFontColor)+ax("currenta",currentDayFontColor)+ax("foota",footFontColor)+"</style>\n";
}


function calHeader() {
  return "<head>\n<title>"+currentCal.title+"</title>\n</head>\n<body style='margin:0px;overflow:hidden;cursor:default;'>\n";
}

function calFooter() {
  return "<tr bgcolor='"+footColor+"'><td colspan='7' align='center'>"+span1("foot")+"<b>"+a1("foota")+"'"+calMakeCmd("hideCal")+"'>"+yxLinks[0]+"</a>&nbsp;&nbsp;"+a1("foota")+"'"+calMakeCmd("clearDate")+"'>"+yxLinks[1]+"</a></b>"+span2+"</td></tr></table>\n</td></tr></table>\n";
}

function calBody(d,day) {
  var s="", dayCount=1, fd=firstDay(d), ld=lastDay(d);

  if (weekDay > 0 && fd == 0) {
    fd = 7;
  }
  
  for (var i=0; i<6; i++) {
    s+="<tr align='center' bgcolor='"+bodyColor+"'>";
    for (var j=weekDay; j<weekDay+7; j++) {
      if (i*7+j<fd || dayCount>ld) {
        s+="<td>"+span1("day")+"&nbsp;"+span2+"</td>";
      }
      else {
        var bgColor=dayColor;
        var fgTag="day";
        var fgTagA="daya";
        if (dayCount==day) {
          bgColor=currentDayColor;
          fgTag="currentDay";
          fgTagA="currenta";
        }

        s+="<td bgcolor='"+bgColor+"'>"+span1(fgTag)+a1(fgTagA)+"'"+calMakeCmd("pickDate",dayCount)+"'>"+(dayCount++)+"</a>"+span2+"</td>";
      }
    }
    s+="</tr>";
  }

  return s;
}

function moveYear(dy) {
  cY+=dy;
  var nd=new Date(cY,cM,1);
  changeCal(nd);
}

function prepMonth(m) {
  cM=m-1;
  if (cM<0) { cM=11; cY--; }
  var nd=new Date(cY,cM,1);
  changeCal(nd);
}

function nextMonth(m) {
  cM=m+1;
  if (cM>11) { cM=0; cY++;}
  var nd=new Date(cY,cM,1);
  changeCal(nd);
}

function changeCal(d) {
  var dd = 0;

  if (currentCal != null) {
    var calRE = getFormat();

    if (currentCal.form[currentCal.field].value!="" && calRE.test(currentCal.form[currentCal.field].value)) {
      var cd = getDateNumbers(currentCal.form[currentCal.field].value);
      if (cd[0] == d.getFullYear() && cd[1] == d.getMonth()) {
        dd=cd[2];
      }
    }
	else if(currentCal.form[currentCal.dataField].value!=""){
      var cd = new Date();
	  cd.setTime(currentCal.form[currentCal.dataField].value);
      if (cd.getFullYear() == d.getFullYear() && cd.getMonth() == d.getMonth()) {
        dd=cd.getDate();
      }
	}
    else {
      var cd = new Date();
      if (cd.getFullYear() == d.getFullYear() && cd.getMonth() == d.getMonth()) {
        dd=cd.getDate();
      }
    }
  }

  var calDiv = document.getElementById("CalendarLayer");
  if (calDiv != null) {
       if (calendarContainer==0) {
         var calendar=calStyle()+calTitle(d)+calBody(d,dd)+calFooter();
         calDiv.innerHTML=calendarBody("top") + calendar+calendarBody("bottom");
	   }
       else {
         var calendar=calHeader()+calStyle()+calTitle(d)+calBody(d,dd)+calFooter()+"</body>";
         calDiv.innerHTML=calendarBody("top") + calendarBody("bottom");
		 if (document.getElementById('calIFrame')!=null)
    	  {
            if (isIE || isOpera6) {
               document.frames('calIFrame').document.open();
   			   document.frames('calIFrame').document.write(calendar);
               document.frames('calIFrame').document.close();
		  	  }
			else {
              document.getElementById('calIFrame').contentDocument.open();
    		  document.getElementById('calIFrame').contentDocument.write(calendar);
              document.getElementById('calIFrame').contentDocument.close();
			}
            calDiv.style.width=calWidth;
            calDiv.style.height=calHeight;
            document.getElementById('calIFrame').style.height=calHeight;
            document.getElementById('calIFrame').style.width=calWidth;
		  }
	   }

	   }
  else { 
     var calendar=calHeader()+calStyle()+calTitle(d)+calBody(d,dd)+calFooter()+"</body>";
     calWin.document.open();
     calWin.document.write(calendar);
     calWin.document.close();
   }
}

function markClick(e) {
  var ev = window.event ? window.event : e;
  if (document.getElementById("CalendarLayer") != null) hideCal();
  CreateCalendarDiv(ev);

  winX=ev.screenX;
  winY=ev.screenY;

  if (isN4 ) {
    document.routeEvent(e);
  }
  else stopEvent(e);
  
  return true;
}

function showCal(name,fieldPrefix,e) {
  var ev = window.event ? window.event : e;

  if(!fieldPrefix) fieldPrefix = "";
  name = fieldPrefix + "calendar(" + name + ")";
  var lastCal=currentCal;
  var d=new Date(), hasCal=false;

  currentCal = findCalendar(name);
  if (document.getElementById("CalendarLayer") != null) {
	   hideCal();
	   if (lastCal!=null && lastCal.name==name) return;
	}

  markClick(ev);
//  alert(lastCal+"->"+currentCal.name);

  if (currentCal != null && currentCal.form != null && currentCal.form[currentCal.field]) {
    var calRE = getFormat();

    if (currentCal.form[currentCal.field].value!="" && calRE.test(currentCal.form[currentCal.field].value)) {
      var cd = getDateNumbers(currentCal.form[currentCal.field].value);
      d=new Date(cd[0],cd[1],cd[2]);

      cY=cd[0];
      cM=cd[1];
      dd=cd[2];
    }
	else if(currentCal.form[currentCal.dataField].value!=""){
	  var d = new Date();
	  d.setTime(currentCal.form[currentCal.dataField].value);
      cY=d.getFullYear();
      cM=d.getMonth();
      dd=d.getDate();
	}
    else {
      cY=d.getFullYear();
      cM=d.getMonth();
      dd=d.getDate();
    }

    var calDiv = document.getElementById("CalendarLayer");
	if (calDiv != null ) {
    
       if (calendarContainer==0) {
         var calendar=calStyle()+calTitle(d)+calBody(d,dd)+calFooter();
         calDiv.innerHTML=calendarBody("top") + calendar+calendarBody("bottom");
      	 calDiv.style.width=calWidth;
      	 calDiv.style.height=calHeight;
         calDiv.style.display="";
	   }
       else {
         var calendar=calHeader()+calStyle()+calTitle(d)+calBody(d,dd)+calFooter()+"</body>";
         calDiv.innerHTML=calendarBody("top") + calendarBody("bottom");
		 if (document.getElementById('calIFrame')!=null)
    	  {
            if (isIE || isOpera6) {
               document.frames('calIFrame').document.open();
   			   document.frames('calIFrame').document.write(calendar);
               document.frames('calIFrame').document.close();
		  	  }
			else {
              document.getElementById('calIFrame').contentDocument.open();
    		  document.getElementById('calIFrame').contentDocument.write(calendar);
              document.getElementById('calIFrame').contentDocument.close();
			}
            calDiv.style.width=calWidth;
            calDiv.style.height=calHeight;
            document.getElementById('calIFrame').style.height=calHeight;
            document.getElementById('calIFrame').style.width=calWidth;
	        calDiv.style.display="";
		  }
	   }

	}
    else 
     {
        var calendar=calHeader()+calStyle()+calTitle(d)+calBody(d,dd)+calFooter()+"</body>";
 
      	if (calWin != null && !calWin.closed) {
           hasCal=true;
           calWin.moveTo(winX+calOffsetX,winY+calOffsetY);
        }

       if (!hasCal) {
         if (isIE || isOpera6) {
            calWin=window.open("","cal","toolbar=0,width="+calWidth+",height="+calHeight+",left="+(winX+calOffsetX)+",top="+(winY+calOffsetY));
          }
         else {
            calWin=window.open("","cal","toolbar=0,width="+calWidth+",height="+calHeight+",screenx="+(winX+calOffsetX)+",screeny="+(winY+calOffsetY));
          }
       }

       calWin.document.open();
       calWin.document.write(calendar);
       calWin.document.close();

      calWin.focus();
    }
	
  }
  else {
    if (currentCal == null) {
      window.status = "Calendar ["+name+"] not found.";
    }
    else if (!currentCal.form) {
      window.status = "Form ["+currentCal.formName+"] not found.";
    }
    else if (!currentCal.form[currentCal.field]) {
      window.status = "Form Field ["+currentCal.formName+"."+currentCal.field+"] not found.";
    }

    if (lastCal != null) {
      currentCal = lastCal;
    }
  }
}

function get2Digits(n) {
  return ((n<10)?"0":"")+n;
}

function clearDate() {
  currentCal.form[currentCal.field].value="";
  hideCal();
}

function findFormbyFieldName(fname)
{
    var frm = null;
    var frmLen = document.forms.length;
    for (var i = 0; i < frmLen; i++) {
        if (document.forms[i].elements[fname] != null) {
            frm = document.forms[i];
            break;
        }
    }
    return frm;
}

function clearDateField(fld)
{
    if (fld == null) return;
    var frm = findFormbyFieldName('data(' + fld + ')');
    if (frm == null)  return;
    if (frm.elements["data(" + fld + ")"] != null) frm.elements["data(" + fld + ")"].value = "";
    if (frm.elements["date(" + fld + ")"] != null) frm.elements["date(" + fld + ")"].value = "";
    if (frm.elements["hh(" + fld + ")"] != null) frm.elements["hh(" + fld + ")"].value = "";
    if (frm.elements["mm(" + fld + ")"] != null) frm.elements["mm(" + fld + ")"].value = "";
    if (frm.elements["ss(" + fld + ")"] != null) frm.elements["ss(" + fld + ")"].value = "";
}

function pickDate(d) {
  hideCal();
  window.focus();
  var date=calFormat;
  date = date.replace(/yyyy/i, cY);
  date = date.replace(/mm/i, get2Digits(cM+1));
  date = date.replace(/MON/, yxMonths[cM].substring(0,3).toUpperCase());
  date = date.replace(/Mon/i, yxMonths[cM].substring(0,3));
  date = date.replace(/dd/i, get2Digits(d));
  date = date.replace(/DAY/, getDayName(cY,cM,d).toUpperCase());
  date = date.replace(/day/i, getDayName(cY,cM,d));

  currentCal.form[currentCal.field].value=date;
  currentCal.form[currentCal.field].blur();
  currentCal.form[currentCal.field].focus();

  // IE5/Mac needs focus to show the value, weird.
  currentCal.form[currentCal.field].focus();
  //for formSave
  if (self.setChanged) {setChanged();}
}
// ------

// user functions
function checkDate(name) {
  var thisCal = findCalendar(name);

  if (thisCal != null && thisCal.form != null && thisCal.form[thisCal.field]) {
    var calRE = getFormat();

    if (calRE.test(thisCal.form[thisCal.field].value)) {
      return 0;
    }
    else {
      return 1;
    }
  }
  else {
    return 2;
  }
}

function getCurrentDate() {
  var date=calFormat, d = new Date();
  date = date.replace(/yyyy/i, d.getFullYear());
  date = date.replace(/mm/i, get2Digits(d.getMonth()+1));
  date = date.replace(/dd/i, get2Digits(d.getDate()));

  return date;
}

function compareDates(date1, date2) {
  var calRE = getFormat();
  var d1, d2;

  if (calRE.test(date1)) {
    d1 = getNumbers(date1);
  }
  else {
    d1 = getNumbers(getCurrentDate());
  }

  if (calRE.test(date2)) {
    d2 = getNumbers(date2);
  }
  else {
    d2 = getNumbers(getCurrentDate());
  }

  var dStr1 = d1[0] + "" + d1[1] + "" + d1[2];
  var dStr2 = d2[0] + "" + d2[1] + "" + d2[2];

  if (dStr1 == dStr2) {
    return 0;
  }
  else if (dStr1 > dStr2) {
    return 1;
  }
  else {
    return -1;
  }
}

function getNumbers(date) {
  var calRE = getFormat();
  var y, m, d;

  if (calRE.test(date)) {
    var yIdx = calFormat.search(/yyyy/i);
    var mIdx = calFormat.search(/mm/i);
    var m3Idx = calFormat.search(/mon/i);
    var dIdx = calFormat.search(/dd/i);

    y=date.substring(yIdx,yIdx+4);
    if (mIdx != -1) {
      m=date.substring(mIdx,mIdx+2);
    }
    else {
      var mm=getMonthFromName(date.substring(m3Idx,m3Idx+3))+1;
      m=(mm<10)?("0"+mm):(""+mm);
    }
    d=date.substring(dIdx,dIdx+2);

    return new Array(y,m,d);
  }
  else {
    return new Array("", "", "");
  }
}
function getFormatedDate(milliseconds){
	  var date=calFormat, d = new Date();
	  if(milliseconds){
		  d.setTime(milliseconds);
	  }
          date = date.replace(/yyyy/i, d.getFullYear());
          date = date.replace(/mm/i, get2Digits(d.getMonth()+1));
          date = date.replace(/MON/, yxMonths[d.getMonth()].substring(0,3).toUpperCase());
          date = date.replace(/Mon/i, yxMonths[d.getMonth()].substring(0,3));
          date = date.replace(/dd/i, get2Digits(d.getDate()));
          date = date.replace(/DAY/, getDayName(d.getFullYear(),d.getMonth(),d.getDate()).toUpperCase());
          date = date.replace(/day/i, getDayName(d.getFullYear(),d.getMonth(),d.getDate()));
	  return date;
}
function collectEvent(obj) {
	var s="";
	if (!obj) return s;
	var func = obj.getAttribute("onblur");
    if (func!=null) {func+=" "; s = func.substring(func.indexOf("{")+1,func.indexOf("}")-1);}
	return s;
}
function addCalendarConvertEvent(currentCal){
	var str = "calendarConvert('" + currentCal.name + "')";
	var obj;
	var s;
	obj=currentCal.form[currentCal.field]; if(obj) {s=str+";"+collectEvent(obj);obj.onblur = new Function(s);}
	obj=currentCal.form[currentCal.hhField]; if(obj) {s=str+";"+collectEvent(obj);obj.onblur = new Function(s);}
	obj=currentCal.form[currentCal.mmField]; if(obj) {s=str+";"+collectEvent(obj);obj.onblur = new Function(s);}
	obj=currentCal.form[currentCal.ssField]; if(obj) {s=str+";"+collectEvent(obj);obj.onblur = new Function(s);}
}

function calendarConvert(name){
	var currentCal = findCalendar(name);
	if(!currentCal){
		alert("JavaScript Error: can't find calendar with name '"+name+"'");
		return false;
	}
    var calRE = getFormat();

	var isTimeView = (!currentCal.form[currentCal.field]);
	var hasHours = currentCal.form[currentCal.hhField] && currentCal.form[currentCal.hhField].value!="";
	var hasMinutes = currentCal.form[currentCal.mmField] && currentCal.form[currentCal.mmField].value!="";
	var hasSeconds = currentCal.form[currentCal.ssField] && currentCal.form[currentCal.ssField].value!="";

	var d = null;
	if (!isTimeView ) {
		if(currentCal.form[currentCal.field] && currentCal.form[currentCal.field].value!="" && calRE.test(currentCal.form[currentCal.field].value)){
			var cd = getDateNumbers(currentCal.form[currentCal.field].value);
			d=new Date(cd[0],cd[1],cd[2]);
                        /* Set current time */
                        setCurrentTime(d);
		} else if(hasHours || hasMinutes || hasSeconds){
			d = new Date();
		}
	} else if(isTimeView){
		if(hasHours || hasMinutes || hasSeconds){
			d = new Date();
		}
	}	

	if(d != null) {
	    d = new Date(d.getFullYear(), d.getMonth(), d.getDate(), d.getHours(), d.getMinutes(), d.getSeconds());
      if (hasHours) {
			  d.setHours( currentCal.form[currentCal.hhField].value);
			} else {
			  d.setHours('0');
			}
      if(hasMinutes) {
			  d.setMinutes( currentCal.form[currentCal.mmField].value );
			} else {
			  d.setMinutes('0');
			}
      if(hasSeconds) {
			  d.setSeconds( currentCal.form[currentCal.ssField].value );
			} else {
			  d.setSeconds('0');
			}
		if(isNaN(d)) {
			alert(currentCal.message);
			return false;
		} else {
			if (currentCal.form[currentCal.dataField]) currentCal.form[currentCal.dataField].value = d.getTime();
			return true;
		}
	} else {
          	// clear milliseconds time
          	if (currentCal.form[currentCal.dataField]) currentCal.form[currentCal.dataField].value = "";
		return true;
	}
}

function setCurrentTime(d){
  var nowDate = new Date();
  d.setHours( nowDate.getHours() );
  d.setMinutes( nowDate.getMinutes() );
  d.setSeconds( nowDate.getSeconds() );
}
// ------

function stopEvent(e) {
	if (!e) var e = window.event;
	e.cancelBubble = true;
	if (e.stopPropagation) e.stopPropagation();
}



if (isN4)   document.captureEvents(Event.CLICK);
else document.onclick=markClick;

//var CalendarLoadFlag;
if (CalendarLoadFlag==null) {var CalendarLoadFlag=true;}