/*****************************************************************************
Copyright (C) 2006  Nick Baicoianu

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU Lesser General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
*****************************************************************************/


// ===================================================================
// Author: Matt Kruse <matt@mattkruse.com>
// WWW: http://www.mattkruse.com/
//
// NOTICE: You may use this code for any purpose, commercial or
// private, without any further permission from the author. You may
// remove this notice from your final code if you wish, however it is
// appreciated by the author if at least my web site address is kept.
//
// You may *NOT* re-distribute this code in any way except through its
// use. That means, you can include it in your product, or your web
// site, or any other form where the code is actually being used. You
// may not put the plain javascript up on your site for download or
// include it in your javascript libraries for download.
// If you wish to share this code with others, please just point them
// to the URL instead.
// Please DO NOT link directly to my .js files from your site. Copy
// the files to your server and use them there. Thank you.
// ===================================================================

// HISTORY
// ------------------------------------------------------------------
// May 17, 2003: Fixed bug in parseDate() for dates <1970
// March 11, 2003: Added parseDate() function
// March 11, 2003: Added "NNN" formatting option. Doesn't match up
//                 perfectly with SimpleDateFormat formats, but
//                 backwards-compatability was required.

// ------------------------------------------------------------------
// These functions use the same 'format' strings as the
// java.text.SimpleDateFormat class, with minor exceptions.
// The format string consists of the following abbreviations:
//
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
//              | NNN (abbr.)        |
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Day of Week  | EE (name)          | E (abbr)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "M/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------

var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
function LZ(x) {return(x<0||x>9?"":"0")+x}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function isDate(val,format) {
	var date=getDateFromFormat(val,format);
	if (date==0) { return false; }
	return true;
	}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2) {
	var d1=getDateFromFormat(date1,dateformat1);
	var d2=getDateFromFormat(date2,dateformat2);
	if (d1==0 || d2==0) {
		return -1;
		}
	else if (d1 > d2) {
		return 1;
		}
	return 0;
	}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format) {
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getYear()+"";
	var M=date.getMonth()+1;
	var d=date.getDate();
	var E=date.getDay();
	var H=date.getHours();
	var m=date.getMinutes();
	var s=date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["NNN"]=MONTH_NAMES[M+11];
	value["d"]=d;
	value["dd"]=LZ(d);
	value["E"]=DAY_NAMES[E+7];
	value["EE"]=DAY_NAMES[E];
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}

// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
	}
function _getInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (_isInteger(token)) { return token; }
		}
	return null;
	}

// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format) {
	val=val+"";
	format=format+"";
	var i_val=0;
	var i_format=0;
	var c="";
	var token="";
	var token2="";
	var x,y;
	var now=new Date();
	var year=now.getYear();
	var month=now.getMonth()+1;
	var date=1;
	var hh=now.getHours();
	var mm=now.getMinutes();
	var ss=now.getSeconds();
	var ampm="";

	while (i_format < format.length) {
		// Get next token from format string
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=_getInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MMM"||token=="NNN"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					if (token=="MMM"||(token=="NNN"&&i>11)) {
						month=i+1;
						if (month>12) { month -= 12; }
						i_val += month_name.length;
						break;
						}
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="EE"||token=="E"){
			for (var i=0; i<DAY_NAMES.length; i++) {
				var day_name=DAY_NAMES[i];
				if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()) {
					i_val += day_name.length;
					break;
					}
				}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(ss<0)||(ss>59)){return 0;}
			i_val+=ss.length;}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase()=="am") {ampm="AM";}
			else if (val.substring(i_val,i_val+2).toLowerCase()=="pm") {ampm="PM";}
			else {return 0;}
			i_val+=2;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) { return 0; }
	// Is date valid for month?
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			if (date > 29){ return 0; }
			}
		else { if (date > 28) { return 0; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return 0; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh=hh-0+12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
	}

// ------------------------------------------------------------------
// parseDate( date_string [, prefer_euro_format] )
//
// This function takes a date string and tries to match it to a
// number of possible date formats to get the value. It will try to
// match against the following international formats, in this order:
// y-M-d   MMM d, y   MMM d,y   y-MMM-d   d-MMM-y  MMM d
// M/d/y   M-d-y      M.d.y     MMM-d     M/d      M-d
// d/M/y   d-M-y      d.M.y     d-MMM     d/M      d-M
// A second argument may be passed to instruct the method to search
// for formats like d/M/y (european format) before M/d/y (American).
// Returns a Date object or null if no patterns match.
// ------------------------------------------------------------------
function parseDate(val) {
	var preferEuro=(arguments.length==2)?arguments[1]:false;
	generalFormats=new Array('y-M-d','MMM d, y','MMM d,y','y-MMM-d','d-MMM-y','MMM d');
	monthFirst=new Array('M/d/y','M-d-y','M.d.y','MMM-d','M/d','M-d');
	dateFirst=new Array('d/M/y','d-M-y','d.M.y','d-MMM','d/M','d-M');
	var checkList=new Array('generalFormats',preferEuro?'dateFirst':'monthFirst',preferEuro?'monthFirst':'dateFirst');
	var d=null;
	for (var i=0; i<checkList.length; i++) {
		var l=window[checkList[i]];
		for (var j=0; j<l.length; j++) {
			d=getDateFromFormat(val,l[j]);
			if (d!=0) { return new Date(d); }
			}
		}
	return null;
	}



function Epoch(name,mode,targetelement,multiselect) {
    this.state=0;
    this.name=name;
    this.curDate = parseDate(targetelement.value, true); // европейский стандарт дат, день идет первым
    if (this.curDate==null) { this.curDate=new Date(); }
    this.mode=mode;
    this.selectMultiple =(multiselect==true);
    this.selectedDates=new Array();
    this.calendar;
    this.calHeading;
    this.calCells;
    this.rows;
    this.cols;
    this.cells=new Array();
    this.monthSelect;
    this.yearSelect;
    this.mousein=false;
    this.calConfig();
    this.setDays();
    this.displayYear=this.displayYearInitial;
    this.displayMonth=this.displayMonthInitial;
    this.createCalendar();
    if (this.mode=='popup' && targetelement && targetelement.type=='text') {
        this.tgt=targetelement;
        this.calendar.style.position='absolute';
        this.topOffset=this.tgt.offsetHeight;
        this.topOffset=18;
        this.leftOffset=0;
        this.calendar.style.top=this.getTop(targetelement)+ this.topOffset+'px';
        this.calendar.style.left=this.getLeft(targetelement)+ this.leftOffset+'px';
        document.body.appendChild(this.calendar);
        this.tgt.calendar=this;
        this.tgt.onfocus=function(){
            this.calendar.show();
        }
        this.tgt.onblur=function() {
            if(!this.calendar.mousein) {
                this.calendar.hide();
            }
        }
    } else {
        this.container=targetelement;
        this.container.appendChild(this.calendar);
    }
    this.state=2;
    this.visible?this.show():this.hide();
}

Epoch.prototype.calConfig=function() {
    this.displayYearInitial=this.curDate.getFullYear();
    this.displayMonthInitial=this.curDate.getMonth();
    this.rangeYearLower=1900;
    this.rangeYearUpper=2008;
    this.minDate=new Date(1900,0,1);
    this.maxDate=new Date(2008,0,1);
    this.startDay=1;
    this.showWeeks=true;
    this.selCurMonthOnly=false;
    this.clearSelectedOnChange=true;

    switch(this.mode) {
        case 'popup':this.visible=false;
        break;
        case 'flat':this.visible=true;
        break;
    }

    this.setLang();
}

Epoch.prototype.setLang=function() {
    this.daylist=new Array('Вс','Пн','Вт','Ср','Чт','Пт','Сб','Вс','Пн','Вт','Ср','Чт','Пт','Сб');
    this.months_sh=new Array('Янв','Фев','Мар','Апр','Май','Июн','Июл','Авг','Сен','Окт','Ноя','Дек');
    this.monthup_title='Следующий месяц';
    this.monthdn_title='Предыдущий месяц';
    this.clearbtn_caption='Очистить';
    this.clearbtn_title='Убирает выбранную дату из строки ввода';
    this.maxrange_caption='Это максимальный диапазон';
}

Epoch.prototype.getTop=function(element) {
    var oNode=element;
    var iTop=0;

    while (oNode.tagName!='BODY') {
        iTop += oNode.offsetTop;
        oNode=oNode.offsetParent;
    }
    return iTop;
}

Epoch.prototype.getLeft=function(element) {
    var oNode=element;
    var iLeft=0;

    while(oNode.tagName!='BODY') {
        iLeft += oNode.offsetLeft;
        oNode=oNode.offsetParent;
    }
    return iLeft;
}

Epoch.prototype.show=function() {
    this.calendar.style.display='block';
    this.visible=true;
/*        select_elements = document.getElementsByTagName("select"); // DE!!! dirty hack
        for (i=0;i<select_elements.length; i++) {
            if (select_elements.item(i).className!='mainheading') {
                select_elements.item(i).style.visibility='hidden';
            }
        }
*/
}

Epoch.prototype.hide=function() {
    this.calendar.style.display='none';
    this.visible=false;
        select_elements = document.getElementsByTagName("select"); // DE!!!
        for (i=0;i<select_elements.length; i++) {
                select_elements.item(i).style.visibility='visible';
        }
}

Epoch.prototype.toggle=function() {
    if(this.visible) {
        this.hide();
    } else {
        this.show();
    }
}

Epoch.prototype.setDays=function() {
    this.daynames=new Array();
    var j=0;
    for (var i=this.startDay; i<this.startDay+7; i++) {
        this.daynames[j++]=this.daylist[i];
    }
    this.monthDayCount=new Array(31,((this.curDate.getFullYear()- 2000)% 4?28:29),31,30,31,30,31,31,30,31,30,31);
}

Epoch.prototype.setClass=function(element,className) {
    element.setAttribute('class',className);
    element.setAttribute('className',className);
}

Epoch.prototype.createCalendar=function() {
    var tbody,tr,td;

    this.calendar=document.createElement('table');
    this.calendar.setAttribute('id',this.name+'_calendar');
    this.setClass(this.calendar,'calendar');
    this.calendar.onselectstart=function() {
        return false;
    }
    this.calendar.ondrag=function() {
        return false;
    }
    tbody=document.createElement('tbody');
    tr=document.createElement('tr');
    td=document.createElement('td');
    td.appendChild(this.createMainHeading());
    tr.appendChild(td);
    tbody.appendChild(tr);
    tr=document.createElement('tr');
    td=document.createElement('td');
    td.appendChild(this.createDayHeading());
    tr.appendChild(td);
    tbody.appendChild(tr);
    tr=document.createElement('tr');
    td=document.createElement('td');
    td.setAttribute('id',this.name+'_cell_td');
    this.calCellContainer=td;
    td.appendChild(this.createCalCells());
    tr.appendChild(td);
    tbody.appendChild(tr);
    tr=document.createElement('tr');
    td=document.createElement('td');
    td.appendChild(this.createFooter());
    tr.appendChild(td);
    tbody.appendChild(tr);
    this.calendar.appendChild(tbody);
    this.calendar.owner=this;
    this.calendar.onmouseover=function() {
        this.owner.mousein=true;
    }
    this.calendar.onmouseout=function() {
        this.owner.mousein=false;
    }
}

Epoch.prototype.createMainHeading=function() {
    var container=document.createElement('div');
    container.setAttribute('id',this.name+'_mainheading');
    this.setClass(container,'mainheading');
    this.monthSelect=document.createElement('select'); // !!! mainheading
    this.monthSelect.className = 'mainheading';
    this.yearSelect=document.createElement('select');
    this.yearSelect.className = 'mainheading';
    var monthDn=document.createElement('input'),monthUp=document.createElement('input');
    var opt,i;
    for (i=0;i<12;i++) {
        opt=document.createElement('option');
        opt.setAttribute('value',i);
        if (this.state==0 && this.displayMonth==i) {
            opt.setAttribute('selected','selected');
        }
        opt.appendChild(document.createTextNode(this.months_sh[i]));
        this.monthSelect.appendChild(opt);
    }
    for (i=this.rangeYearLower;i<=this.rangeYearUpper;i++) {
        opt=document.createElement('option');
        opt.setAttribute('value',i);
        if (this.state==0 && this.displayYear==i) {
            opt.setAttribute('selected','selected');
        }
        opt.appendChild(document.createTextNode(i));
        this.yearSelect.appendChild(opt);
    }
    monthUp.setAttribute('type','button');
    monthUp.setAttribute('value','>');
    monthUp.setAttribute('title',this.monthup_title);
    monthDn.setAttribute('type','button');
    monthDn.setAttribute('value','<');
    monthDn.setAttribute('title',this.monthdn_title);
    this.monthSelect.owner=this.yearSelect.owner=monthUp.owner=monthDn.owner=this;
    monthUp.onmouseup=function() {
        this.owner.nextMonth();
    }
    monthDn.onmouseup=function() {
        this.owner.prevMonth();
    }
    this.monthSelect.onchange=function() {
        this.owner.displayMonth=this.value;this.owner.displayYear=this.owner.yearSelect.value;
        this.owner.goToMonth(this.owner.displayYear,this.owner.displayMonth);
    }
    this.yearSelect.onchange=function() {
        this.owner.displayMonth=this.owner.monthSelect.value;
        this.owner.displayYear=this.value;
        this.owner.goToMonth(this.owner.displayYear,this.owner.displayMonth);
    }
    container.appendChild(monthDn);
    container.appendChild(this.monthSelect);
    container.appendChild(this.yearSelect);
    container.appendChild(monthUp);
    return container;
}

Epoch.prototype.createFooter=function() {
    var container=document.createElement('div');
    var clearSelected=document.createElement('input');
    clearSelected.setAttribute('type','button');
    clearSelected.setAttribute('value',this.clearbtn_caption);
    clearSelected.setAttribute('title',this.clearbtn_title);
    clearSelected.owner=this;
    clearSelected.onclick=function() {
        this.owner.resetSelections(false);
    }
    container.appendChild(clearSelected);
    return container;
}

Epoch.prototype.resetSelections=function(returnToDefaultMonth) {
    this.selectedDates=new Array();
    this.rows=new Array(false,false,false,false,false,false,false);
    this.cols=new Array(false,false,false,false,false,false,false);
    if (this.tgt) {
        this.tgt.value='';
        if(this.mode=='popup') {
            this.hide();
        }
    }
    if (returnToDefaultMonth==true) {
        this.goToMonth(this.displayYearInitial,this.displayMonthInitial);
    } else {
        this.reDraw();
    }
}

Epoch.prototype.createDayHeading=function() {
    this.calHeading=document.createElement('table');
    this.calHeading.setAttribute('id',this.name+'_caldayheading');
    this.setClass(this.calHeading,'caldayheading');
    var tbody,tr,td;tbody=document.createElement('tbody');
    tr=document.createElement('tr');
    this.cols=new Array(false,false,false,false,false,false,false);
    if(this.showWeeks) {
        td=document.createElement('td');
        td.setAttribute('class','wkhead');
        td.setAttribute('className','wkhead');
        tr.appendChild(td);
    }
    for (var dow=0; dow<7; dow++) {
        td=document.createElement('td');
        td.appendChild(document.createTextNode(this.daynames[dow]));
        if (this.selectMultiple) {
            td.headObj=new CalHeading(this,td,(dow+this.startDay<7?dow+this.startDay:dow+this.startDay-7));
        }
        tr.appendChild(td);
    }
    tbody.appendChild(tr);
    this.calHeading.appendChild(tbody);
    return this.calHeading;
}

Epoch.prototype.createCalCells=function() {
    this.rows=new Array(false,false,false,false,false,false);
    this.cells=new Array();
    var row=-1,totalCells =(this.showWeeks?48:42);
    var beginDate=new Date(this.displayYear,this.displayMonth,1);
    var endDate=new Date(this.displayYear,this.displayMonth,this.monthDayCount[this.displayMonth]);
    var sdt=new Date(beginDate);
    sdt.setDate(sdt.getDate()+(this.startDay-beginDate.getDay())-(this.startDay-beginDate.getDay()> 0?7:0));
    this.calCells=document.createElement('table');
    this.calCells.setAttribute('id',this.name+'_calcells');
    this.setClass(this.calCells,'calcells');
    var tbody,tr,td;
    tbody=document.createElement('tbody');
    for (var i=0;i<totalCells;i++) {
        if(this.showWeeks) {
            if(i%8==0) {
                row++;
                tr=document.createElement('tr');
                td=document.createElement('td');
                if (this.selectMultiple) {
                    td.weekObj=new WeekHeading(this,td,sdt.getWeek(),row)
                } else {
                    td.setAttribute('class','wkhead');
                    td.setAttribute('className','wkhead');
                }
                td.appendChild(document.createTextNode(sdt.getWeek()));
                tr.appendChild(td);
                i++;
            }
        } else if (i%7==0) {
            row++;tr=document.createElement('tr');
        }
        td=document.createElement('td');
        td.appendChild(document.createTextNode(sdt.getDate()));
        var cell=new CalCell(this,td,sdt,row);
        this.cells.push(cell);
        td.cellObj=cell;
        sdt.setDate(sdt.getDate()+ 1);
        tr.appendChild(td);
        tbody.appendChild(tr);
    }
    this.calCells.appendChild(tbody);
    this.reDraw();
    return this.calCells;
}

Epoch.prototype.reDraw=function() {
    this.state=1;
    var i,j;
    for (i=0;i<this.cells.length;i++) {
        this.cells[i].selected=false;
    }
    for (i=0;i<this.cells.length;i++) {
        for(j=0;j<this.selectedDates.length;j++) {
            if(this.cells[i].date.getUeDay()== this.selectedDates[j].getUeDay()) {
                this.cells[i].selected=true;
            }
        }
        this.cells[i].setClass();
    }
    this.state=2;
}

Epoch.prototype.deleteCells=function() {
    this.calCellContainer.removeChild(this.calCellContainer.firstChild);
    this.cells=new Array();
}

Epoch.prototype.goToMonth=function(year,month) {
    this.monthSelect.value=this.displayMonth=month;
    this.yearSelect.value=this.displayYear=year;
    this.deleteCells();
    this.calCellContainer.appendChild(this.createCalCells());
}

Epoch.prototype.nextMonth=function() {
    if (this.monthSelect.value<11) {
        this.monthSelect.value++;
    } else {
        if(this.yearSelect.value<this.rangeYearUpper) {
            this.monthSelect.value=0;this.yearSelect.value++;
        } else {
            alert(this.maxrange_caption);
        }
    }
    this.displayMonth=this.monthSelect.value;
    this.displayYear=this.yearSelect.value;
    this.deleteCells();
    this.calCellContainer.appendChild(this.createCalCells());
}

Epoch.prototype.prevMonth=function() {
    if (this.monthSelect.value>0) {
        this.monthSelect.value--;
    } else {
        if (this.yearSelect.value>this.rangeYearLower) {
            this.monthSelect.value=11;
            this.yearSelect.value--;
        } else {
            alert(this.maxrange_caption);
        }
    }
    this.displayMonth=this.monthSelect.value;
    this.displayYear=this.yearSelect.value;
    this.deleteCells();
    this.calCellContainer.appendChild(this.createCalCells());
}

Epoch.prototype.addZero=function(vNumber) {
    return((vNumber<10)? '0':'')+ vNumber;
}

Epoch.prototype.addDates=function(dates,redraw) {
    var j,in_sd;
    for (var i=0; i<dates.length; i++) {
        in_sd=false;
        for (j=0; j<this.selectedDates.length; j++) {
            if(dates[i].getUeDay()== this.selectedDates[j].getUeDay()) {
                in_sd=true;break;
            }
        }
        if (!in_sd) {
            this.selectedDates.push(dates[i]);
        }
    }
    if(redraw!=false) {
        this.reDraw();
    }
}

Epoch.prototype.removeDates=function(dates,redraw) {
    var j;
    for (var i=0; i<dates.length; i++) {
        for (j=0; j<this.selectedDates.length; j++) {
            if (dates[i].getUeDay()== this.selectedDates[j].getUeDay()) {
                this.selectedDates.splice(j,1);
            }
        }
    }
    if (redraw!=false) {
        this.reDraw();
    }
}

Epoch.prototype.outputDate=function(vDate,vFormat) {
    var vDay=this.addZero(vDate.getDate());
    var vMonth=this.addZero(vDate.getMonth()+ 1);
    var vYearLong=this.addZero(vDate.getFullYear());
    var vYearShort=this.addZero(vDate.getFullYear().toString().substring(3,4));
    var vYear=(vFormat.indexOf('yyyy')> -1?vYearLong:vYearShort);
    var vHour= this.addZero(vDate.getHours());
    var vMinute= this.addZero(vDate.getMinutes());
    var vSecond= this.addZero(vDate.getSeconds());
    return vFormat.replace(/dd/g,vDay).replace(/mm/g,vMonth).replace(/y{1,4}/g,vYear).replace(/hh/g,vHour).replace(/nn/g,vMinute).replace(/ss/g,vSecond);
}

Epoch.prototype.updatePos=function(target) {
    this.calendar.style.top=this.getTop(target)+ this.topOffset+'px';
    this.calendar.style.left=this.getLeft(target)+ this.leftOffset+'px';
}

function CalHeading(owner,tableCell,dow) {
    this.owner=owner;
    this.tableCell=tableCell;
    this.dayOfWeek=dow;
    this.tableCell.onclick=this.onclick;
}

CalHeading.prototype.onclick=function() {
    var owner=this.headObj.owner;
    var sdates=owner.selectedDates;
    var cells=owner.cells;
    owner.cols[this.headObj.dayOfWeek]=!owner.cols[this.headObj.dayOfWeek];
    for (var i=0;i<cells.length;i++) {
        if(cells[i].dayOfWeek==this.headObj.dayOfWeek &&(!owner.selCurMonthOnly||cells[i].date.getMonth()== owner.displayMonth&&cells[i].date.getFullYear()== owner.displayYear)) {
            if(owner.cols[this.headObj.dayOfWeek]) {
                if(owner.selectedDates.arrayIndex(cells[i].date)== -1) {
                    sdates.push(cells[i].date);
                }
            } else {
                for (var j=0; j<sdates.length; j++) {
                    if(cells[i].dayOfWeek==sdates[j].getDay()) {
                        sdates.splice(j,1);
                        break;
                    }
                }
            }
            cells[i].selected=owner.cols[this.headObj.dayOfWeek];
        }
    }
    owner.reDraw();
}

function WeekHeading(owner,tableCell,week,row) {
    this.owner=owner;
    this.tableCell=tableCell;
    this.week=week;
    this.tableRow=row;
    this.tableCell.setAttribute('class','wkhead');
    this.tableCell.setAttribute('className','wkhead');
    this.tableCell.onclick=this.onclick;
}

WeekHeading.prototype.onclick=function() {
    var owner=this.weekObj.owner;
    var cells=owner.cells;
    var sdates=owner.selectedDates;
    var i,j;owner.rows[this.weekObj.tableRow]=!owner.rows[this.weekObj.tableRow];
    for (i=0; i<cells.length; i++) {
        if(cells[i].tableRow==this.weekObj.tableRow) {
            if (owner.rows[this.weekObj.tableRow] && (!owner.selCurMonthOnly||cells[i].date.getMonth()== owner.displayMonth&&cells[i].date.getFullYear()== owner.displayYear)) {
                if(owner.selectedDates.arrayIndex(cells[i].date)== -1) {
                    sdates.push(cells[i].date);
                }
            } else {
                for (j=0; j<sdates.length; j++) {
                    if(sdates[j].getTime()== cells[i].date.getTime()) {
                        sdates.splice(j,1);
                        break;
                    }
                }
            }
        }
    }
    owner.reDraw();
}

function CalCell (owner,tableCell,dateObj,row) {
    this.owner=owner;
    this.tableCell=tableCell;
    this.cellClass;
    this.selected=false;
    this.date=new Date(dateObj);
    this.dayOfWeek=this.date.getDay();
    this.week=this.date.getWeek();
    this.tableRow=row;
    this.tableCell.onclick=this.onclick;
    this.tableCell.onmouseover=this.onmouseover;
    this.tableCell.onmouseout=this.onmouseout;
    this.setClass();
}

CalCell.prototype.onmouseover=function() {
    this.setAttribute('class',this.cellClass+' hover');
    this.setAttribute('className',this.cellClass+' hover');
}

CalCell.prototype.onmouseout=function() {
    this.cellObj.setClass();
}

CalCell.prototype.onclick=function() {
    var cell=this.cellObj;
    var owner=cell.owner;
    if (!owner.selCurMonthOnly||cell.date.getMonth()== owner.displayMonth&&cell.date.getFullYear()== owner.displayYear) {
        if (owner.selectMultiple==true) {
            if(!cell.selected) {
                if(owner.selectedDates.arrayIndex(cell.date)== -1) {
                    owner.selectedDates.push(cell.date);
                }
            } else {
                var tmp=owner.selectedDates;
                for (var i=0; i<tmp.length; i++) {
                    if(tmp[i].getUeDay()== cell.date.getUeDay()) {
                        tmp.splice(i,1);
                    }
                }
            }
        } else {
            owner.selectedDates=new Array(cell.date);
            if(owner.tgt) {
                owner.tgt.value=owner.selectedDates[0].dateFormat();
                if(owner.mode=='popup') {
                    owner.hide();
                }
            }
        }
        owner.reDraw();
    }
}

CalCell.prototype.setClass=function() {
    if(this.selected) {
        this.cellClass='cell_selected';
    } else if (this.owner.displayMonth!=this.date.getMonth()) {
        this.cellClass='notmnth';
    } else if (this.date.getDay()> 0&&this.date.getDay()< 6) {
        this.cellClass='wkday';
    } else {
        this.cellClass='wkend';
    }
    if (this.date.getFullYear()== this.owner.curDate.getFullYear()&& this.date.getMonth()== this.owner.curDate.getMonth()&& this.date.getDate()== this.owner.curDate.getDate()) {
        this.cellClass=this.cellClass+' curdate';
    }
    this.tableCell.setAttribute('class',this.cellClass);
    this.tableCell.setAttribute('className',this.cellClass);
}

Date.prototype.getDayOfYear=function() {
    return parseInt((this.getTime()- new Date(this.getFullYear(),0,1).getTime())/86400000+1);
}

Date.prototype.getWeek=function() {
    return parseInt((this.getTime()- new Date(this.getFullYear(),0,1).getTime())/604800000+1);
}

Date.prototype.getUeDay=function() {
    return parseInt(Math.floor((this.getTime()- this.getTimezoneOffset()* 60000)/86400000));
}

Date.prototype.dateFormat=function(format) {
    if (!format) {
        format='d.m.Y';
    }
    LZ=function(x) {
        return(x<0||x>9?'':'0')+ x
    };
    var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
    var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
    format=format+"";
    var result="";
    var i_format=0;
    var c="";
    var token="";
    var y=this.getFullYear().toString();
    var M=this.getMonth()+1;
    var d=this.getDate();
    var E=this.getDay();
    var H=this.getHours();
    var m=this.getMinutes();
    var s=this.getSeconds();
    var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
    var value=new Object();
    value['Y']=y.toString();
    value['y']=y.substring(2);
    value['n']=M;
    value['m']=LZ(M);
    value['F']=MONTH_NAMES[M-1];
    value['M']=MONTH_NAMES[M+11];
    value['j']=d;
    value['d']=LZ(d);
    value['D']=DAY_NAMES[E+7];
    value['l']=DAY_NAMES[E];
    value['G']=H;
    value['H']=LZ(H);
    if(H==0) {
        value['g']=12;
    } else if (H>12) {
        value['g']=H-12;
    } else {
        value['g']=H;
    }
    value['h']=LZ(value['g']);
    if (H>11) {
        value['a']='pm';
        value['A']='PM';
    } else {
        value['a']='am';
        value['A']='AM';
    }
    value['i']=LZ(m);
    value['s']=LZ(s);
    while (i_format<format.length) {
        c=format.charAt(i_format);
        token="";
        while ((format.charAt(i_format)==c)&&(i_format<format.length)) {
            token += format.charAt(i_format++);
        }
        if(value[token]!=null) {
            result=result+value[token];
        } else {
            result=result+token;
        }
    }
    return result;
}

Array.prototype.arrayIndex=function(searchVal,startIndex) {
    startIndex =(startIndex!=null?startIndex:0);
    for (var i=startIndex; i<this.length; i++) {
        if(searchVal==this[i]) {
            return i;
        }
    } return -1;
}