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

var detect = navigator.userAgent.toLowerCase();
var OS, browser, version, place, thestring;
var gIsOpera = false; var gIsOpera7 = false; var gIsIEWin = false;
var gIsIEWin55 = false;
var gIsIEMac = false;
var gIsIEMac51 = false;
var gIsNetscapeNav = false;
var gIsNetscapeMoz = false; var gIsKonqueror = false;
var gICab = false;
var gIsSafari = false; var gSupportsInnerHTML = (document.body != null) && (document.body.innerHTML != null);
var gSupportsOnKeyPress = true; var gSupportsFocusOnTable = false;
if (checkIt('konqueror'))
{
browser = "Konqueror";
OS = "Linux";
gIsKonqueror = true;
}
else if (checkIt('safari') || checkIt('applewebkit')) {browser = "Safari"; gIsSafari = true; } 
else if (checkIt('omniweb')) browser = "OmniWeb" 
else if (checkIt('opera')) {browser = "Opera"; gIsOpera = true; }
else if (checkIt('webtv')) browser = "WebTV";
else if (checkIt('icab')) { browser = "iCab"; gICab = true; }
else if (checkIt('msie')) {browser = "Internet Explorer"; gIsIEWin = true; }
else if (checkIt('netscape')) {browser = "Netscape Mozilla"; gIsNetscapeMoz = true; }
else if (checkIt('gecko')) {browser = "Gecko"; gIsNetscapeMoz = true; } 
else if (!checkIt('compatible'))
{
browser = "Netscape Navigator"
version = detect.charAt(8);
gIsNetscapeNav = true;
}
else browser = "An unknown browser";
if (!version) version = detect.charAt(place + thestring.length);
if (!OS)
{
if (checkIt('linux')) OS = "Linux";
else if (checkIt('x11')) OS = "Unix";
else if (checkIt('mac')) OS = "Mac"
else if (checkIt('win')) OS = "Windows"
else OS = "an unknown operating system";
}
if (gIsIEWin && (OS == "Mac"))
{
gIsIEWin = false;
gIsIEMac = true;
if (detect.indexOf("msie 5.1") > -1)
gIsIEMac51 = true;
}
else if (gIsIEWin)
{
if ((detect.indexOf("msie 5.5") > -1) || (detect.indexOf("msie 6") > -1))
gIsIEWin55 = true;
}
else if (gIsOpera) 
{
if (parseInt(version) >= 7)
{
gIsOpera7 = true;
gIsOpera = false;
}
}
gSupportsOnKeyPress = !gIsOpera && !gIsKonqueror && !gICab;
gSupportsFocusOnTable = gIsIEWin;
function checkIt(string)
{
place = detect.indexOf(string) + 1;
thestring = string;
return place;
}
var gPDP_FormName = "";
var gPDP_NS4RegEx = new RegExp(":", "g");
function PDP_SetInnerHTML(pFld, pValue)
{
if (gIsIEMac51)
{
pFld.innerHTML = "";
var vNewEl = document.createElement("span");
vNewEl.innerHTML = pValue;
pFld.appendChild(vNewEl);
}
else
pFld.innerHTML = pValue;
} 
function PDPUtil_GetChildNodes(pParent, pNodeName, pIndex)
{
var vFoundCount = 0;
var vChildren = null;
if (pParent.childNodes)
{
vChildren = pParent.childNodes;
}
else if (pParent.children)
{
vChildren = pParent.children;
}
else if (pParent.getElementsByTagName)
{
vChildren = pParent.getElementsByTagName(pNodeName);
}
else
{
return null;
}
var vLength = vChildren.length;
for (var vCount = 0; vCount < vLength; vCount++)
if (vChildren[vCount].nodeName == pNodeName)
{
vFoundCount++;
if (vFoundCount == pIndex)
return vChildren[vCount];
}
return null;
} 
function PDP_GetById(pId)
{
if (document.getElementById)
return document.getElementById(pId);
else if (document.all)
return document.all[pId]
else if (document.layers) 
{
var vElement = "";
eval("vElement=document." + gPDP_FormName + "['" + pId + "']");

return vElement;
}
else
return null; } 

function PDP_ParentNode(pElement)
{
if (pElement.parentElement != null) 
return pElement.parentElement;
else if (pElement.parentNode != null) 
return pElement.parentNode;
else
return null;
}
function PDP_CanEdit(pFId)
{
var vFld = PDP_GetById(pFId);
return !(vFld.disabled || vFld.readOnly);
} 

function PDP_CanEditParent(pFId)
{
var vPos = pFId.lastIndexOf("_");
if (vPos > -1)
{
var vEFldId = pFId.substr(0, vPos);
var vEFld = PDP_GetById(vEFldId);
if ((vEFld != null) &&
(((vEFld.readonly != null) && (vEFld.readonly)) ||
((vEFld.disabled != null) && (vEFld.disabled))))
return false;
}
return true;
} 

function PDP_SetBkColor(pElement, pColor)
{
if (gIsOpera)
{
if (pColor == "")
pColor = "white";
pElement.style.background = pColor;
}
else
pElement.style.backgroundColor = pColor;
} 

function PDP_GetKeyCode(pE)
{
var vKeyCode = null;
if (pE.keyCode)
vKeyCode = pE.keyCode;
else if (pE.which)
vKeyCode = pE.which;
return vKeyCode; } 

function PDP_IsShift(pE)
{
var vShiftKey = false;
if (pE.shiftKey != null)
vShiftKey = pE.shiftKey
else if (pE.modifiers != null)
vShiftKey = (pE.modifiers | 4) != 0;
return vShiftKey;
} 

function PDP_IsCtrl(pE)
{
var vCtrlKey = false;
if (pE.ctrlKey != null)
vCtrlKey = pE.ctrlKey
else if (pE.modifiers != null)
vCtrlKey = (pE.modifiers | 2) != 0;
return vCtrlKey;
} 
function PDP_StopEvent(pE)
{
if (pE.cancelBubble != null)
pE.cancelBubble = true;
if (pE.stopPropagation)
pE.stopPropagation();
if (pE.preventDefault)
pE.preventDefault();
} 

function PDP_Trunc(pDecimal)
{
var vStr = pDecimal.toString();
var vPos = vStr.indexOf(".");
if (vPos == -1)
return parseInt(vStr)
else
return parseInt(vStr.substr(0, vPos));
} 

function PDP_FmtDate(pYear, pMonth, pDay, pPattern, pFormat)
{
if (pDay == 0) 
return "";
var vResult = "";
vResult = pPattern.replace("yyyy", pYear.toString());
if (vResult.indexOf("yy") != -1)
{
var vShortYear = pYear % 100;
if (vShortYear > 9)
vResult = vResult.replace("yy", vShortYear.toString());
else
vResult = vResult.replace("yy", "0" + vShortYear.toString());
}
if (vResult.indexOf("dd") != -1)
{
if (pDay > 9)
vResult = vResult.replace("dd", pDay.toString());
else
vResult = vResult.replace("dd", "0" + pDay.toString());
}
else
vResult = vResult.replace("d", pDay.toString());
if (pFormat == 0) 
{
var vAdjMonth = pMonth + 1;
if (vResult.indexOf("MM") != -1) 
{
if (vAdjMonth > 9)
vResult = vResult.replace("MM", vAdjMonth.toString());
else
vResult = vResult.replace("MM", "0" + vAdjMonth.toString());
}
else
vResult = vResult.replace("M", vAdjMonth.toString());
}
else if (pFormat == 1) 
{
var vDate = new Date(pYear, pMonth, pDay);
var vDayOfWeek = vDate.getDay();
vResult = vResult.replace("MMMM", PDP_AbbrevMonths[pMonth]);
vResult = vResult.replace("ww", PDP_AbbrevDaysOfWeek[vDayOfWeek]);
}
else 
{
var vDate = new Date(pYear, pMonth, pDay);
var vDayOfWeek = vDate.getDay();
vResult = vResult.replace("MMMM", PDP_Months[pMonth]);
vResult = vResult.replace("ww", PDP_DaysOfWeek[vDayOfWeek]);
}
return vResult;
} 

function PDP_GetCmdId(pCmdKeys, pKeyCode, pCtrlKey, pShiftKey, pIsOnKeyDown)
{
var vCommandId = "0";
var vModifiers = pCtrlKey ? "C" : "";
var vMod2 = pShiftKey ? "S" : "";
vModifiers = vModifiers + vMod2;
var vFirstToken = "{#" + pKeyCode + vModifiers;
var vPos = pCmdKeys.indexOf(vFirstToken);
if (vPos > -1)
{
var vEndPos = pCmdKeys.indexOf("}", vPos + vFirstToken.length + 1);
if (vEndPos > -1)
vCommandId = pCmdKeys.substring(vPos + vFirstToken.length + 1, vEndPos);
}
else if (!pIsOnKeyDown)
{
var vKeyCodeStr = String.fromCharCode(pKeyCode);
vKeyCodeStr = vKeyCodeStr.toUpperCase();
vFirstToken = "{" + vKeyCodeStr + vModifiers;
vPos = pCmdKeys.indexOf(vFirstToken);
if (vPos > -1)
{
var vEndPos = pCmdKeys.indexOf("}", vPos + vFirstToken.length + 1);
if (vEndPos > -1)
vCommandId = pCmdKeys.substring(vPos + vFirstToken.length + 1, vEndPos);
}
}
return vCommandId;
} 

function ButtonEffect(pFldWStyle, pNewStyle, pFieldID_WithImage, pImageUrl)
{
if (!PDP_CanEditParent(pFldWStyle.id)) return; if (pFldWStyle && pFldWStyle.className)
pFldWStyle.className = pNewStyle;
if ((pImageUrl != "") && (pFieldID_WithImage != ""))
{
vFieldWithImage = PDP_GetById(pFieldID_WithImage);
if (vFieldWithImage && vFieldWithImage.src)
vFieldWithImage.src = pImageUrl;
}
} 

var gPopupCId = new Array("", "", "", "", "");
var gToggleCId = new Array("", "", "", "", "");
var gPUNPos = -1;
function PDP_TogglePopup(pTglCId, pPUCId, pOnPopup)
{
var vPUC = PDP_GetById(pPUCId);
if (vPUC.style.visibility == "inherit")
{
PDP_ClosePopup();
}
else
{
PDP_OpenPopup(pTglCId, pPUCId, true, pOnPopup);
}
} 

var gPDP_InOP = false; function PDP_OpenPopup(pTglCId, pPUCId, pClick, pOnPopup)
{
var vTglC = null;
if (pTglCId != "")
vTglC = PDP_GetById(pTglCId);
if (vTglC != null)
if (vTglC.disabled)
return;
if (pClick && window.event) 
PDP_TestCaptureNS6(window.event);
if (gPUNPos >= gPopupCId.length)
return;
if (gPDP_InOP)
return;
gPDP_InOP = true;
var vPUC = PDP_GetById(pPUCId);
var vOnPopupFunction = "";
if (pOnPopup != null)
vOnPopupFunction = pOnPopup;
else
vOnPopupFunction = vPUC.getAttribute("onpopup");
if ((vOnPopupFunction != null) && (vOnPopupFunction != ""))
{
var vResult = true;
eval(vOnPopupFunction); if (vResult == false)
{
gPDP_InOP = false;
return;
}
}
gPUNPos++;
gPopupCId[gPUNPos] = pPUCId;
gToggleCId[gPUNPos] = pTglCId;
if (vTglC != null)
PDP_PositionPopupToToggle(vTglC, vPUC);

PDP_MSIEFixPopupOpen(vPUC);
vPUC.style.visibility = "inherit";
if (vPUC.focus)
setTimeout("javascript:var vPUC = PDP_GetById('" + pPUCId + "'); if (vPUC.style.visibility = 'inherit') vPUC.focus();", 50); 
if (document.attachEvent)
{
if (gPUNPos == 0)
document.attachEvent("onmousedown", PDP_TestCaptureIE5);
}
else if (document.addEventListener) 
{
if (gPUNPos == 0)
document.addEventListener("mousedown", PDP_TestCaptureNS6, false);
}
else 
document.onmousedown = PDP_TestCaptureIE5;
gPDP_InOP = false;
} 
function PDP_OpenPopupAtMousePoint(pPUCId, pE)
{
if ((document.body.scrollTop == null) && (window.pageXOffset))
return; PDP_TestCaptureNS6(pE); if (gPUNPos >= gPopupCId.length)
return;
var vPUC = PDP_GetById(pPUCId);
vPUC.style.position = "absolute";
var vClientX = PDP_GetScrolledX(vPUC, pE.clientX, true);
var vClientY = PDP_GetScrolledY(vPUC, pE.clientY, true);
if (true)
{
vClientX = PDP_GetOffsetX(vPUC, vClientX, -1);
vClientY = PDP_GetOffsetY(vPUC, vClientY, -1);

}
if (gIsIEMac) 
{
vClientX = vClientX + 10;
vClientY = vClientY + 15;
}
if (gIsSafari)
{
vClientX = vClientX + document.body.offsetLeft;
vClientY = vClientY + document.body.offsetTop;
}
PDP_SetLeftPos(vPUC, vClientX);
PDP_SetTopPos(vPUC, vClientY);
vPUC.style.zIndex = 30000 + gPUNPos + 1;
if ((gPUNPos == -1) || (gPopupCId[gPUNPos] != pPUCId)) 
PDP_OpenPopup("", pPUCId, true);
} 

function PDP_GetScrolledX(pPUC, pX, pLimit)
{
if (document.body.scrollLeft != null) 
{
if (pLimit)
{
if (pX + pPUC.offsetWidth > document.body.offsetWidth)
pX = pX - pPUC.offsetWidth;
if (pX < 0)
pX = 0;
}
for (var vPar = PDP_ParentNode(pPUC);
(vPar != document.body) && (vPar != null);
vPar = PDP_ParentNode(vPar))
{
if (vPar.scrollLeft != null) 
pX = pX + vPar.scrollLeft;
} 

var vDE = document.documentElement; if (vDE && vDE.scrollLeft)
pX = pX + vDE.scrollLeft;
else
pX = pX + document.body.scrollLeft;

}
else if (window.pageXOffset != null) 
{
pX = pX + window.pageXOffset;
}
return pX;
} 

function PDP_GetScrolledY(pPUC, pY, pLimit)
{
if (document.body.scrollTop != null)
{
if (pLimit)
{
if (pY + pPUC.offsetHeight > document.body.offsetHeight)
pY = pY - pPUC.offsetHeight;
if (pY < 0)
pY = 0;
}
for (var vPar = PDP_ParentNode(pPUC);
(vPar != document.body) && (vPar != null);
vPar = PDP_ParentNode(vPar))
{
if (vPar.scrollTop != null) 
pY = pY + vPar.scrollTop;
} 

var vDE = document.documentElement; if (vDE && vDE.scrollTop)
pY = pY + vDE.scrollTop;
else
pY = pY + document.body.scrollTop;

}
else if (window.pageXOffset != null)
{
pY = pY + window.pageYOffset;
}
return pY;
} 
function PDP_GetOffsetX(pControl, pInitialPos, pDirection)
{
var vLeftPos = pInitialPos;
if (pControl.offsetParent)
for (var vPar = pControl.offsetParent;
(vPar != null);
vPar = vPar.offsetParent)
{
vLeftPos = vLeftPos + pDirection * vPar.offsetLeft;
if (gIsSafari && (vPar.style.position == "absolute"))
break;
} 
else
for (var vPar = pControl.parentNode;
(vPar != document.body) && (vPar != null);
vPar = vPar.parentNode)
{
if (vPar.style.position == "absolute")
{
vLeftPos = vLeftPos + pDirection * vPar.offsetLeft;
break;
}
} 
return vLeftPos;
} 
function PDP_GetOffsetY(pControl, pInitialPos, pDirection, pGetAbsPos)
{
var vTopPos = pInitialPos;
if (pControl.offsetParent)
for (var vPar = pControl.offsetParent;
(vPar != null);
vPar = vPar.offsetParent)
{
vTopPos = vTopPos + pDirection * vPar.offsetTop;
if (gIsSafari && (vPar.style.position == "absolute"))
break;
} 
else
for (var vPar = pControl.parentNode;
(vPar != document.body) && (vPar != null);
vPar = vPar.parentNode)
{
if (vPar.style.position == "absolute")
{
vTopPos = vTopPos + pDirection * vPar.offsetTop;
break;
}
} 
return vTopPos;
} 

function PDP_AbsParent(pPUC)
{
if (pPUC.offsetParent)
for (var vPar = pPUC.offsetParent;
(vPar != document.body) && (vPar != null);
vPar = vPar.offsetParent)
{
if (vPar.style.position == "absolute")
{
return true;
}
} 
else
for (var vPar = pPUC.parentNode;
(vPar != document.body) && (vPar != null);
vPar = vPar.parentNode)
{
if (vPar.style.position == "absolute")
{
return true;
}
} 
return false;
} 

function PDP_ClosePopup()
{
if (gPUNPos == -1)
return;
if (gPDP_InOP)
return;
gPDP_InOP = true;
var vPUC = PDP_GetById(gPopupCId[gPUNPos]);
var vOnPopdownFunction = vPUC.getAttribute("onpopdown");
if ((vOnPopdownFunction != null) && (vOnPopdownFunction != ""))
eval(vOnPopdownFunction);
vPUC.style.visibility = "hidden";
if (document.detachEvent)
{
if (gPUNPos == 0)
document.detachEvent("onmousedown", PDP_TestCaptureIE5);
}
else if (document.removeEventListener) 
{
if (gPUNPos == 0)
document.removeEventListener("mousedown", PDP_TestCaptureNS6, false);
}
PDP_MSIEFixPopupClose(vPUC);
gPopupCId[gPUNPos] = "";
gToggleCId[gPUNPos] = "";
gPUNPos--;
if (gPUNPos > -1)
{
var vLwrPC = PDP_GetById(gPopupCId[gPUNPos]);
if ((vLwrPC.style.visibility != "hidden") && (vLwrPC.focus != null))
vLwrPC.focus();
}
gPDP_InOP = false;
} 

function PDP_CloseAllPopups()
{
while (gPUNPos > -1)
PDP_ClosePopup();
} 
function PDP_PositionPopupToToggle(pTglC, pPUC)
{
var vHorizPos = "leftsidesalign";
var vVertPos = "popupbelow";
var vHorzOffset = 0;
var vVertOffset = 0;
var vTest = pTglC.getAttribute("HPos");
if ((vTest != null) && (vTest != ""))
{
vHorizPos = vTest;
vVertPos = pTglC.getAttribute("VPos");
vHorzOffset = parseInt(pTglC.getAttribute("HPosOf"));
vVertOffset = parseInt(pTglC.getAttribute("VPosOf"));
}
var vLeftPos = pTglC.offsetLeft;
var vTopPos = pTglC.offsetTop;
vLeftPos = PDP_GetOffsetX(pTglC, pTglC.offsetLeft, 1);
vTopPos = PDP_GetOffsetY(pTglC, pTglC.offsetTop, 1);

if (gIsIEMac ) 
{
vLeftPos = vLeftPos + 10;
vTopPos = vTopPos + 15;
}
if (gIsSafari)
{
vLeftPos = vLeftPos + document.body.offsetLeft;
vTopPos = vTopPos + document.body.offsetTop;
}

var vToggleWidth = pTglC.offsetWidth;
var vPopupWidth = pPUC.offsetWidth;
if (pPUC.clientWidth && (pPUC.clientWidth < pPUC.offsetWidth)) 
{
vHorzOffset += (pPUC.offsetWidth - pPUC.clientWidth) / 2;
}
switch (vHorizPos)
{
case "leftsidesalign":
vLeftPos = vLeftPos;
break;
case "center":
vLeftPos = vLeftPos + (vToggleWidth - vPopupWidth) / 2;
break;
case "rightsidesalign":
vLeftPos = vLeftPos + vToggleWidth - vPopupWidth;
break;
case "popuptoright":
vLeftPos = vLeftPos + vToggleWidth;
break;
} 
vLeftPos = vLeftPos + vHorzOffset;
var vToggleHeight = pTglC.offsetHeight;
var vPopupHeight = pPUC.offsetHeight;
if (pPUC.clientHeight && (pPUC.clientHeight < pPUC.offsetHeight)) 
{
vVertOffset += (pPUC.offsetHeight - pPUC.clientHeight) / 2;
}
switch (vVertPos)
{
case "popupbelow":
vTopPos = vTopPos + vToggleHeight;
break;
case "center":
vTopPos = vTopPos + (vToggleHeight - vPopupHeight) / 2;
break;
case "popupabove":
vTopPos = vTopPos - vPopupHeight;
break;
case "topsidesalign":
vTopPos = vTopPos;
break;
} 
vTopPos = vTopPos + vVertOffset;
vLeftPos = PDP_GetOffsetX(pPUC, vLeftPos, -1);
vTopPos = PDP_GetOffsetY(pPUC, vTopPos, -1);
if (!gIsOpera7) 
{
vLeftPos = vLeftPos + PDP_GetScrolledX(pPUC, 0, false) - PDP_GetScrolledX(pTglC, 0, false);
vTopPos = vTopPos + PDP_GetScrolledY(pPUC, 0, false) - PDP_GetScrolledY(pTglC, 0, false);
}

if ((document.all != null) && (document.body.offsetWidth != null))
{
if (vLeftPos + pPUC.offsetWidth > document.body.scrollLeft + document.body.offsetWidth)
vLeftPos= vLeftPos - ((vLeftPos + pPUC.offsetWidth) - (document.body.scrollLeft + document.body.offsetWidth));
if (vTopPos + pPUC.offsetHeight > document.body.scrollTop + document.body.offsetHeight)
vTopPos = vTopPos - ((vTopPos + pPUC.offsetHeight) - (document.body.scrollTop + document.body.offsetHeight));

}
if ((window.__smartNav == null) || (!PDP_AbsParent(pPUC)))
{
if (vLeftPos < 0)
vLeftPos = 0;
if (vTopPos < 0)
vTopPos = 0;
}
pPUC.style.position = "absolute";
PDP_SetLeftPos(pPUC, vLeftPos);
PDP_SetTopPos(pPUC, vTopPos);
pPUC.style.zIndex = 30000 + gPUNPos;
if (gIsIEMac)
{
if (pPUC.style.pixelWidth == "")
pPUC.style.pixelWidth = pPUC.offsetWidth;
if (pPUC.style.pixelHeight == "")
pPUC.style.pixelHeight = pPUC.offsetHeight;
}
} 

function PDP_TestCaptureIE5()
{
PDP_TestCaptureNS6(window.event);
} 

function PDP_TestCaptureNS6(e)
{
if (gPUNPos == -1)
return;
if (gPDP_InOP)
return;
var vEndCaptureB = false;
var vPUC = PDP_GetById(gPopupCId[gPUNPos]);
var vX = gIsSafari ? e.clientX : PDP_GetScrolledX(vPUC, e.clientX, false); var vY = gIsSafari ? e.clientY : PDP_GetScrolledY(vPUC, e.clientY, false); if (gIsIEMac) 
{
vX = vX - 10;
vY = vY - 15;
}
if (gIsSafari)
{
vX = vX + document.body.offsetLeft;
vY = vY + document.body.offsetTop;
}

var vLeftPos = vPUC.offsetLeft;
var vTopPos = vPUC.offsetTop;
vLeftPos = PDP_GetOffsetX(vPUC, vPUC.offsetLeft, 1);
vTopPos = PDP_GetOffsetY(vPUC, vPUC.offsetTop, 1);

if (vX < vLeftPos)
{
vEndCaptureB = true;
}
else if (vX > vLeftPos + vPUC.offsetWidth)
{
vEndCaptureB = true;
}
else if (vY < vTopPos)
{
vEndCaptureB = true;
}
else if (vY > vTopPos + vPUC.offsetHeight)
{
vEndCaptureB = true;
}
if (vEndCaptureB && (gToggleCId[gPUNPos] != "")) 
{
var vTglC = PDP_GetById(gToggleCId[gPUNPos]);
if ( (vX >= vTglC.offsetLeft) &&
(vX <= vTglC.offsetLeft + vTglC.offsetWidth) &&
(vY >= vTglC.offsetTop) &&
(vY <= vTglC.offsetTop + vTglC.offsetHeight) )
vEndCaptureB = false;
}
if (vEndCaptureB)
{
PDP_ClosePopup();
if (gPUNPos > -1)
PDP_TestCaptureNS6(e);
}
} 

function PDP_MSIEFixPopupOpen(pFld)
{
if (gIsIEWin55)
{
var vIFrNm = "PDP_ZIndexFix_"+pFld.id; if (!document.all[vIFrNm])
{
var vIFrame = "<iframe src='javascript:false;' id='" + vIFrNm +
"' scrolling='no' frameborder='0'  " +
"style='position:absolute;top:0x;left:0px;" + 
"display:none'></iframe>";
var vElement = pFld.parentElement;
vElement.insertAdjacentHTML('beforeEnd',vIFrame);
}
if (document.all[vIFrNm])
{
var vStyle = document.all[vIFrNm].style;
vStyle.pixelTop = pFld.style.pixelTop;
vStyle.pixelLeft = pFld.style.pixelLeft;
vStyle.pixelWidth = pFld.offsetWidth + 6; vStyle.pixelHeight = pFld.offsetHeight + 6;
var vZIndex = 29990 - gPUNPos; vStyle.zIndex = vZIndex; vStyle.filter='progid:DXImageTransform.Microsoft.Alpha(style=0,opacity=0)';
vStyle.display='block';
}
}
} 

function PDP_MSIEFixPopupClose(pFld)
{
if (gIsIEWin55)
{
var vIFrNm = "PDP_ZIndexFix_"+pFld.id; if (document.all[vIFrNm])
{
document.all[vIFrNm].style.display='none';
}
}
} 

function PDP_SetLeftPos(pFld, pLeftPos)
{
if (pFld.style.pixelLeft)
pFld.style.pixelLeft = pLeftPos;
else if (pFld.style.posLeft)
pFld.style.posLeft = pLeftPos.toString() + "px";
else
pFld.style.left = pLeftPos.toString() + "px";
}
function PDP_SetTopPos(pFld, pTopPos)
{
if (pFld.style.pixelTop)
pFld.style.pixelTop = pTopPos;
else if (pFld.style.posTop)
pFld.style.posTop = pTopPos.toString() + "px";
else
pFld.style.top = pTopPos.toString() + "px";
}
function PDP_HideFocus(pControlID, pValue)
{
var vField = PDP_GetById(pControlID);
if (vField.hideFocus != null)
vField.hideFocus = pValue;
} 

function PDP_GetAtt(pElement, pAttributeName, pDefaultValue)
{
if (gIsSafari)
pAttributeName = pAttributeName.replace("_", "");
if (pElement.getAttribute)
{
var vResult = pElement.getAttribute(pAttributeName, 0);
if (vResult == null)
vResult = pDefaultValue;
else if ((vResult == "") && (!document.all)) 
vResult = pDefaultValue;
return vResult;
}
else 
{
var vId = pElement.name.replace(gPDP_NS4RegEx, "_");
var vVarName = vId + "_" + pAttributeName;

var vResult = eval(vVarName);
if ((vResult == null) || (vResult == ""))
vResult = pDefaultValue;
return vResult;
}
} 

function PDP_SetAtt(pElement, pAttributeName, pAttributeValue)
{
if (pElement.setAttribute) 
pElement.setAttribute(pAttributeName, pAttributeValue, 0);
else 
{
var vVarName = pElement.name + "_" + pAttributeName;
eval("vVarName = pAttributeValue.toString();");
}
} 
var gPDP_ProcessingError = false;
function PDP_ShowError(pFldId, pErrorCode, pShowAlert)
{
if (!gPDP_ProcessingError)
{
var vCode = "javascript:PDP_ShowErrorBody('" + pFldId + "', " + pErrorCode + "," + pShowAlert + ")";
setTimeout(vCode, 10);
}
} 
function PDP_ShowErrorBody(pFldId, pErrorCode, pShowAlert)
{
if (gPDP_ProcessingError)
return;
gPDP_ProcessingError = true;
var vFld = PDP_GetById(pFldId);
if (vFld.style)
{
var vForeColor = PDP_GetAtt(vFld, "ErrFC", '');
var vBackColor = PDP_GetAtt(vFld, "ErrBC", '');
if (vForeColor != '')
vFld.style.color = vForeColor;
if (vBackColor != '')
PDP_SetBkColor(vFld, vBackColor);
}
else
pShowAlert = true; if (!gSupportsOnKeyPress) 
pShowAlert = true;
if (vFld.focus && vFld.select)
{
var vFocusOnErrorB = eval(PDP_GetAtt(vFld, "FOErr", false));
if (vFocusOnErrorB == true)
{
vFld.focus();
vFld.select();
}
}
if (pShowAlert)
{
var vErrorMsg = "";
switch (pErrorCode)
{
case 1:
vErrorMsg = PDP_GetAtt(vFld, "InvalidMsg", false);
break;
case 2:
vErrorMsg = PDP_GetAtt(vFld, "OutOfRangeMsg", false);
break;
} 
if (vErrorMsg != '')
alert(vErrorMsg);
}
gPDP_ProcessingError = false;
} 
function PDP_ClearError(pFldId)
{
var vTBFld = PDP_GetById(pFldId);
if (vTBFld.style)
{
vTBFld.style.color = PDP_GetAtt(vTBFld, "OrigFC", "");
PDP_SetBkColor(vTBFld, PDP_GetAtt(vTBFld, "OrigBC", ""));
}
} 

function PDP_ParseInt(pValue)
{
if ((pValue == '0') || (pValue == '00'))
return 0;
else
return parseInt(pValue.replace(/^0*/, ''));
} 

function PDP_MakeUTCDate(pYear, pMonth, pDay)
{
var vDate = new Date(0);
vDate.setUTCFullYear(pYear, pMonth, pDay);
vDate.setUTCHours(0, 0, 0, 0);


return vDate;
} 

function PDP_AddMonths(pDate, pNumMonths)
{
var vMonth = pDate.getMonth();
var vYear = pDate.getFullYear();
var vDay = pDate.getDate();
if (pNumMonths > 0)
{
vMonth = vMonth + pNumMonths;
var vIncYears = Math.round((vMonth / 12) - 0.5);
vYear = vYear + vIncYears;
vMonth = vMonth % 12;
}
else
{
vMonth = 11 - vMonth;
vMonth = vMonth - pNumMonths; var vIncYears = Math.round((vMonth / 12) - 0.5);
vYear = vYear - vIncYears;
vMonth = 11 - (vMonth % 12); }
do
{
vNewDate = new Date(vYear, vMonth, vDay);
vDay--;
}
while (vNewDate.getMonth() != vMonth)
return vNewDate;
} 

function PDP_GetUTCInAtt(pOwnerField, pHeading)
{
if (!gIsSafari)
pHeading = pHeading + "_";
var vYear = pOwnerField.getAttribute(pHeading + "Year");
if ((vYear != null) && (vYear != ""))
{
var vMonth = pOwnerField.getAttribute(pHeading + "Month");
var vDay = pOwnerField.getAttribute(pHeading + "Day");
return PDP_MakeUTCDate(vYear, vMonth, vDay);
}
else
return null;
} 

function PDP_GetWeekNum(pDate, pRule, pFDOW)
{
var vDate1 = PDP_GetFirstWeekNumDate(pDate.getUTCFullYear(), pRule, pFDOW);
var vWkNum = Math.round(1 + ((pDate - vDate1) / (86400000 * 7)));
if (vWkNum > 52) 
{
var vDate2 = PDP_GetFirstWeekNumDate(pDate.getUTCFullYear() + 1, pRule, pFDOW);
if (vDate2 <= pDate)
vWkNum = 1;
}
return vWkNum;
} 

function PDP_GetFirstWeekNumDate(pYear, pRule, pFDOW)
{
var vDate = PDP_MakeUTCDate(pYear, 0, 1);
var vDOW = vDate.getUTCDay();
switch (pRule)
{
case 0: 
if (vDOW == pFDOW)
return vDate;
else 
{
var vUTC = vDate.valueOf();
if (pFDOW > vDOW)
vUTC = vUTC - ((vDOW - pFDOW + 7) * 86400000); else
vUTC = vUTC - ((vDOW - pFDOW) * 86400000);
return new Date(vUTC); }
break;
case 1: 
if (vDOW == pFDOW)
return vDate;
else 
return PDP_MakeUTCDate(pYear, 0, 1 + (pFDOW + 7 - vDOW));
break;
default:
if (pFDOW > 3)
pFDOW = pFDOW + 4;
if (vDOW <= pFDOW + 3)
return PDP_GetFirstWeekNumDate(pYear, 0, pFDOW);
else 
return PDP_MakeUTCDate(pYear, 0, 1 + (pFDOW + 7 - vDOW));
break;
} 
} 

function PDP_RelocatePopup(pPF)
{
var vPN = pPF.parentNode;
if ((vPN != null) && (vPN != document.body) && (vPN.tagName != "FORM") && (window.__smartNav == null))

{
if ((document.body.removeChild != null) &&
((document.body.appendChild != null) || (document.body.outerHTML != null)))
{
var vMoving = vPN.removeChild(pPF); if (!gIsOpera7 && (vMoving.outerHTML != null)) 
{
document.write(vMoving.outerHTML);
}
else
document.body.appendChild(vMoving);
}
}
}