function checkClick(e) {
	e?evt=e:evt=event;
	CSE=evt.target?evt.target:evt.srcElement;
	if (getObj('fc'))
		if (!isChild(CSE,getObj('fc')))
			getObj('fc').style.display='none';
}
function isChild(s, d) {
	while(s) {
		if (s==d) 
			return true;
		s=s.parentNode;
	}
	return false;
}
var now = new Date;
var sccd=now.getDate();
var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccd=now.getDate();
var ccm=now.getMonth();
var ccy=now.getFullYear();

document.write('<table id="fc" style="position:absolute;border-collapse:collapse;background:#FFFFFF;border:1px solid #3E68B2;display:none;" cellpadding=2>');
document.write('<tr style="font:bold 13px Arial"><td><INPUT type="button" onclick="csubm()" value="<<" class="button" style="width:18px;"></td><td colspan="5" id="mns" align="center"></td><td align="right"><INPUT type="button" onclick="caddm()" value=">>" class="button" style="width:18px;"></td></tr>');
document.write('<tr style="background:#0551A0;font:12px Arial;color:#FFFFFF"><td align=center>П</td><td align=center>В</td><td align=center>С</td><td align=center>Ч</td><td align=center>П</td><td align=center>С</td><td align=center>В</td></tr>');
for(var kk=1;kk<=6;kk++) {
	document.write('<tr>');
	for(var tt=1;tt<=7;tt++) {
		num=7 * (kk-1) - (-tt);
		document.write('<td id="v' + num + '" style="width:18px;height:18px">&nbsp;</td>');
	}
	document.write('</tr>');
}
document.write('<tr><td colspan="7" align="center" style="cursor:pointer;font:13px Arial;background:#97C0E0" onclick="today()">Сегодня: '+addnull(sccd,sccm+1,sccy)+'</td></tr>');
document.write('</table>');

document.all?document.attachEvent('onclick',checkClick):document.addEventListener('click',checkClick,false);

var updobj;
var objt;
function lcs(ielem, fel) {
	updobj = ielem;
	objt = fel;
	getObj('fc').style.left = gcLeft(ielem) + 'px';
	getObj('fc').style.top = gcTop(ielem) + ielem.offsetHeight + 'px';
	getObj('fc').style.display = '';

	curdt = ielem.value;
	curdtarr = curdt.split('.');
	isdt = true;
	for(var k = 0; k<curdtarr.length; k++) {
		if (isNaN(curdtarr[k]))
			isdt = false;
	}
	var tcd;
	if (isdt&(curdtarr.length==3)) {
		tcd = curdtarr[0];
		ccm = curdtarr[1]-1;
		ccy = curdtarr[2];
		if (ccm > 12) ccm = sccm;
		if (ccy < 2009) ccy = 2009;
		if ((ccy >= sccy) && (ccm > sccm)) {
			ccm = sccm;
			ccy = sccy;
		}
	}
	else {
		ccm = sccm;
		ccy = sccy;
	}
	prepcalendar(tcd, ccm, ccy);
}

function evtTgt(e) {
	var el;
	if(e.target)el = e.target;
	else if(e.srcElement)el = e.srcElement;
	if(el.nodeType==3)el = el.parentNode;
	return el;
}
function EvtObj(e){ if (!e) e = window.event; return e; }
function cs_over(e) {
	evtTgt(EvtObj(e)).style.background='#FFEBCC';
}
function cs_out(e) {
	evtTgt(EvtObj(e)).style.background='#FFFFFF';
}
function cs_click(e) {
	updobj.value = calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
	chksdate();
	getObj('fc').style.display = 'none';
}
function chksdate () {
	var obj1 = getObj('df_f');
	var obj2 = getObj('df_u');
	var val_1;
	var val_2;
	var isdt = true;
	var errmsg;
	if ((obj1) && (obj2)) {
		val_1 = obj1.value;
		val_2 = obj2.value;
		var re = /\b\d{1,2}\.\d{1,2}\.\d{4}\b/;
    if (re.test(val_1)) {
      var date_array = val_1.split('.');
      var day1 = date_array[0];
      var month1 = date_array[1] - 1;
      var year1 = date_array[2];
      source_date1 = new Date(year1, month1, day1);
      if(year1 != source_date1.getFullYear()) isdt = false;
      if(month1 != source_date1.getMonth()) isdt = false;
      if(day1 != source_date1.getDate()) isdt = false;
   	}
   	else  isdt = false;
   	
    if (re.test(val_2)) {
      var date_array = val_2.split('.');
      var day2 = date_array[0];
      var month2 = date_array[1] - 1;
      var year2 = date_array[2];
      source_date2 = new Date(year2, month2, day2);
      if(year2 != source_date2.getFullYear()) isdt = false;
      if(month2 != source_date2.getMonth()) isdt = false;
      if(day2 != source_date2.getDate()) isdt = false;
   	}
   	else isdt = false;
   	
   	if (isdt) {
   		if (source_date1.getTime() == source_date2.getTime()) {
   			isdt = false;
   			errmsg = 'Дата «с» должна отличаться от даты «по».';
   		}
   		else if (source_date1.getTime() > source_date2.getTime()) {
   			isdt = false;
   			errmsg = 'Дата «с» не может быть больше даты «по».';
   		}
   		else if (source_date2.getTime() > now.getTime()) {
   			isdt = false;
   			errmsg = 'Дата «по» не может быть больше сегодняшней даты.';
   		}
   		if ((source_date2.getTime() - source_date1.getTime()) > 2764800000) {
   			isdt = false;
   			errmsg = 'Период запроса не должен превышать 1 месяц.';
   		}
   	}
	}
	if (isdt) errmsg = '&nbsp;';
	if ((errmsg) && (getObj('gd_emsg'))) {
		getObj('gd_emsg').innerHTML = errmsg;
	}
	return isdt;
}
function chgdate () {
	var obj1 = getObj('df_f');
	var obj2 = getObj('df_u');
	if ((obj1) && (obj2)) {
		val_1 = obj1.value;
		val_2 = obj2.value;
		var n_ccm = sccm;
		var n_ccy = sccy;
		n_ccm-=1;
		if (n_ccm<0) {
			n_ccm=11;
			n_ccy--;
		}
		marr=((n_ccy%4)==0)?mnl:mnn;
		obj1.value = addnull('1', n_ccm + 1, n_ccy);
		obj2.value = addnull(marr[n_ccm], n_ccm + 1, n_ccy);
		if (getObj('gd_emsg')) {
			getObj('gd_emsg').innerHTML = '&nbsp;';
		}
	}
}

function chgtoday () {
	var obj1 = getObj('df_f');
	var obj2 = getObj('df_u');
	if ((obj1) && (obj2)) {
		val_1 = obj1.value;
		val_2 = obj2.value;
		var n_ccd = sccd;
		var n_ccm = sccm;
		var n_ccy = sccy;
		if (sccd == 1) {
			n_ccm--;
			if (n_ccm<0) {
				n_ccm=11;
				n_ccy--;
			}
			marr=((n_ccy%4)==0)?mnl:mnn;
			n_ccd = marr[n_ccm];
		}
		else n_ccd = 1;
		obj1.value = addnull(n_ccd, n_ccm + 1, n_ccy);
		obj2.value = addnull(sccd, sccm + 1, sccy);
		if (getObj('gd_emsg')) {
			getObj('gd_emsg').innerHTML = '&nbsp;';
		}
	}
}

var mnames = new Array('Январь','Февраль','Март','Апрель','Май','Июнь','Июль','Август','Сентрябрь','Октябрь','Ноябрь','Декабрь');
var mnn=new Array('31','28','31','30','31','30','31','31','30','31','30','31');
var mnl=new Array('31','29','31','30','31','30','31','31','30','31','30','31');
var calvalarr=new Array(42);

function f_cps(obj) {
	obj.style.font='10px Arial';
	obj.style.color='#333333';
	obj.style.textAlign='center';
	obj.style.textDecoration='none';
	obj.style.border='1px solid #606060';
	obj.style.background='#FFFFFF';
	obj.style.cursor='pointer';
}

function f_nat(obj) {
	obj.style.background='#E5E5E5';
	obj.style.color='#C0C0C0';
	obj.style.cursor='default';
	obj.onmouseover=null;
	obj.onmouseout=null;
	obj.onclick=null;
}

function prepcalendar(hd, cm, cy) {
	now=new Date();
	sd=now.getDate();
	td=new Date();
	td.setDate(1);
	td.setFullYear(cy);
	td.setMonth(cm);
	cd=td.getDay();
	if (cd==0)cd=6; else cd--;
	getObj('mns').innerHTML=mnames[cm]+ ' ' + cy;
	
	marr=((cy%4)==0)?mnl:mnn;
	
	for(var d=1; d <= 42; d++) {
		f_cps(getObj('v' + parseInt(d)));
		if ((d >= (cd - (-1))) && (d <= cd - (-marr[cm]))) {
			if ((cm >= sccm) && ((d-cd) > sccd) && cy >= sccy) {
				f_nat(getObj('v' + parseInt(d)));
			}
			else {
				getObj('v'+parseInt(d)).onmouseover=cs_over;
				getObj('v'+parseInt(d)).onmouseout=cs_out;
				getObj('v'+parseInt(d)).onclick=cs_click;
				if ((hd) && hd == (d-cd)) {
					getObj('v'+parseInt(d)).style.background='#97C0E0';
					getObj('v'+parseInt(d)).onmouseover=null;
					getObj('v'+parseInt(d)).onmouseout=null;
				}
				if (sccm == cm && sccd == (d-cd) && sccy == cy)
					getObj('v'+parseInt(d)).style.textDecoration='underline';
			}
			getObj('v'+parseInt(d)).innerHTML=d-cd;
			calvalarr[d]=addnull(d-cd,cm-(-1),cy);
		}
		else {
			getObj('v'+d).innerHTML='&nbsp;';
			getObj('v'+parseInt(d)).onmouseover=null;
			getObj('v'+parseInt(d)).onmouseout=null;
			getObj('v'+parseInt(d)).onclick=null;
			getObj('v'+parseInt(d)).style.cursor='default';
		}
	}
}

prepcalendar('', ccm, ccy);

function caddm() {
	if ((ccm >= sccm) && (ccy >= sccy)) return;
	marr=((ccy%4)==0)?mnl:mnn;
	ccm+=1;
	if (ccm>=12) {
		ccm=0;
		ccy++;
	}
	prepcalendar('',ccm,ccy);
}

function csubm() {
	if (ccy < 2010) return;
	marr=((ccy%4)==0)?mnl:mnn;
	ccm-=1;
	if (ccm<0) {
		ccm=11;
		ccy--;
	}
	prepcalendar('', ccm, ccy);
}

function today() {
	updobj.value = addnull(now.getDate(), now.getMonth() + 1, now.getFullYear());
	getObj('fc').style.display = 'none';
	chksdate();
	prepcalendar('', sccm, sccy);
}

function addnull(d, m, y) {
	var d0='', m0='';
	if (d < 10) d0 = '0';
	if (m < 10) m0 = '0';
	return '' + d0 + d + '.' + m0 + m + '.' + y;
}