// Copyright 2003, 2004 Peter L. Blum, All Rights Reserved, www.PeterBlum.com
// Peter's Date Package Release 1.1.7

function CSC_FillInMonth(pCalCId, pDrawDateLabel)
{
if (!gSupportsInnerHTML) 
return;
var vCal = PDP_GetById(pCalCId);
var vWRTbl = PDP_GetById(pCalCId + "_WeekRows");
var vCellsHaveSpacing = vWRTbl.cellSpacing != "0";
var vWEDay1 = 0;
var vWEDay2 = 6;
var vFDOW = parseInt(PDP_GetAtt(vCal, "FDOW", "0"));
if (vFDOW != 0)
{
vWEDay1 = 7 - vFDOW;
vWEDay2 = 6 - vFDOW;
}
var vSelCSS = PDP_GetAtt(vCal, "SelCSS", "");
var vSpCSS = PDP_GetAtt(vCal, "SpCSS", "");
var vWEBG = PDP_GetAtt(vCal, "WEBG", "");
var vWEBGOM = eval(PDP_GetAtt(vCal, "WEBGOM", ""));
var vWDCSS = PDP_GetAtt(vCal, "WDCSS", "");
var vWRCSS = PDP_GetAtt(vCal, "WRCSS", "");
var vOMCSS = PDP_GetAtt(vCal, "OMCSS", "");
var vDCBrdC = PDP_GetAtt(vCal, "DCBrdC", "");
var vDCBrdSd = parseInt(PDP_GetAtt(vCal, "DCBrdSd", "1")); var vOMDCBrdC = PDP_GetAtt(vCal, "OMDCBrdC", "");
var vOMDays = eval(PDP_GetAtt(vCal, "OMDays", false));
var vOMWks = eval(PDP_GetAtt(vCal, "OMWks", false));
var vLZDays = eval(PDP_GetAtt(vCal, "LZDays", false));
var vOrigDCFmt = PDP_GetAtt(vCal, "DCFmt", "");
var vWkNm = eval(PDP_GetAtt(vCal, "WkNm", false));
var vSDId = "";
if (this.SD_InstallSD) 
vSDId = PDP_GetAtt(vCal, "SDId", "");
var vMonth = parseInt(PDP_GetAtt(vCal, "Month", "0")); var vYear = parseInt(PDP_GetAtt(vCal, "Year", "0"));
var vDay = 1;
var vThisMonth = vMonth;
var vThisYear = vYear;
var vMonthPos = 0;
CSC_InitSize(vCal); var vDateOfCell = PDP_MakeUTCDate(vYear, vMonth, vDay); var vCurUTC = vDateOfCell.valueOf(); var vDayOfWeek = vDateOfCell.getUTCDay();
if (vDayOfWeek != vFDOW)
{
if (vFDOW > vDayOfWeek)
vCurUTC = vCurUTC - ((vDayOfWeek - vFDOW + 7) * 86400000); else
vCurUTC = vCurUTC - ((vDayOfWeek - vFDOW) * 86400000);
vDateOfCell = new Date(vCurUTC); vMonth = vDateOfCell.getUTCMonth();
vYear = vDateOfCell.getUTCFullYear();
vDay = vDateOfCell.getUTCDate();
vMonthPos = vThisMonth - 1;
}
else
vMonthPos = vThisMonth;
var vSelUTC = -1;
if (PDP_GetById(pCalCId + "_Day").value != "0")
{
var vSelDate = PDP_MakeUTCDate(
PDP_GetById(pCalCId + "_Year").value,
PDP_GetById(pCalCId + "_Month").value,
PDP_GetById(pCalCId + "_Day").value);
vSelUTC = vSelDate.valueOf(); }
var vTodayDate = PDP_GetUTCInAtt(vCal, "Today");
var vTodayUTC = vTodayDate.valueOf();
var vSpUTC = -1;
var vSpDate = PDP_GetUTCInAtt(vCal, "Special");
if (vSpDate != null)
vSpUTC = vSpDate.valueOf();
var vMinUTC = -1;
var vMinDate = PDP_GetUTCInAtt(vCal, "Min");
if (vMinDate != null)
vMinUTC = vMinDate.valueOf();
var vHasMin = vMinUTC != -1;
var vMaxUTC = -1;
var vMaxDate = PDP_GetUTCInAtt(vCal, "Max");
if (vMaxDate != null)
vMaxUTC = vMaxDate.valueOf();
var vHasMax = vMaxUTC != -1;
var vBSD = null;
if (vSDId != "")
SD_InitSequentialSearch(vSDId);
var vNewVisibleRows = 0;
var vOldVisibleRows = 0;
var vDayCellHeight = 0;
var vHiddenWeek = false;
var vSelCId = "";
var vLastHadBorder = new Array (true, true, true, true, true, true, true);
var vCurWkNum = 1;
var vLastWkNum = 100; if (vWkNm)
{
var vWkNmRl = parseInt(PDP_GetAtt(vCal, "WkNmRl", "0"));
vCurWkNum = PDP_GetWeekNum(vDateOfCell, vWkNmRl, vFDOW);
if (vCurWkNum > 44) 
{
var vDate2 = PDP_GetFirstWeekNumDate(vDateOfCell.getUTCFullYear() + 1, vWkNmRl, vFDOW);
vLastWkNum = PDP_GetWeekNum(new Date(vDate2 - (86400000 * 7)), vWkNmRl, vFDOW);
}
}
var vRows = null;
var vRowsMode = false;
var vByTagNameMode = false;
var vGetChildNodesMode = false;
var vDayCellIdCount = 1;
var vWkNumSpace = vWkNm ? 1 : 0; if (vWRTbl.rows && !gIsSafari) 
{
vRows = vWRTbl.rows;
vRowsMode = true;
}
else if (vWRTbl.getElementsByTagName) 
{
vRows = vWRTbl.getElementsByTagName("TR");
vByTagNameMode = true;
}
else
{
vRows = PDPUtil_GetChildNodes(vWRTbl, "TBODY", 1);
vGetChildNodesMode = true;
}
for (vRowCount = 0; vRowCount < 6; vRowCount++)
{
var vWeekRow = null;
if (vRowsMode) 
vWeekRow = vWRTbl.rows[vRowCount]; else if (vByTagNameMode) 
vWeekRow = vRows.item(vRowCount);
else 
vWeekRow = PDPUtil_GetChildNodes(vRows, "TR", vRowCount + 1);
if (vWeekRow.style.display != "none")
vOldVisibleRows++;
vWeekRow.style.display = "";
if (vMonthPos <= vThisMonth) 
vNewVisibleRows++;
else if (!vOMWks)
{
vWeekRow.style.display = "none";
vHiddenWeek = true;
}
if (vWkNm)
{
var vWNDC = null;
if (vRowsMode) 
vWNDC = vWeekRow.cells[0]; else if (vByTagNameMode)
vWNDC = PDP_GetById(pCalCId + "_WK" + vRowCount);
else 
vWNDC = PDPUtil_GetChildNodes(vWeekRow, "TD", 1); PDP_SetInnerHTML(vWNDC, vCurWkNum);
vCurWkNum++;
if (vCurWkNum > vLastWkNum)
vCurWkNum = 1;
}
for (vDayCount = 0; vDayCount < 7; vDayCount++)
{
var vDC = null;
if (vRowsMode) 
vDC = vWeekRow.cells[vDayCount + vWkNumSpace]; else if (vByTagNameMode)
vDC = PDP_GetById(pCalCId + "_" + vDayCellIdCount);
else 
vDC = PDPUtil_GetChildNodes(vWeekRow, "TD", vDayCount + 1 + vWkNumSpace); var vDayLbl = "";
if (vLZDays && (vDay < 10))
vDayLbl = "0" + vDay.toString();
else
vDayLbl = vDay.toString();
var vDefaultStyle = ""; var vDCFmt = vOrigDCFmt; var vBlank = false; var vSelectableCell = true; var vSDUnsel = false;
if (vDayCellHeight == 0)
{
var vSavedHeight = PDP_GetAtt(vCal, "CellHeight", 0);
if (vSavedHeight == 0)
{
vSavedHeight = vDC.clientHeight;
PDP_SetAtt(vCal, "CellHeight", vSavedHeight);
}
vDayCellHeight = vSavedHeight;
}
PDP_SetBkColor(vDC, "");
vDC.style.fontWeight = "";
vDC.style.color = "";
if (vDayCellHeight > 0) 
vDC.style.height = vDayCellHeight;
vDC.title = ""; var vSupportsWeekend = false;
var vOutOfRange = (vHasMin && (vCurUTC < vMinUTC)) ||
(vHasMax && (vMaxUTC < vCurUTC));
if (vHiddenWeek)
{
vDC.className = "";
vDayLbl = "";
vDC.style.height = 0;
vSelectableCell = false;
vBlank = true;
}
else if (vOutOfRange)
{
vDC.className = "";
vDayLbl = "&nbsp;";
vSelectableCell = false;
vBlank = true;
}
else if (!vOMDays && (vMonth != vThisMonth))
{
vDC.className = vOMCSS;
vDayLbl = "&nbsp;";
vSelectableCell = false;
vBlank = true;
}
else if (vCurUTC == vSelUTC)
{
if (vSelUTC == vTodayUTC)
{
vDC.className = PDP_GetAtt(vCal, "SelTCSS", "");
if (vDC.className == "")
vDC.style.fontWeight = "bold";
}
else
{
vDC.className = vSelCSS;
}
if (vSelCSS == "")
PDP_SetBkColor(vDC, "gold");
vSelCId = vDC.id;
if ((vMonth != vThisMonth) && (vDC.className == ""))
vDC.style.color = "gray";
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGSelC", false));
}
else if (vCurUTC == vTodayUTC)
{
vDC.className = PDP_GetAtt(vCal, "TCSS", "");
if (vDC.className == "")
vDC.style.fontWeight = "bold";
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGTC", false));
}
else if ((vSpCSS != "") && (vCurUTC == vSpUTC)) 
{
vDC.className = vSpCSS;
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGSpC", false));
}
else if (vMonth != vThisMonth)
{
vDC.className = vOMCSS;
if (vDC.className == "")
vDC.style.color = "gray";
vSupportsWeekend = vWEBGOM;
}
else
{
vDC.className = vWDCSS;
vSupportsWeekend = true;
}
if (vCurUTC == vSpUTC) 
vDC.title = PDP_GetAtt(vCal, "SpDtTT", "");
else if (vCurUTC == vTodayUTC)
vDC.title = PDP_GetAtt(vCal, "TodayTT", "");
if (vSupportsWeekend &&
((vWEDay1 == vDayCount) || (vWEDay2 == vDayCount)) &&
(vWEBG != ""))
PDP_SetBkColor(vDC, vWEBG);
var vCellLbl = ""; if ((vSDId != "") && !vOutOfRange && !vHiddenWeek)
{
vBSD = SD_SequentialSearch(vDateOfCell);
if (vBSD != null)
{
vDC.title = vBSD.Label;
vCellLbl = vBSD.Label;
if (!vBSD.Selectable)
{
vSDUnsel = vSelectableCell;
vSelectableCell = false;
}
if (vBSD.DCFmt != "")
vDCFmt = vBSD.DCFmt;
if (vCurUTC != vSelUTC)
{
if ((vBSD.CssClass != "") && (vMonth == vThisMonth))
vDC.className = vBSD.CssClass;
else if ((vBSD.OMCssClass != "") && (vMonth != vThisMonth))
vDC.className = vBSD.OMCssClass;
}
}
} 
if (vBlank)
vDCFmt = "";
PDP_SetAtt(vDC, "Day", vDay);
if (vDCFmt != "")
{
vDayLbl = vDCFmt.replace("{0}", vDayLbl);
vDayLbl = vDayLbl.replace("{1}", vCellLbl);
}
PDP_SetInnerHTML(vDC, vDayLbl);
var vRole = 0;
if (vOutOfRange)
vRole = 14;
else if (vHiddenWeek)
vRole = 13;
else if (!vSelectableCell)
vRole = 12;
else if (vCurUTC == vTodayUTC)
vRole = 2;
else if (vCurUTC == vSpUTC)
vRole = 3;
else if (vMonthPos > vThisMonth)
vRole = 11;
else if (vMonthPos < vThisMonth)
vRole = 10;
PDP_SetAtt(vDC, "CellRole", vRole);
var vMO = 0;
if (vMonthPos > vThisMonth)
vMO = 1;
else if (vMonthPos < vThisMonth)
vMO = -1;
PDP_SetAtt(vDC, "MonthOffset", vMO);
vDC.style.borderLeft = "none"; vDC.style.borderTop = "none";
vDC.style.borderRight = "none";
vDC.style.borderBottom = "none";
if (vRole <= 12)
{
var vColor = vRole < 10 ? vDCBrdC : vOMDCBrdC;
if (vColor != "")
{
if (vDCBrdSd < 2) 
{
if (!vCellsHaveSpacing && (vRowCount == 0)) 
vDC.style.borderBottom = "1px solid " + vDCBrdC;
else
vDC.style.borderBottom = "1px solid " + vColor;
if (vCellsHaveSpacing || !vLastHadBorder[vDayCount])
vDC.style.borderTop = "1px solid " + vColor;
}
if (vDCBrdSd > 0) 
{
vDC.style.borderLeft = "1px solid " + vColor;
if (vCellsHaveSpacing || (vDayCount == 6)) 
vDC.style.borderRight = "1px solid " + vColor;
}

}
vLastHadBorder[vDayCount] = true;
}
else if (vMonthPos < vThisMonth)
vLastHadBorder[vDayCount] = false;
else if (vLastHadBorder[vDayCount] && (vMonthPos >= vThisMonth)) 
{
if (vDCBrdSd > 0) 
if (!vCellsHaveSpacing && (vDayCount > 0) && vLastHadBorder[vDayCount - 1])
vDC.style.borderLeft = "1px solid " + vDCBrdC;
for (var vI = 0; vI < 7; vI++)
vLastHadBorder[vI] = false;
}
var vFnc = "";
vFnc = vFnc + "vDC.style.color='" + vDC.style.color + "';";
if (vCellsHaveSpacing)
if (gIsSafari)
if (vDCBrdC != "")
vFnc = vFnc + "vDC.style.borderColor='" + vDCBrdC + "';";
else
vFnc = vFnc + "vDC.style.borderLeftColor='';vDC.style.borderRightColor='';vDC.style.borderTopColor='';vDC.style.borderBottomColor='';"; else
vFnc = vFnc + "vDC.style.borderColor='" + vDC.style.borderColor + "'";
PDP_SetAtt(vDC, "MouseOutCode", vFnc);
vCurUTC = vCurUTC + 86400000; vDateOfCell = new Date(vCurUTC); vMonth = vDateOfCell.getUTCMonth();
vYear = vDateOfCell.getUTCFullYear();
vDay = vDateOfCell.getUTCDate();
if (vDay == 1) 
vMonthPos++;
vDayCellIdCount++;
} 
} 
CSC_FillInMonthHeader(pCalCId);
if (pDrawDateLabel)
CSC_DrawDateLabel(vCal);
PDP_SetAtt(vCal, "SelectedCell", vSelCId);
if (vMinDate != null)
{
var vCmd = PDP_GetById(pCalCId + "_JumpBack");
var vHidden = (vThisYear < vMinDate.getUTCFullYear()) ||
((vThisYear == vMinDate.getUTCFullYear()) && (vThisMonth <= vMinDate.getUTCMonth()));
if (vCmd != null)
vCmd.style.visibility = vHidden ? "hidden" : "inherit";
vCmd = PDP_GetById(pCalCId + "_PrevMonth");
if (vCmd != null)
vCmd.style.visibility = vHidden ? "hidden" : "inherit";
}
if (vMaxDate != null)
{
var vCmd = PDP_GetById(pCalCId + "_JumpForward");
var vHidden = (vThisYear > vMaxDate.getUTCFullYear()) ||
((vThisYear == vMaxDate.getUTCFullYear()) && (vThisMonth >= vMaxDate.getUTCMonth()));
if (vCmd != null)
vCmd.style.visibility = vHidden ? "hidden" : "inherit";
vCmd = PDP_GetById(pCalCId + "_NextMonth");
if (vCmd != null)
vCmd.style.visibility = vHidden ? "hidden" : "inherit";
}
PDP_SetAtt(vCal, "MonthLoaded", true);
} 

function CSC_Initialize(pCalCId, pFillInMonth )
{
if (!gSupportsInnerHTML) 
return;
var vCal = PDP_GetById(pCalCId);
vInitialized = eval(PDP_GetAtt(vCal, "Inited", false));
if (vInitialized)
return;
var vIsPopup = eval(PDP_GetAtt(vCal, "IsPopup", false));
if (vIsPopup && (gIsIEMac51 || !gIsIEMac) ) 
{
PDP_RelocatePopup(vCal);
if (this.PM_InitializeOne) 
{
PM_InitializeOne(pCalCId);
PM_InitializeOne(pCalCId + "_Help"); }
var vCal = PDP_GetById(pCalCId);
}

var vWRTbl = PDP_GetById(pCalCId + "_WeekRows");
var vFasterClient = eval(PDP_GetAtt(vCal, "FC", false));
if (!vFasterClient)
{
var vWEDay1 = 0;
var vWEDay2 = 6;
var vFDOW = parseInt(PDP_GetAtt(vCal, "FDOW", "0"));
if (vFDOW != 0)
{
vWEDay1 = 7 - vFDOW;
vWEDay2 = 6 - vFDOW;
}
var vMouseOverActive =
((PDP_GetAtt(vCal, "MOFC", "") != "") || 
(PDP_GetAtt(vCal, "MOBdrC", "") != ""));
var vCellsHaveSpacing = vWRTbl.cellSpacing != "0";
var vRows = null;
var vRowsMode = false;
var vByTagNameMode = false;
var vGetChildNodesMode = false;
var vDayCellIdCount = 1;
var vWkNm = eval(PDP_GetAtt(vCal, "WkNm", false));
var vWkNumSpace = vWkNm ? 1 : 0;
if (vWRTbl.rows && !gIsSafari) 
{
vRows = vWRTbl.rows;
vRowsMode = true;
}
else if (vWRTbl.getElementsByTagName) 
{
vRows = vWRTbl.getElementsByTagName("TR");
vByTagNameMode = true;
}
else
{
vRows = PDPUtil_GetChildNodes(vWRTbl, "TBODY", 1);
vGetChildNodesMode = true;
}
for (vRowCount = 0; vRowCount < 6; vRowCount++)
{
var vWeekRow = null;
if (vRowsMode) 
vWeekRow = vWRTbl.rows[vRowCount]; else if (vByTagNameMode) 
vWeekRow = vRows.item(vRowCount);
else 
vWeekRow = PDPUtil_GetChildNodes(vRows, "TR", vRowCount + 1); for (vDayCount = 0; vDayCount < 7; vDayCount++)
{
var vDC = null;
if (vRowsMode) 
vDC = vWeekRow.cells[vDayCount + vWkNumSpace]; else if (vByTagNameMode)
vDC = PDP_GetById(pCalCId + "_" + vDayCellIdCount);
else 
vDC = PDPUtil_GetChildNodes(vWeekRow, "TD", vDayCount + 1 + vWkNumSpace); PDP_SetAtt(vDC, "WkE", ((vDayCount == vWEDay1) || (vDayCount == vWEDay2)));
vDC.onclick = new Function("CSC_ChangeDay('" + pCalCId + "','" + vDC.id + "', true);");
if (vMouseOverActive)
{
vDC.onmouseover = new Function("CSC_MouseOverEffect('" + pCalCId + "', '" + vDC.id + "', " + vCellsHaveSpacing + ");");
vDC.onmouseout = new Function("CSC_MouseOutEffect('" + vDC.id + "');");
}
vDC.onfocus = new Function("CSC_FocusOnCalendar('" + pCalCId + "');");
vDayCellIdCount++;
} 
} 
} 

if (vWRTbl.focus)
{
var vFocusBorderColor = PDP_GetAtt(vCal, "FBrdC", "");
if ((vFocusBorderColor != null) && (vFocusBorderColor != ""))
{
vWRTbl.onfocus = new Function("CSC_FocusBorderColor('" + pCalCId + "','" + vFocusBorderColor + "')");
vWRTbl.onblur = new Function("CSC_FocusBorderColor('" + pCalCId + "','" + vWRTbl.style.borderTopColor + "')");
}
}
if (gSupportsFocusOnTable && 
(vCal.attachEvent != null)) 
{
vCal.attachEvent("onkeydown", new Function("return CSC_OnKeyDownIE('" + pCalCId + "');"));
vCal.attachEvent("onkeypress", new Function("return CSC_OnKeyPressIE('" + pCalCId + "');"));
vCal.onfocus = new Function("CSC_FocusOnCalendar('" + pCalCId + "');");
}
else if (vCal.addEventListener != null) 
{
var vOnPopup = PDP_GetAtt(vCal, "onpopup", "");
if (vOnPopup == "")
vOnPopup = "CSC_AttachKeyboardNS();";
else
vOnPopup = vOnPopup + "CSC_AttachKeyboardNS();";
PDP_SetAtt(vCal, "onpopup", vOnPopup);
var vOnPopdown = PDP_GetAtt(vCal, "onpopdown", "");
if (vOnPopdown == "")
vOnPopdown = "CSC_DetachKeyboardNS();";
else
vOnPopdown = vOnPopdown + "CSC_DetachKeyboardNS();";
PDP_SetAtt(vCal, "onpopdown", vOnPopdown);
}

if (vWRTbl.offsetWidth != 0) 
CSC_InitSize(vCal);
if (pFillInMonth)
CSC_FillInMonth(pCalCId, true);
PDP_SetAtt(vCal, "Inited", true);
} 

function CSC_TestInitializing(pCalCId, pMsg)
{
var vCal = PDP_GetById(pCalCId);
var vInitialized = eval(PDP_GetAtt(vCal, "Inited", false));
if (vInitialized)
return true;
alert(pMsg);
return false;
} 
function CSC_InitSize(pCField)
{
var vInit = eval(PDP_GetAtt(pCField, 'InitSize', false));
if (vInit)
return;
var vCId = pCField.id;
var vWRTbl = PDP_GetById(vCId + "_WeekRows");
var vCommonWidth = vWRTbl.offsetWidth;
var vDayHeaderTable = PDP_GetById(vCId + "_DayHeader");
if ((vDayHeaderTable != null) && (vDayHeaderTable.offsetWidth > vCommonWidth))
vCommonWidth = vDayHeaderTable.offsetWidth;
var vHeaderTable1 = PDP_GetById(vCId + "_Header1");
if ((vHeaderTable1 != null) && (vHeaderTable1.offsetWidth > vCommonWidth))
vCommonWidth = vHeaderTable1.offsetWidth;
var vHeaderTable2 = PDP_GetById(vCId + "_Header2");
if ((vHeaderTable2 != null) && (vHeaderTable2.offsetWidth > vCommonWidth))
vCommonWidth = vHeaderTable2.offsetWidth;
var vHeaderTable3 = PDP_GetById(vCId + "_Header3");
if ((vHeaderTable3 != null) && (vHeaderTable3.offsetWidth > vCommonWidth))
vCommonWidth = vHeaderTable3.offsetWidth;
var vFooterTable1 = PDP_GetById(vCId + "_Footer1");
if ((vFooterTable1 != null) && (vFooterTable1.offsetWidth > vCommonWidth))
vCommonWidth = vFooterTable1.offsetWidth;
var vFooterTable2 = PDP_GetById(vCId + "_Footer2");
if ((vFooterTable2 != null) && (vFooterTable2.offsetWidth > vCommonWidth))
vCommonWidth = vFooterTable2.offsetWidth;
var vFooterTable3 = PDP_GetById(vCId + "_Footer3");
if ((vFooterTable3 != null) && (vFooterTable3.offsetWidth > vCommonWidth))
vCommonWidth = vFooterTable3.offsetWidth;
var vCalendarClientWidth = 0;
if (pCField.clientWidth)
vCalendarClientWidth = pCField.clientWidth;
else
vCalendarClientWidth = pCField.offsetWidth;
if (vCalendarClientWidth > vCommonWidth)
{
vCommonWidth = vCalendarClientWidth;
pCField.style.width = vCommonWidth;
}
else 
pCField.style.width = vCommonWidth;
vWRTbl.style.width = vCommonWidth;
if (vDayHeaderTable != null)
vDayHeaderTable.style.width = vCommonWidth;
if (vHeaderTable1 != null)
vHeaderTable1.style.width = vCommonWidth;
if (vHeaderTable2 != null)
vHeaderTable2.style.width = vCommonWidth;
if (vHeaderTable3 != null)
vHeaderTable3.style.width = vCommonWidth;
if (vFooterTable1 != null)
vFooterTable1.style.width = vCommonWidth;
if (vFooterTable2 != null)
vFooterTable2.style.width = vCommonWidth;
if (vFooterTable3 != null)
vFooterTable3.style.width = vCommonWidth;

PDP_SetAtt(pCField, 'InitSize', true);

} 
function CSC_AttachKeyboardNS()
{
document.addEventListener("keydown", CSC_OnKeyDownDOM, false);
document.addEventListener("keypress", CSC_OnKeyPressDOM, false);
} 
function CSC_DetachKeyboardNS()
{
document.removeEventListener("keydown", CSC_OnKeyDownDOM, false);
document.removeEventListener("keypress", CSC_OnKeyPressDOM, false);
} 

function CSC_ChangeDay(pCalCId, pDCId, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
var vSelCId = PDP_GetAtt(vCal, "SelectedCell", "");
if (pDCId != vSelCId)
{
var vNewDC = null;
var vNewRole = 0;
if (pDCId != "") 
{
vNewDC = PDP_GetById(pDCId);
vNewRole = parseInt(PDP_GetAtt(vNewDC, "CellRole", "0"));
if (vNewRole >= 12) 
return; }
if ((vSelCId != null) && (vSelCId != ""))
{
var vDC = PDP_GetById(vSelCId);
var vRole = parseInt(PDP_GetAtt(vDC, "CellRole", "0"));
PDP_SetBkColor(vDC, "");
vDC.style.fontWeight = "";
vDC.style.color = "";
if (vDC.background) 
vDC.background = "";
vDC.className = "";
var vSupportsWeekend = false;
switch (vRole)
{
case 0: 
vDC.className = PDP_GetAtt(vCal, "WDCSS", "");
vSupportsWeekend = true;
break;
case 2: 
vDC.className = PDP_GetAtt(vCal, "TCSS", "");
if (vDC.className == "")
vDC.style.fontWeight = "bold";
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGTC", false));
break;
case 3: 
vDC.className = PDP_GetAtt(vCal, "SpCSS", false);
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGSpC", false));
break;
case 10: 
case 11: 
vDC.className = PDP_GetAtt(vCal, "OMCSS", false);
if (vDC.className == "")
vDC.style.color = "gray";
vSupportsWeekend = eval(PDP_GetAtt(vCal, "WEBGOM", false));
break;
} 
if (vSupportsWeekend && (eval(PDP_GetAtt(vDC, "WkE"))))
PDP_SetBkColor(vDC, PDP_GetAtt(vCal, "WEBG", ""));
var vSDId = PDP_GetAtt(vCal, "SDId", "");
if (vSDId != "")
{
var vUTCDate = PDP_MakeUTCDate(CSC_GetYear(pCalCId), CSC_GetMonth(pCalCId), CSC_GetDay(pCalCId));
var vBSD = SD_FindDate(vSDId, vUTCDate);
if (vBSD != null)
{
if ((vBSD.CssClass != "") && (vRole < 10))
vDC.className = vBSD.CssClass;
else if ((vBSD.OMCssClass != "") && (vRole >= 10))
vDC.className = vBSD.OMCssClass;
}
}
if (vDC.onmouseout != null)
{
if (document.createEvent != null)
{
var evt = document.createEvent('MouseEvents');
evt.initEvent ('mouseout', false, false);
vDC.dispatchEvent(evt);
}
else if (vDC.fireEvent != null) 
vDC.fireEvent('onmouseout');
else
{
var vFnc = vDC.getAttribute("onmouseout").toString();
if (vFnc != "")
{
var vIndex = vFnc.indexOf('CSC_MouseOutEffect');
vFnc = vFnc.substring(vIndex, vFnc.length - 1);
vIndex = vFnc.indexOf(')');
vFnc = vFnc.substring(0, vIndex + 1);
eval(vFnc + ';');
}
}
}
} 
if (vNewDC != null)
{
PDP_SetBkColor(vNewDC, "");
vNewDC.style.fontWeight = "";
if (vNewDC.background) 
vNewDC.background = "";
if (vNewRole == 2) 
{
vNewDC.className = PDP_GetAtt(vCal, "SelTCSS", "");
if (vNewDC.className == "")
vNewDC.style.fontWeight = "bold";
}
else 
{
vNewDC.className = PDP_GetAtt(vCal, "SelCSS", "");
}
if (vNewDC.className == "") 
PDP_SetBkColor(vNewDC, "gold");
PDP_SetAtt(vCal, "SelectedCell", pDCId);
var vDayValue = PDP_GetAtt(vNewDC, "Day", 0);
PDP_GetById(pCalCId + "_Day").value = vDayValue;
var vMO = parseInt(PDP_GetAtt(vNewDC, "MonthOffset", "0")); var vYear = parseInt(PDP_GetAtt(vCal, "Year", "0"));
var vMonth = parseInt(PDP_GetAtt(vCal, "Month", "0"));
if ((vMonth == 0) && (vMO < 0))
{
vMonth = 11;
vYear--;
}
else if ((vMonth == 11) && (vMO > 0))
{
vMonth = 0;
vYear++;
}
else
vMonth = vMonth + vMO;
PDP_GetById(pCalCId + "_Year").value = vYear.toString();
PDP_GetById(pCalCId + "_Month").value = vMonth.toString();

}
else 
{
PDP_SetAtt(vCal, "SelectedCell", "");
PDP_GetById(pCalCId + "_Year").value = "0";
PDP_GetById(pCalCId + "_Month").value = "0";
PDP_GetById(pCalCId + "_Day").value = "0";
}
CSC_DrawDateLabel(vCal);
if (pFeedback)
CSC_OnSelectionChanged(vCal, false);
}
else if (pFeedback && (pDCId != "") && (eval(PDP_GetAtt(vCal, "IsPopup", false))))
CSC_OnSelectionChanged(vCal, true);
} 

function CSC_OnSelectionChanged(pCalFld, pApply)
{
if (!pApply) 
{
if (eval(PDP_GetAtt(pCalFld, "AChgN", false)))
pApply = true;
}
if (pApply)
{
var vOSCFnc = PDP_GetAtt(pCalFld, "OnSelChg", "");
if (vOSCFnc)
eval(vOSCFnc);
var vC2UId = PDP_GetAtt(pCalFld, "C2UID", "");
if (vC2UId != "")
{
var vC2U = PDP_GetById(vC2UId);
if (vC2U)
{
var vFormat = PDP_GetAtt(pCalFld, "DFC2U", "0");
var vPattern = PDP_GetAtt(pCalFld, "DPC2U", "MM/dd/yyyy");
var vYear = parseInt(PDP_GetById(pCalFld.id + "_Year").value);
var vMonth = parseInt(PDP_GetById(pCalFld.id + "_Month").value);
var vDay = parseInt(PDP_GetById(pCalFld.id + "_Day").value);
var vValue = PDP_FmtDate(vYear, vMonth, vDay, vPattern, vFormat);
if ((vC2U.value != null) && (vC2U.nodeName == "INPUT"))
{
if (!vC2U.isMultiLine)
vC2U.value = vValue;
}
else 
{
vC2U.innerHTML = vValue
}
} 
} 
var vCloseMode = PDP_GetAtt(pCalFld, "SelChgC", "no");
switch (vCloseMode)
{
case "yes":
PDP_ClosePopup();
break;
case "noapplycmd":
if (!eval(PDP_GetAtt(pCalFld, "ApMd", false)))
PDP_ClosePopup();
break;
}
} 
} 
function CSC_FocusBorderColor(pCalCId, pColor)
{
var vWRTbl = PDP_GetById(pCalCId + "_WeekRows");
vWRTbl.style.borderColor = pColor;
} 

function CSC_MouseOverEffect(pCalCId, pDCId, pCellsHaveSpacing)
{
var vCal = PDP_GetById(pCalCId);
var vDC = PDP_GetById(pDCId);
var vRole = parseInt(PDP_GetAtt(vDC, "CellRole", "0"));
if (vRole >= 12)
return;
var vSelCId = PDP_GetAtt(vCal, "SelectedCell", "");
var vMOBdC = PDP_GetAtt(vCal, "MOBdrC", "");
if (pCellsHaveSpacing && (vMOBdC != "")) 
vDC.style.borderColor = vMOBdC;
var vMOFC = PDP_GetAtt(vCal, "MOFC", "");
if (vMOFC != "")
vDC.style.color = vMOFC;
} 

function CSC_MouseOutEffect(pDCId)
{
var vDC = PDP_GetById(pDCId);
var vCode = PDP_GetAtt(vDC, "MouseOutCode", ""); eval(vCode);
} 

function CSC_OnKeyDownIE(pCalCId)
{
return CSC_OnKeyDownBody(window.event, pCalCId);
} 

function CSC_OnKeyDownDOM(pE)
{
if ((gPUNPos == -1) || (gPopupCId[gPUNPos] == ""))
return false;
var vCalCId = gPopupCId[gPUNPos];
var vWRT = document.getElementById(vCalCId + "_WeekRows"); if (vWRT != null)
return CSC_OnKeyDownBody(pE, vCalCId);
else
return false;
}
function CSC_OnKeyDownBody(pE, pCalCId)
{
var vKeyCode = PDP_GetKeyCode(pE);
var vShift = PDP_IsShift(pE);
var vCtrl = PDP_IsCtrl(pE);
if (vCtrl || ((vKeyCode >= 33) && (vKeyCode <= 47)) || (vKeyCode == 27))
{
var vCal = PDP_GetById(pCalCId);
if (CSC_ArrowKeyProcessing(vCal, vKeyCode))
PDP_StopEvent(pE);
else if (CSC_CommandKeyProcessing(vCal, vKeyCode, vShift, vCtrl, !vCtrl))
PDP_StopEvent(pE);
return false; }
else if (vKeyCode == 9) 
{
var vCal = PDP_GetById(pCalCId);
var vIsPopup = PDP_GetAtt(vCal, "IsPopup", "");
if (vIsPopup != "")
{
PDP_CloseAllPopups();
PDP_StopEvent(pE);
return false; }
}
else
return true;
} 
function CSC_OnKeyPressIE(pCalCId)
{
return CSC_OnKeyPressBody(window.event, pCalCId);
} 
function CSC_OnKeyPressDOM(pE)
{
if ((gPUNPos == -1) || (gPopupCId[gPUNPos] == ""))
return false;
var vCalCId = gPopupCId[gPUNPos];
var vWRT = document.getElementById(vCalCId + "_WeekRows"); if (vWRT != null)
return CSC_OnKeyPressBody(pE, vCalCId);
else
return false;
}
function CSC_OnKeyPressBody(pE, pCalCId)
{
var vKeyCode = PDP_GetKeyCode(pE);
var vShift = PDP_IsShift(pE);
var vCtrl = PDP_IsCtrl(pE);
if (((vKeyCode < 33) || (vKeyCode > 47)) && (vKeyCode != 27)) 
{
var vCal = PDP_GetById(pCalCId);
var vTemp = CSC_DigitKeyProcessing(vCal, vKeyCode) ||
CSC_CommandKeyProcessing(vCal, vKeyCode, vShift, vCtrl, false);
}
PDP_StopEvent(pE);
return false; } 
function CSC_ArrowKeyProcessing(pCalFld, pKeyCode)
{
switch (pKeyCode)
{
case 38: 
var vUpDownMode = pCalFld.getAttribute("UDMd");
if (vUpDownMode > 0)
CSC_MoveSelection(pCalFld.id, -7, vUpDownMode == 2, true);
break;
case 40: 
var vUpDownMode = pCalFld.getAttribute("UDMd");
if (vUpDownMode > 0)
CSC_MoveSelection(pCalFld.id, 7, vUpDownMode == 2, true);
break;
case 37: 
var vLeftRightMode = pCalFld.getAttribute("LRMd");
if (vLeftRightMode > 0)
CSC_MoveSelection(pCalFld.id, -1, vLeftRightMode == 2, true);
break;
case 39: 
var vLeftRightMode = pCalFld.getAttribute("LRMd");
if (vLeftRightMode > 0)
CSC_MoveSelection(pCalFld.id, 1, vLeftRightMode == 2, true);
break;
default:
return false;
} 
return true;
} 
function CSC_DigitKeyProcessing(pCalFld, pKeyCode)
{
if ((pKeyCode >= 48) && (pKeyCode <= 57))
{
var vKeyCodeStr = String.fromCharCode(pKeyCode);
CSC_TypeToDate(pCalFld, vKeyCodeStr);
return true;
}
else
return false;
} 
function CSC_CommandKeyProcessing(pCalFld, pKeyCode, pShiftKey, pCtrlKey, pIsOnKeyDown)
{
var vResult = true;
var vCKeys = PDP_GetAtt(pCalFld, "CmdKeys", "");
var vCmdId = PDP_GetCmdId(vCKeys, pKeyCode, pCtrlKey, pShiftKey, pIsOnKeyDown);
switch (vCmdId)
{
case "1":
CSC_ViewMonthByCount(pCalFld.id, -1);
break;
case "2":
CSC_ViewMonthByCount(pCalFld.id, 1);
break;
case "3":
CSC_ViewMonthByCount(pCalFld.id, -parseInt(pCalFld.getAttribute("JBy")));
break;
case "4":
CSC_ViewMonthByCount(pCalFld.id, parseInt(pCalFld.getAttribute("JBy")));
break;
case "10":
CSC_ShowToday(pCalFld.id, true);
break;
case "11":
CSC_SetNoSelection(pCalFld.id, false, true);
break;
case "12":
CSC_ShowSelection(pCalFld.id);
break;
case "13":
CSC_Apply(pCalFld.id);
break;
case "14":
CSC_ShowSpecial(pCalFld.id, true);
break;
case "20":
PDP_ClosePopup();
break;
case "21":
PDP_OpenPopup(pCalFld.id + "_Help", pCalFld.id + "_CM", false);
break;
case "22":
CSC_OnPopupMonthYearPicker(pCalFld.id, pCalFld.id + "_MYP_PN");
PDP_OpenPopup(pCalFld.id + "_MYP_TG", pCalFld.id + "_MYP_PN", false);
break;
default:
vResult = false;
break;
} 
return vResult;
} 

var gTypeToDate = "";
var gTypeToDateTimer = 0;
function CSC_TypeToDate(pCalFld, pKeyCodeStr)
{
if (gTypeToDateTimer != 0)
{
window.clearInterval(gTypeToDateTimer);
gTypeToDateTimer = 0;
}
if (gTypeToDate.length == 2)
gTypeToDate = pKeyCodeStr;
else if ((pKeyCodeStr != "0") || (gTypeToDate.length == 1)) 
gTypeToDate = gTypeToDate + pKeyCodeStr;
var vDayOfMonth = parseInt(gTypeToDate);
if (vDayOfMonth > 31) 
vDayOfMonth = parseInt(pKeyCodeStr);
if (vDayOfMonth == 0)
{
gTypeToDate = "";
return;
}
CSC_AssignDate(pCalFld, vDayOfMonth, true);
if (gTypeToDate.length == 1)
gTypeToDateTimer = window.setInterval("gTypeToDate = '';", 1500);
else
gTypeToDateTimer = 0;
} 

function CSC_AssignDate(pCalFld, pDayOfMonth, pFeedback)
{
vWRTbl = PDP_GetById(pCalFld.id + "_WeekRows");
var vWkNm = eval(PDP_GetAtt(pCalFld, "WkNm", false));
var vWkNumSpace = vWkNm ? 1 : 0;
var vWeekRow = null;
for (var vRowCount = 0; vRowCount < 6; vRowCount++)
{
if (vWRTbl.rows && !gIsSafari) 
vWeekRow = vWRTbl.rows[vRowCount]; else 
{
var vRows = PDPUtil_GetChildNodes(vWRTbl, "TBODY", 1); vWeekRow = PDPUtil_GetChildNodes(vRows, "TR", vRowCount + 1); }
for (var vCellCount = 0; vCellCount < 7; vCellCount++)
{
var vDC = null;
if (vWeekRow.cells && !gIsSafari) 
vDC = vWeekRow.cells[vCellCount + vWkNumSpace]; else 
vDC = PDPUtil_GetChildNodes(vWeekRow, "TD", vCellCount + 1 + vWkNumSpace); var vRole = parseInt(PDP_GetAtt(vDC, "CellRole", "0"));
if (vRole < 10)
{
var vDay = PDP_GetAtt(vDC, "Day", 0);
if (vDay == pDayOfMonth)
{
CSC_ChangeDay(pCalFld.id, vDC.id, pFeedback);
return;
}
}
}
}
} 

function CSC_FillInMonthHeader(pCalCId)
{
var vMYFld = PDP_GetById(pCalCId + "_MonthYearLabel");
if (vMYFld)
{
var vCal = PDP_GetById(pCalCId);
var vYearLabel = PDP_GetById(pCalCId + "_YearLabel");
var vAbbrevMonths = eval(PDP_GetAtt(vCal, "AbbrevMonthNames", false));
var vMYText = "";
var vYear = PDP_GetAtt(vCal, "Year", 0);
var vMonth = parseInt(PDP_GetAtt(vCal, "Month", 0));
if (vAbbrevMonths)
vMYText = PDP_AbbrevMonths[vMonth];
else
vMYText = PDP_Months[vMonth];
var vShowYear = PDP_GetAtt(vCal, "ShowYear", "rightofmonth");
switch (vShowYear)
{
case "rightofmonth":
vMYText = vMYText + " " + vYear;
break;
case "leftofmonth":
vMYText = vYear + " " + vMYText;
break;
case "belowmonth":
if (vYearLabel)
{
vYearLabel.innerHTML = vYear;
}
break;
} 
vMYFld.innerHTML = vMYText;
}
} 
function CSC_DrawDateLabel(pCalFld)
{
var vCurDateFld = PDP_GetById(pCalFld.id + "_CurrentDate");
if (vCurDateFld)
{
var vYear = parseInt(PDP_GetById(pCalFld.id + "_Year").value);
var vMonth = parseInt(PDP_GetById(pCalFld.id + "_Month").value);
var vDay = parseInt(PDP_GetById(pCalFld.id + "_Day").value);
var vPattern = pCalFld.getAttribute("CurDPat");
var vFormat = pCalFld.getAttribute("CurDFmt");
var vValue = PDP_FmtDate(vYear, vMonth, vDay, vPattern, vFormat);
vCurDateFld.innerHTML = vValue;
}
} 

function CSC_IsCurrentMonth(pCalFld, pYear, pMonth)
{
var vMonth = parseInt(PDP_GetAtt(pCalFld, "Month", "0"));
if (pMonth != vMonth)
return false;
var vYear = parseInt(PDP_GetAtt(pCalFld, "Year", "0"));
return (pYear == vYear);
} 

function CSC_OnClickMonthChangeCommands(pCalCId, pCommandId, pMonthCount)
{
var vCmdFld = PDP_GetById(pCommandId);
if (vCmdFld.style.visibility != "hidden")
{
CSC_ViewMonthByCount(pCalCId, pMonthCount);
CSC_FocusOnCalendar(pCalCId);
}
} 

function CSC_TransferMonthYearToCalendar(pCalCId, pMYPId)
{
var vCal = PDP_GetById(pCalCId);
var vMonth = MYP_GetMonth(pMYPId);
var vYear = MYP_GetYear(pMYPId);
if ((vMonth > 0) || (vYear > 0))
if (vYear == 0)
CSC_ViewMonth(pCalCId, vMonth - 1)
else if (vMonth == 0)
CSC_ViewYear(pCalCId, vYear)
else
CSC_ViewDate(pCalCId, vYear, vMonth - 1);
} 
function CSC_OnPopupMonthYearPicker(pCalCId, pMYPId)
{
var vCal = PDP_GetById(pCalCId);
var vYear = parseInt(PDP_GetAtt(vCal, "Year", 0));
var vMonth = parseInt(PDP_GetAtt(vCal, "Month", 0));
MYP_SelectMonthYear(pMYPId, vMonth + 1, vYear);
} 

function CSC_DateSelectable(pCalFld, pYear, pMonth, pDay)
{
var vResult = true;
var vSDId = PDP_GetAtt(pCalFld, "SDId", "");
if (vSDId != "")
{
var vSD = SD_FindDate(vSDId, PDP_MakeUTCDate(pYear, pMonth, pDay));
if ((vSD != null) && !vSD.Selectable)
vResult = false;
}
return vResult;
} 

function CSC_GetDate(pCalCId)
{
var vDateValue = PDP_GetById(pCalCId + "_Day").value;
if (vDateValue == "0") 
return null;
else
return new Date(PDP_GetById(pCalCId + "_Year").value,
PDP_GetById(pCalCId + "_Month").value,
vDateValue);
} 

function CSC_GetDateString(pCalCId, pPattern, pFormat)
{
var vYear = parseInt(PDP_GetById(pCalCId + "_Year").value);
var vMonth = parseInt(PDP_GetById(pCalCId + "_Month").value);
var vDay = parseInt(PDP_GetById(pCalCId + "_Day").value);
return PDP_FmtDate(vYear, vMonth, vDay, pPattern, pFormat)
} 

function CSC_GetYear(pCalCId)
{
if (PDP_GetById(pCalCId + "_Day").value == "0")
return -1;
else
return parseInt(PDP_GetById(pCalCId + "_Year").value);
} 

function CSC_GetMonth(pCalCId)
{
if (PDP_GetById(pCalCId + "_Day").value == "0")
return -1;
else
return parseInt(PDP_GetById(pCalCId + "_Month").value);
} 

function CSC_GetDay(pCalCId)
{
var vDayValue = PDP_GetById(pCalCId + "_Day").value;
if (vDayValue == "0")
return -1;
else
return parseInt(PDP_GetById(pCalCId + "_Day").value);
} 

function CSC_SetDate(pCalCId, pYear, pMonth, pDay, pChangeMonth, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
var vValidDate = true;
if (!CSC_DateSelectable(vCal, pYear, pMonth, pDay))
{

vValidDate = false;
PDP_GetById(pCalCId + "_Year").value = "0";
PDP_GetById(pCalCId + "_Month").value = "0";
PDP_GetById(pCalCId + "_Day").value = "0";
}
if (vValidDate)
{
PDP_GetById(pCalCId + "_Year").value = pYear;
PDP_GetById(pCalCId + "_Month").value = pMonth;
PDP_GetById(pCalCId + "_Day").value = pDay;
}
if (vValidDate && eval(PDP_GetAtt(vCal, "MonthLoaded", false)) && (CSC_IsCurrentMonth(vCal, pYear, pMonth))) 
{
CSC_AssignDate(vCal, pDay, pFeedback);
}
else 
{
if (pChangeMonth)
{
PDP_SetAtt(vCal, "Month", pMonth);
PDP_SetAtt(vCal, "Year", pYear);
}
CSC_FillInMonth(pCalCId, true);
}
if (pFeedback)
CSC_OnSelectionChanged(vCal, false);
return true;
} 

function CSC_SetNoSelection(pCalCId, pShowTodayMonth, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
PDP_GetById(pCalCId + "_Year").value = "0";
PDP_GetById(pCalCId + "_Month").value = "0";
PDP_GetById(pCalCId + "_Day").value = "0";
if (pFeedback)
{
CSC_OnSelectionChanged(vCal, false);
if (vCal.style.visibility == "hidden")
return;
}
if (pShowTodayMonth)
{
var vYear = parseInt(PDP_GetAtt(vCal, "Today_Year", 0));
var vMonth = parseInt(PDP_GetAtt(vCal, "Today_Month", 0));
PDP_SetAtt(vCal, "Month", vMonth);
PDP_SetAtt(vCal, "Year", vYear);
}
CSC_FillInMonth(pCalCId, true);
} 

function CSC_ViewDate(pCalCId, pYear, pMonth)
{
var vCal = PDP_GetById(pCalCId);
var vCurMonth = parseInt(PDP_GetAtt(vCal, "Month", 0));
var vCurYear = parseInt(PDP_GetAtt(vCal, "Year"));
if ((vCurYear == pYear) && (vCurMonth == pMonth))
return;
PDP_SetAtt(vCal, "Month", pMonth);
PDP_SetAtt(vCal, "Year", pYear);
CSC_FillInMonth(pCalCId, false);
} 

function CSC_ViewMonth(pCalCId, pMonth)
{
var vCal = PDP_GetById(pCalCId);
var vCurMonth = parseInt(PDP_GetAtt(vCal, "Month", 0));
if (vCurMonth == pMonth)
return;
PDP_SetAtt(vCal, "Month", pMonth);
CSC_FillInMonth(pCalCId, false);
} 

function CSC_ViewYear(pCalCId, pYear)
{
var vCal = PDP_GetById(pCalCId);
var vCurYear = parseInt(PDP_GetAtt(vCal, "Year", 0));
if (vCurYear == pYear)
return;
PDP_SetAtt(vCal, "Year", pYear);
CSC_FillInMonth(pCalCId, false);
} 

function CSC_ViewMonthByCount(pCalCId, pJumpMonths)
{
if (pJumpMonths == 0)
return;
var vCal = PDP_GetById(pCalCId);
var vYear = parseInt(PDP_GetAtt(vCal, "Year", 0));
var vMonth = parseInt(PDP_GetAtt(vCal, "Month", 0));
if (pJumpMonths > 0) 
{
vMonth = vMonth + pJumpMonths;
var vIncYears = Math.round((vMonth / 12) - 0.5);
vYear = vYear + vIncYears;
vMonth = vMonth % 12;
var vMaxDate = PDP_GetUTCInAtt(vCal, "Max");
if (vMaxDate != null)
if ((vYear > vMaxDate.getUTCFullYear()) ||
((vYear == vMaxDate.getUTCFullYear()) && (vMonth > vMaxDate.getUTCMonth())))
{
vYear = vMaxDate.getUTCFullYear();
vMonth = vMaxDate.getUTCMonth();
}
}
else 
{
vMonth = 11 - vMonth;
vMonth = vMonth - pJumpMonths; var vIncYears = Math.round((vMonth / 12) - 0.5);
vYear = vYear - vIncYears;
vMonth = 11 - (vMonth % 12);
var vMinDate = PDP_GetUTCInAtt(vCal, "Min");
if (vMinDate != null)
if ((vYear < vMinDate.getUTCFullYear()) ||
((vYear == vMinDate.getUTCFullYear()) && (vMonth < vMinDate.getUTCMonth())))
{
vYear = vMinDate.getUTCFullYear();
vMonth = vMinDate.getUTCMonth();
}
}
PDP_SetAtt(vCal, "Month", vMonth);
PDP_SetAtt(vCal, "Year", vYear);
CSC_FillInMonth(pCalCId, false);
} 

function CSC_MoveSelection(pCalCId, pNumDays, pChangeViewsAllowed, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
var vSelCId = PDP_GetAtt(vCal, "SelectedCell", "");
if (vSelCId == "")
{
var vRole = 99;
var vNewSelCId = "";
if (pNumDays >= 0)
for (var vPos = 1; (vRole >= 12) && (vPos < 42); vPos++)
{
vNewSelCId = pCalCId + "_" + vPos;
var vRole = parseInt(PDP_GetAtt(PDP_GetById(vNewSelCId), "CellRole", "0"));
}
else
for (var vPos = 42; (vRole >= 12) && (vPos > 0); vPos--)
{
vNewSelCId = pCalCId + "_" + vPos;
var vRole = parseInt(PDP_GetAtt(PDP_GetById(vNewSelCId), "CellRole", "0"));
}
CSC_ChangeDay(pCalCId, vNewSelCId, pFeedback);
return true;
}
var vCNum = 0; var vCellParts = vSelCId.split('_');
vCNum = parseInt(vCellParts[vCellParts.length - 1]);
vCNum = vCNum + pNumDays; var vNewSelCId = pCalCId + "_" + vCNum;
var vChangeMonths = false;
if ((vCNum >= 1) && (vCNum <= 42))
{
var vRole = parseInt(PDP_GetAtt(PDP_GetById(vNewSelCId), "CellRole", "0"));
if ((vRole == 14) || (vRole == 12)) 
return false;
else
vChangeMonths = vRole >= 12; }
else
vChangeMonths = true;
if (!vChangeMonths) 
{
CSC_ChangeDay(pCalCId, vNewSelCId, pFeedback);
}
else if (pChangeViewsAllowed)
{
var vSelDate = PDP_MakeUTCDate(PDP_GetById(pCalCId + "_Year").value,
PDP_GetById(pCalCId + "_Month").value, PDP_GetById(pCalCId + "_Day").value);

vSelUTC = vSelDate.valueOf();
vSelUTC = vSelUTC + (pNumDays * 86400000);
var vMinDate = PDP_GetUTCInAtt(vCal, "Min");
if ((vMinDate != null) && (vSelUTC < vMinDate.valueOf()))
return false;
var vMaxDate = PDP_GetUTCInAtt(vCal, "Max");
if ((vMaxDate != null) && (vMaxDate.valueOf() < vSelUTC))
return false;
vDateOfCell = new Date(vSelUTC); if (!CSC_DateSelectable(vCal, vDateOfCell.getUTCFullYear(), vDateOfCell.getUTCMonth(),
vDateOfCell.getUTCDate()))
return false;
PDP_GetById(pCalCId + "_Month").value = vDateOfCell.getUTCMonth();
PDP_GetById(pCalCId + "_Year").value = vDateOfCell.getUTCFullYear();
PDP_GetById(pCalCId + "_Day").value = vDateOfCell.getUTCDate();
CSC_ViewDate(pCalCId, vDateOfCell.getUTCFullYear(), vDateOfCell.getUTCMonth());
CSC_DrawDateLabel(vCal);
if (pFeedback)
CSC_OnSelectionChanged(vCal, false);
}
return true;
} 

function CSC_ShowSelection(pCalCId)
{
if (PDP_GetById(pCalCId + "_Day").value == "0")
return;
var vCal = PDP_GetById(pCalCId);
if (PDP_GetAtt(vCal, "SelectedCell", "") == "")
{
var vYear = parseInt(PDP_GetById(pCalCId + "_Year").value);
var vMonth = parseInt(PDP_GetById(pCalCId + "_Month").value);
PDP_SetAtt(vCal, "Month", vMonth);
PDP_SetAtt(vCal, "Year", vYear);
CSC_FillInMonth(pCalCId, false)
}
} 

function CSC_ShowToday(pCalCId, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
var vYear = parseInt(PDP_GetAtt(vCal, "Today_Year", 0));
var vMonth = parseInt(PDP_GetAtt(vCal, "Today_Month", 0));
var vDay = parseInt(PDP_GetAtt(vCal, "Today_Day", 0));
CSC_SetDate(pCalCId, vYear, vMonth, vDay, true, pFeedback);
} 

function CSC_ShowSpecial(pCalCId, pFeedback)
{
var vCal = PDP_GetById(pCalCId);
var vYearText = PDP_GetAtt(vCal, "Special_Year", 0);
if ((vYearText != null) && (vYearText != ""))
{
var vYear = parseInt(vYearText);
var vMonth = parseInt(PDP_GetAtt(vCal, "Special_Month", 0));
var vDay = parseInt(PDP_GetAtt(vCal, "Special_Day", 0));
CSC_SetDate(pCalCId, vYear, vMonth, vDay, true, pFeedback);
}
} 

function CSC_FocusOnCalendar(pCalCId)
{
if (!document.all)
return;
var vCal = PDP_GetById(pCalCId);
if (vCal.style.visibility != "hidden")
{
var vWRTbl = PDP_GetById(pCalCId + "_WeekRows")
if (vWRTbl)
vWRTbl.focus();
}
} 
function CSC_Apply(pCalCId)
{
var vCal = PDP_GetById(pCalCId);
CSC_OnSelectionChanged(vCal, true);
if (eval(PDP_GetAtt(vCal, "IsPopup", false)))
PDP_ClosePopup();
}