\n";
var ppcCD=ppcTT;
var ppcFT="";
var ppcFC=true;
var ppcTI=false;
var ppcSV=null;
var ppcRL=null;
var ppcXC=null;
var ppcYC=null;
var ppcML=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var ppcNow=new Date();var ppcPtr=new Date();
var ppcWE = ppcWN
var x;
var hollidayArr = new Array();
var blockHollidays = true;
if (ppcNN) {
window.captureEvents(Event.RESIZE);
window.onresize = restoreLayers;
document.captureEvents(Event.MOUSEDOWN|Event.MOUSEUP);
document.onmousedown = recordXY;
document.onmouseup = confirmXY;}
function restoreLayers(e) {
if (ppcNN) {
with (window.document) {
open("text/html");
write("
Restoring the layer structure...");
write("");
write("");
close();}}}
function recordXY(e) {
if (ppcNN) {
ppcXC = e.x;
ppcYC = e.y;
document.routeEvent(e);}}
function confirmXY(e) {
if (ppcNN) {
ppcXC = (ppcXC == e.x) ? e.x : null;
ppcYC = (ppcYC == e.y) ? e.y : null;
document.routeEvent(e);}}
function getCalendarFor(target,bck) {
// "bck" NUMERO DE AÑOS ATRAS
if ( target.toString ( ) != "[object]")
target = document.getElementById ( target );
ppcSV = target;
ppcRL = null;
ppcYB = ( bck ) ? Math.abs ( bck ) : 0;
if ( ppcFC ) {
setCalendar ( );
//ppcFC = false; // NELSON LO BORRE PA'QUE SIEMPRE LO HAGA
}
if ((ppcSV != null)&&(ppcSV)) {
if (ppcIE) {
var obj = document.all['PopUpCalendar'];
obj.style.left = document.body.scrollLeft+event.clientX;
obj.style.top = document.body.scrollTop+event.clientY;
obj.style.visibility = "visible";}
else if (ppcNN) {
var obj = document.layers['PopUpCalendar'];
obj.left = ppcXC
obj.top = ppcYC
obj.visibility = "show";}
else {showError(ppcER[0]);}}
else {showError(ppcER[1]);}}
function switchMonth(param) {
var tmp = param.split("|");
setCalendar(tmp[0],tmp[1]);}
function moveMonth(dir) {
var obj = null;
var limit = false;
var tmp,dptrYear,dptrMonth;
if (ppcIE) {obj = document.ppcMonthList.sItem;}
else if (ppcNN) {obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItem;}
else {showError(ppcER[0]);}
if (obj != null) {
if ((dir.toLowerCase() == "back")&&(obj.selectedIndex > 0)) {obj.selectedIndex--;}
else if ((dir.toLowerCase() == "forward")&&(obj.selectedIndex < obj.length - 1 )) {obj.selectedIndex++;}
else {limit = true;}}
if (!limit) {
tmp = obj.options[obj.selectedIndex].value.split("|");
dptrYear = tmp[0];
dptrMonth = tmp[1];
setCalendar(dptrYear,dptrMonth);}
else {
if (ppcIE) {
obj.style.backgroundColor = "#5F7BE0";
window.setTimeout("document.ppcMonthList.sItem.style.backgroundColor = '#FFFFFF'",50);}}}
function selectDate(param) {
var arr = param.split("|");
var year = arr[0];
var month = arr[1];
var date = arr[2];
var ptr = parseInt(date);
ppcPtr.setDate(ptr);
if ((ppcSV != null)&&(ppcSV)) {
if (validDate(date)) {ppcSV.value = dateFormat(year,month,date);hideCalendar();}
else {showError(ppcER[2]);if (ppcTI) {clearTimeout(ppcTI);ppcTI = false;}}}
else {
showError(ppcER[1]);
hideCalendar();}}
function setCalendar(year,month) {
if (year == null) {year = getFullYear(ppcNow);}
if (month == null) {month = ppcNow.getMonth();setSelectList(year - ppcYB,month);}
if (month == 1) {ppcML[1] = (isLeap(year)) ? 29 : 28;}
ppcPtr.setYear(year);
ppcPtr.setMonth(month);
ppcPtr.setDate(1);
updateContent ( );}
function updateContent() {
generateContent();
if (ppcIE) {document.all['monthDays'].innerHTML = ppcCD;}
else if (ppcNN) {
with (document.layers['PopUpCalendar'].document.layers['monthDays'].document) {
open("text/html");
write("\n\nDynDoc\n\n\n");
write(ppcCD);
write("\n");
close();}}
else {showError(ppcER[0]);}
ppcCD = ppcTT;}
function generateContent() {
var year = getFullYear(ppcPtr);
var month = ppcPtr.getMonth();
var date = 1;
var day = ppcPtr.getDay();
if (day == 0) {day = 6}
else (day = day-1);
var len = ppcML[month];
var bgr,cnt,tmp = "";
var j,i = 0;
for (j = 0; j < 7; ++j) {
if (date > len) {break;}
for (i = 0; i < 7; ++i) {
bgr = (holliday(date,month,year)) ? varcolor : "tabla out";
if (((j == 0)&&(i < day))||(date > len)) {tmp += makeCell(bgr,year,month,0);}
else {tmp += makeCell(bgr,year,month,date);++date;}}
ppcCD += "\n" + tmp + "
\n";tmp = "";}
ppcCD += "
\n";}
function makeCell(bgr,year,month,date) {
/**
* NELSON: Moldifique esta funcion para aplicar los estilos ....
* El parametro bgr que era el color en el evento over ( #FFFFFF ), ahora es el estilo a usar
* Meti los estilos tabla, out y over
**/
var param = "\'"+year+"|"+month+"|"+date+"\'";
var td1 = "