function fParseDate(ds) {
var i,r=null,pd=[];
if (!ds) return r;
if (gsSplit.length>0) {
pd=ds.split(gsSplit);
} else {
var yl=gbShortYear?2:4;
if (giDatePos==2) { pd[0]=ds.substring(0,yl);pd[1]=ds.substring(yl,yl+2);pd[2]=ds.substring(yl+2,yl+4); }
else { pd[0]=ds.substring(0,2);pd[1]=ds.substring(2,4);pd[2]=ds.substring(4,4+yl); }
}
if (pd.length==3) {
var m=pd[giDatePos==1?0:1];
for (i=0; (i<12)&&(gMonths[i].substring(0,3).toLowerCase()!=m.substring(0,3).to LowerCase())&&(i+1!=m); i++);
if (i<12) {
var y=parseInt(pd[giDatePos==2?0:2].substring(0,4),10);
var pf=Math.floor(gEnd[0]/100)*100;
r=[y<100?y>gEnd[0]%100?pf-100+y:pf+y:y,i+1,parseInt(pd[giDatePos],10)];
} else return null;
} else return null;
var td=new Date(r[0],r[1]-1,r[2]);
if (isNaN(td)||td.getMonth()!=r[1]-1) return null;
return r;
}
function fFormatDate(y,m,d){
var M=giMonthMode==0?gbPadZero&&m<10?"0"+m:m:giMonthMo de==1?gMonths[m-1]:gMonths[m-1].substring(0,giMonthMode);
var D=gbPadZero&&d<10?"0"+d:d;
var sy=y%100;
var Y=gbShortYear?sy<10?"0"+sy:sy:y;
switch (giDatePos) {
case 0: return D+gsSplit+M+gsSplit+Y;
case 1: return M+gsSplit+D+gsSplit+Y;
case 2: return Y+gsSplit+M+gsSplit+D;
}
}
function fGetAgenda(y,m,d,taint) {
var s=fCalibrate(y,m),cm=gCurMonth;
var def=["",gsAction,gcCellBG,null,guCellBGImg,false,gsCell HTML];
if (taint) if ((giShowOther&4)&&(s[0]<cm[0]||s[0]==cm[0]&&s[1]<cm[1])||(giShowOther&8)&&(s[0]>cm[0]||s[0]==cm[0]&&s[1]>cm[1]))
return null;
var ag=fHoliday?fHoliday(s[0],s[1],d):fGetEvent(y,m,d);
if (ag==null) ag=def;
else {
for (var i=0;i<7;i++) {
if (gAgendaMask[i]!=-1) ag[i]=gAgendaMask[i];
if (ag[i]==null&&i!=1) ag[i]=def[i];
}
if (taint&&s[1]!=cm[1]&&!(giShowOther&1)) {
def[0]=ag[0]; def[1]=ag[1]; ag=null; ag=def;
}
}
if (taint&&s[1]!=cm[1]) {
if (gcOtherDayBG&&ag[2]==gcCellBG) ag[2]=gcOtherDayBG;
ag[3]=gcOtherDay;
}
if (!fValidRange(s[0],s[1],d)) {
ag[0]=gsOutOfRange; ag[1]=null;
if (guOutOfRange) ag[4]=guOutOfRange;
}
return ag;
}
function fGetDOW(y,m,d) {
return (7+(new Date(y,m-1,d).getDay())-giFirstDOW)%7;
}
function fGetWeekNo(y,m,d) {
var dow=fGetDOW(y,1,1);
return Math.ceil(((Date.UTC(y,m-1,d)-Date.UTC(y,0,1))/MILLIDAY+dow-6)/7)+fWeekOffset(dow);
}
function fW2Date(y,w,wd) { // w > 0, wd > 0
var dow=fGetDOW(y,1,1);
if (dow<=3) w--;
var date=new Date(new Date(y,0,1)-0+(w*7+wd-dow-1)*MILLIDAY);
return [date.getFullYear(),date.getMonth()+1,date.getDate( )];
}
function fDate2W(y,m,d) {
var w=fGetWeekNo(y,m,d), wd=fGetDOW(y,m,d)+1;
if (w==0) { y--; w=fGetWeekNo(y,12,31); }
else if (w>52) {
var w1=fGetWeekNo(y+1,1,1);
if (w1>0) { y++; w=w1; }
}
return [y,w,wd];
}
function fGetDateByDOW(y,m,q,dow) { // q: 1-5; dow: 0-6
var dom=new Date(y,m-1,1).getDay();
var d=7*q-6+dow-dom;
if (dom>dow) d+=7;
if (d>fGetDays(y)[m]) d-=7;
return d; // 1-31
}
function fValidRange(y,m,d) {
for (var i=3; i<gRange.length; i++)
if (gRange[i][2]==d&&gRange[i][1]==m&&gRange[i][0]==y)
return false;
var dt=new Date(y,m-1,d);
return (dt>=gdBegin)&&(dt<=gdEnd);
}
function fBuildCal(y,m) {
var days=fGetDays(y),iDay1=fGetDOW(y,m,1);
var iLast=days[m-1]-iDay1+1,iDate=1,iNext=1;
for (var d=0;d<7;d++) {
__cal[0][d][0]=d<iDay1?m-1:m;
__cal[0][d][1]=d<iDay1?iLast+d:iDate++;
}
for (var w=1;w<6;w++)
for (var d=0;d<7;d++) {
__cal[w][d][0]=iDate<=days[m]?m:m+1;
__cal[w][d][1]=iDate<=days[m]?iDate++:iNext++;
}
}
function fIsOutRange(y,m) {
return (y>gRange[1][0]||y<gRange[0][0]||y==gRange[0][0]&&m<gRange[0][1]||y==gRange[1][0]&&m>gRange[1][1]);
}
function fBfRange(y,m) {
return y<gRange[0][0]||y==gRange[0][0]&&m<=gRange[0][1];
}
function fAfRange(y,m) {
return y>gRange[1][0]||y==gRange[1][0]&&m>=gRange[1][1];
}
function fToggleNavs(y,m) {
var n=fGetById(document,"navPrev"); if(n)n.style.visibility=fBfRange(y,m)?"hidden":"vi sible";
n=fGetById(document,"navNext"); if(n)n.style.visibility=fAfRange(y,m)?"hidden":"vi sible";
}
function fCheckRange(y,m) {
if (!_noBound&&fIsOutRange(y,m)) {
stopShowMon();
if (gsOutOfRange!="") alert(gsOutOfRange);
return false;
}
return true;
}
function fSetCal(y,m,d,bTriggerOnChg,e) {
var t=fCalibrate(parseInt(y,10),parseInt(m,10));
y=t[0]; m=t[1];
if (!fCheckRange(y,m)||bTriggerOnChg&&fOnChange&&fOnC hange(y,m,d,e)) {
if (gcbMon) gcbMon.options[gCurMonth[1]-1].selected=true;
if (gcbYear) gcbYear.options[gCurMonth[0]-gcbYear.options[0].value].selected=true;
return false;
}
if (d>0) fUpdSelect(y,m,d);
var iDiv=fGetById(document,"innerDiv");
fGetById(document,"innerDiv").innerHTML=fDrawCal(y ,m);
if (gcbMon) gcbMon.options[m-1].selected=true;
if (gcbYear) gcbYear.options[y-gcbYear.options[0].value].selected=true;
if (!gbHideTop&&giDCStyle>0) fGetById(document,"calTitle").innerHTML=eval(gsCal Title)+"\n";
fToggleNavs(y,m);
gcTemp=null;
setTimeout("fResize()",giInitDelay+giResizeDelay);
return true;
}
function fResize() {
if (fOnResize) fOnResize();
giInitDelay=0;
var ptb=fGetById(document,"outerTable");
if (!ptb) return;
var ow=ptb.offsetWidth;
var oh=ptb.offsetHeight;
if (ow) gfSelf.style.width=ow+"px";
if (oh) gfSelf.style.height=oh+"px";
}
function fSetDate(y,m,d,taint,e) {
var ag=fGetAgenda(y,m,d,taint);
if (ag==null||ag[1]==null) return false;
if (!fSetCal(y,m,d,true,e)) return false;
if (gbAutoClose) fHideCal();
eval(ag[1].replace(/\n/g,"\\n"));
if (fAfterSelected) fAfterSelected(y,m,d,e);
return true;
}
function fPrevMonth(e) {
return fSetCal(gCurMonth[0],gCurMonth[1]-1,0,true,e);
}
function fNextMonth(e) {
return fSetCal(gCurMonth[0],gCurMonth[1]+1,0,true,e);
}
function showPrevMon() {
if (!__stub[1]&&fPrevMonth()&&!fBfRange(gCurMonth[0],gCurMonth[1])) __stub[1]=setInterval("fPrevMonth()", giShowInterval);
}
function showNextMon() {
if (!__stub[1]&&fNextMonth()&&!fAfRange(gCurMonth[0],gCurMonth[1])) __stub[1]=setInterval("fNextMonth()", giShowInterval);
}
function stopShowMon() {
clearInterval(__stub[1]); __stub[1]=null;
}
function fMouseOver(t) {
if (!gbFocus) return;
gcTemp=t.style.backgroundColor;
t.style.backgroundColor=gcToggle;
}
function fMouseOut(t) {
if (!gbFocus||gcTemp==null) return;
t.style.backgroundColor=gcTemp?gcTemp:"transparent ";
}
function fHint(t,id) {
t.title=__tis[id];
gContainer.status=__tis[id];
}
var __sWH="<td class='WeekHead'><div style='position:relative;width:"+giWeekWidth+"px;t op:"+giHeadTop+"px;'>",
__sCH="<td class='CalHead'><div style='position:relative;width:"+giCellWidth+"px;h eight:"+giHeadHeight+"px;top:"+giHeadTop+"px;'>",
__sWC="<td class='WeekCol'><div style='position:relative;width:100%;top:"+giWeekTo p+"px;'>",
__sCC=" class='CalCol'><div class='CalCell' style='position:relative;width:100%;height:"+giCel lHeight+"px;",
__sDIVTD="</div></td>",
__tis=[];