Calendário

var _cl=new Calendar(),isIE4=/MSIE 4/.test(navigator.userAgent); function Calendar(date){ this.left=500; this.top=150; this.width=200; this.height=130; this.imgNext=_pl('calendario/next.gif'); this.imgPrev=_pl('calendario/prev.gif'); this.imgTodayIn=_pl('calendario/bt_hoje_in.gif'); this.imgTodayOut=_pl('calendario/bt_hoje_out.gif'); this.calWindow=null; this.setDate=_SD; this.previous=_PM; this.next=_NM; this.open=_OC; this.close=_ClC; this.toString=_TS; this.write=_WC; this.isDefDate=_IDD; this.setDate(date); } function _IDD(){ var dt=String(this.d)+String(this.m)+String(this.y); if(dt==String(this.c.value).replace(/\//g,""))return true; else return false; } function _WC(){ var w=this.calWindow; var d=w.document; var s=this.toString(); if(isIE4){d.write(s);w.location.reload();} else{d.open();d.write(s);d.close();} w.focus(); } function _SD(dt){ var dmes,mtxt; if(dt){ var s=(dt.length?dt.length:0); this.d=dt.slice(0,2); this.m=(s==8?dt.slice(2,4):dt.slice(3,5)); this.y=(s==8?dt.slice(4,8):dt.slice(6,10)); this.dt=new Date(this.m+"/"+this.d+"/"+this.y); } else{ this.dt=new Date(); this.d=_fi(this.dt.getDate(),2); this.m=_fi(this.dt.getMonth()+1,2); this.y=_fi(this.dt.getFullYear(),2); } dmes=[31,((((this.y%4==0)&&this.y%100!=0)||this.y%400==0)?29:28),31,30,31,30,31,31,30,31,30,31]; mtxt=["Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro"]; this.wd=this.dt.getDay(); this.md=dmes[Number(this.m)-1]; this.ml=mtxt[Number(this.m)-1]; } function _PM(){ var pm,py; if(this.m=='01'){pm='12';py=Number(this.y)-1;} else{pm=_fi(Number(this.m)-1,2);py=this.y;} this.setDate(this.d+"/"+pm+"/"+py); this.write(); } function _NM(){ var nm,ny; if(this.m=='12'){nm='01';ny=Number(this.y)+1;} else{nm=_fi(Number(this.m)+1,2);ny=this.y;} this.setDate(this.d+"/"+nm+"/"+ny); this.write(); } function _TS(){ var first=new Date(this.m+"/01/"+this.y), fSem=first.getDay(), dia=(-first.getDay()+1), testDt=this.isDefDate(), l=function (d){return ''+d+''}, str='Calendário'+ ''+ ''+ ''+ '

'+ ''+ ''+ ''+ '

'+ ''+ l('D')+l('S')+l('T')+l('Q')+l('Q')+l('S')+l('S')+'' ''+ ''; while(dia<=this.md){ str+=''; for(var sem=1;sem<=7;sem++){ if(dia<=0 || dia>this.md)str+=''; else str+=''; dia++; } str+=''; } str+='

x
x
	'+_fi(dia,2)+'

Hoje

'; return(String(str)); } function _OC(){ this.calWindow=open('calendario/nada.htm','_cl','width='+this.width+',height='+this.height+',left='+this.left+',top='+this.top); this.calWindow.location.replace('calendario/wopen.htm?script=opener._cl.write()'); } function _ClC(){this.calWindow.close();} function _pl(i){var t=new Image();t.src=i;return i;} function openCalendar(field){ _cl.setDate(field.value); _cl.c=field; _cl.open(); } function next(){_cl.next();} function prev(){_cl.previous();} function setValue(date){ if(!_cl.c || typeof _cl.c.value=="undefined"){_cl.close();return;} _cl.c.value=date; _cl.c.focus(); if(document.layers)_cl.c.blur(); autoSkip(_cl.c); _cl.close(); } function setToday(){ _cl.setDate(); if(_cl.c) setValue(_cl.d+"/"+_cl.m+"/"+_cl.y); _cl.close(); } function _fi(num,size){ var str=String(num),i,dif=size-str.length,aux=''; for(i=0;i=0 && fr.elements[ind]&&fr.elements[ind].type && fr.elements[ind].type!='hidden' && fr.elements[ind].blur)fr.elements[ind].blur(); }