var openedCalendar = null; var clndrSetDates = new Array(); //mn - month names //wd - week names //hc,bc - barvy //r1 - day field, r2 - month field, r3 - year field, f - formaty function clndr(ti,mi,mx,mn,wd,ho,hc,bc,r1,f1,r2,f2,r3,f3) { if(openedCalendar && !window.openedCalendar.closed) { window.openedCalendar.close(); window.openedCalendar = null; } if (ti=='Datum') clndr_wi=window.open('about:blank','clndr_wi',"location=0,menubar=0,resizable=0,scrollbars=0,status=0,toolbar=0,width=186,height=146,left=390,top=470"); else clndr_wi=window.open('about:blank','clndr_wi',"location=0,menubar=0,resizable=0,scrollbars=0,status=0,toolbar=0,width=186,height=146,left=390,top=700"); openedCalendar = clndr_wi; clndr_ho=new Array(); clndr_mn=new Array(); clndr_wd=new Array(); clndr_ms=new Array(31,28,31,30,31,30,31,31,30,31,30,31); clndr_dd=new Date(); clndr_td=new Date(); clndr_hd=new Date(); for(i=0;i\n\n"); if(document.all) wd.write("\n"); wd.write(""+clndr_ti+"                                   "); wd.write("\n\n"); wd.write("\nfunction ff(v) { var id='"+clndr_ti+"'; window.opener.clndr_ff(v,id); }"); wd.write("\nfunction sm(v) { window.opener.clndr_td.setMonth(v); window.opener.clndr_sh(); }"); wd.write("\nfunction sy(v) { window.opener.clndr_td.setFullYear(v); window.opener.clndr_sh(); }"); wd.write("\n"); wd.write("\n"); wd.write("
\n
"); if((clndr_td.getFullYear()>clndr_mi.getFullYear())||((clndr_td.getMonth()!=0)&&(clndr_td.getFullYear()==clndr_mi.getFullYear()))) wd.write("<"); else wd.write("<"); wd.write("
"); if((clndr_td.getFullYear()>"); else wd.write(">"); wd.write("
"); for(i=0;i<6;i++) wd.write(""); wd.write("\n"); clndr_td.setDate(1); pd=clndr_td.getDay()-1; clndr_rc=0; if(pd==-1) pd=6; bm=clndr_td.getMonth(); yr=clndr_td.getFullYear(); if(bm==0) { clndr_td.setMonth(11); clndr_td.setFullYear(yr-1); clndr_ol(); } else clndr_td.setMonth(bm-1); for(i=clndr_ms[clndr_td.getMonth()]-pd+1;i<=clndr_ms[clndr_td.getMonth()];i++) { clndr_td.setDate(i); if(clndr_td.getDay()==0) ho="class=ce"; else ho=""; wd.write(""); } clndr_td.setDate(1); clndr_td.setMonth(bm); clndr_td.setFullYear(yr); clndr_ol(); for(i=0;i\n"); clndr_rc++; } else if((clndr_td.getDay()==1)&&(clndr_td.getDate()==1)) wd.write(""); if(clndr_td.getDay()==0) ho="class=ce"; else ho=""; for(j=0;jclndr_mx.getTime())||(clndr_td.getTime()"+clndr_td.getDate()+""); else if(ho=="") wd.write(""); else wd.write(""); } clndr_td.setDate(1); clndr_td.setMonth(bm+1); pd=clndr_td.getDay()-1; if(pd==0) pd=20; if(pd==-1) pd=6; for(i=1;i<=(7-pd);i++) { wd.write(""); clndr_td.setDate(i); if(clndr_td.getDay()==0) ho="class=ce"; else ho=""; } clndr_td.setDate(1); clndr_td.setMonth(bm); clndr_td.setFullYear(yr); clndr_ol(); if(clndr_rc<5) wd.write(""); wd.write("
"+clndr_wd[i]+""+clndr_wd[6]+"
 
"+clndr_td.getDate()+""+clndr_td.getDate()+" 
 
"); wd.close(); window.clndr_wi.focus(); } function clndr_mm(ta) { var td=new Date(); ta=ta.split("."); td.setDate(ta[0]); td.setMonth(ta[1]-1); td.setFullYear(ta[2]); td.setHours(0); td.setMinutes(0); return(td); } function clndr_ol() { var y=clndr_td.getFullYear(); if (0 == y%4 && ((y%100 != 0) || (y%400 == 0))) clndr_ms[1]=29; else clndr_ms[1]=28; } function clndr_ff(dt,id) { var f,r,fr,d,dd,m,mm,mmm,yy,yyyy; clndrSetDates[id] = dt; var msn=Array('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC'); dt=dt.split("."); d=dt[0]; if(d<10) dd="0"+d; else dd=d; m=dt[1]; if(m<10) mm="0"+m; else mm=m; mmm = msn[m-1]; yyyy=dt[2]; yy=yyyy.substring(2,4); for(i=1;i<=3;i++) { r=eval("clndr_r"+i); f=eval("clndr_f"+i); if((r)&&(f!="undefined")) { fr=f.replace("dd",dd); fr=fr.replace("d",d); fr=fr.replace("mmm",mmm); fr=fr.replace("mm",mm); fr=fr.replace("m",m); fr=fr.replace("yyyy",yyyy); fr=fr.replace("yy",yy); } } document.getElementById(id+'_day').value = dd; document.getElementById(id+'_month').value = mm; document.getElementById(id+'_year').value = yyyy; window.clndr_wi.close(); openedWindow = false; } function clndr_as(co) { var k; var n="aAaAcCdDeEeEeEiIlLlLnNoOoOoOrRrRsStTuUuUuUyYzZ"; var o="áÁäÄeEiIéÉëËiIíÍaA31oOóÓôÔöÖaAoO¹©??úÚuUüÜýݾ®"; for(k=0;k