var ppcDF = "m/d/Y";
var ppcMNlong = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
var ppcMNshort = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
var ppcWN = new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
var ppcER = new Array(4);
var DivRef; var IfrRef;
ppcER[0] = "Required DHTML functions are not supported in this browser.";
ppcER[1] = "Target form field is not assigned or not accessible.";
ppcER[2] = "Sorry, the chosen date is not acceptable. Please read instructions on the page.";
ppcER[3] = "Unknown error occured while executing this script.";
var ppcUC = false;
 var ppcUX = 4;
 var ppcUY = 4;
var globFuncEvt

/* Do not edit below this line unless you are sure what are you doing! */
var ppcTInfo
var ppcIE=(navigator.appName == "Microsoft Internet Explorer");
var ppcNN=((navigator.appName == "Netscape")&&(document.layers));
var ppcTT='\n'+'<table border="0"  cellspacing="0" cellpadding=0>'
	ppcTT+='\n'+'	<tr>'
	ppcTT+='\n'+'		<td style="border-left:1 solid black;border-right:1 solid black;;border-bottom:1 solid black">'
	ppcTT+='\n'+"			<table width=\"200\" cellspacing=\"0\" cellpadding=\"2\" border=\"0\" >\n";	
var ppcCD=ppcTT;var ppcFT="<font face=\"MS Sans Serif, sans-serif\" size=\"1\" color=\"#000000\">";var ppcFC=true;
var ppcTI=false;var ppcSV=null;var ppcSV1=null;var ppcRL=null;var ppcRL1=null;var ppcXC=null;var ppcYC=null;
var ppcML=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var ppcWE=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
var ppcNow=new Date();var ppcPtr=new Date();
var globmodel="";
var globLockObjDt=false //used for lock ppcSV and ppcSV that can't do fill with the selected date
var globCancelable = false //ini digunakan u/ meng-cancel insert data date.
var globPrmFuncFlg="0"
var globPpcRL=null;var globPpcRL1=null //obj date
var globyear = 0;

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("<html><head><title>Restoring the layer structure...</title></head>");
   write("<body bgcolor=\"#FFFFFF\" onLoad=\"history.go(-1)\">");
   write("</body></html>");
   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(model,prmFuncFlg,prmFunc,sdtserver,target,rules,sCurDt,target1,rules1,x,y,sts, xyearget) {
/**
	model-->model 1 dan 2 (mau tahu bedanya?, coba aja test sendiri)
	sts-->status
	jika true maka posisi x dan y menggunakan x,y yang dibawa melalui fungsi
	jika false maka posisi x dan y window pop merujuk pada posisi pointer mouse
**/
 
 globyear = xyearget;
 globFuncEvt=prmFunc
 globPrmFuncFlg=(prmFuncFlg!=""?prmFuncFlg:"0")
 var widthCalender=200
 var sItemYear=null;var sItemMnth=null;
 if((sCurDt!="")&&(chksDate(sCurDt)))
 {
	//assume the date is the english format
	var arsCurDt=sCurDt.split("/")	
	sItemMnth=parseInt(arsCurDt[0]-1);sItemYear=parseInt(arsCurDt[2]);	
 }
 else
 { 	
	var dt=new Date(sdtserver)
	sItemYear=dt.getYear();	
	sItemMnth=dt.getMonth()
 }
 //alert(sdtserver);
 
 globmodel=model 
 defView(sdtserver) //for defined for view calender
 
 if(globmodel=="model2"){
 	if(ppcIE){
	 	 var obj = document.all['PopUpCalendar'];  
		 objYear=obj.document.all['monthSelector'].document.ppcMonthList.sItemYear    
	 }
	 else if (ppcNN) {
	 	 var obj = document.layers['PopUpCalendar'];
		 objYear=obj.document.layers['monthSelector'].document.ppcMonthList.sItemYear   
	 }
	 
	 minYear=objYear.options[0].value
	 maxYear=(objYear.options[objYear.length-1].value * 1) + 50;
	 if(sItemYear<minYear){
	  	sItemYear=minYear
	 }
	 else if (sItemYear>maxYear){
	 	sItemYear=maxYear
	 }
 }
 
 if(globmodel=="model3"){
 	if(ppcIE){
	 	 var obj = document.all['PopUpCalendar'];  
		 objYear=obj.document.all['monthSelector'].document.ppcMonthList.sItemYear    
	 }
	 else if (ppcNN) {
	 	 var obj = document.layers['PopUpCalendar'];
		 objYear=obj.document.layers['monthSelector'].document.ppcMonthList.sItemYear   
	 }
	 
	 minYear=objYear.options[0].value
	 maxYear=(objYear.options[objYear.length-1].value * 1) + 50;
	 if(sItemYear<minYear){
	  	sItemYear=minYear
	 }
	 else if (sItemYear>maxYear){
	 	sItemYear=maxYear
	 }
 }
 ppcSV = target;
 ppcRL = rules;
 ppcSV1 = target1;
 ppcRL1 = rules1;
 //if (ppcFC) {setCalendar(sItemYear,sItemMnth);ppcFC = false;}  
 setCalendar(sItemYear,sItemMnth)
 if ((ppcSV != null)&&(ppcSV)) {
  if (ppcIE) {
   var obj = document.all['PopUpCalendar'];   
   if (sts){
		if ((!isNaN(x))||(!isNaN(y))){		
			x=document.body.scrollLeft +x
			y = document.body.scrollTop +y
		}
		else{
			x=y=0;
		}
	}
	else{				
		x = document.body.scrollLeft +event.clientX;
		y = document.body.scrollTop +event.clientY;
		if(x+widthCalender>document.body.scrollLeft+document.body.offsetWidth){
			if(x-widthCalender>5){
				x=x-widthCalender
			}
			else{
				x=5
			}
		}
	}	
   obj.style.left = x;
   obj.style.top  = y;
   obj.style.visibility = "visible";
   obj.document.all['monthSelector'].document.ppcMonthList.sItemMnth.value=sItemMnth;
   obj.document.all['monthSelector'].document.ppcMonthList.sItemYear.value=sItemYear;
   if(globmodel=="model2"){
   	obj.document.all['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth];
   }
   else
   if(globmodel=="model3"){
   	obj.document.all['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth];
   }
   else{
   	obj.document.all['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth]+" "+sItemYear;
   }
   }
  else if (ppcNN) {
   var obj = document.layers['PopUpCalendar'];
     if (sts){
		if ((!isNaN(x))||(!isNaN(y))){		
			x=x
			y = y
		}
		else{
			x=y=0;
		}
	}
	else{				
		x = ppcXC;
		y = ppcYC;				
	}	
   obj.left = x;
   obj.top  = y;
   obj.visibility = "show";
   obj.document.layers['monthSelector'].document.ppcMonthList.sItemMnth.value=sItemMnth;
   obj.document.layers['monthSelector'].document.ppcMonthList.sItemYear.value=sItemYear;
   if(globmodel=="model2"){
   	obj.document.layers['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth];
   }
   else
   if(globmodel=="model3"){
   	obj.document.layers['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth];
   }   
   else{
    obj.document.layers['monthSelector'].document.ppcMonthList.sItemDateView.value=ppcMNshort[sItemMnth]+" "+sItemYear;
   }
   }
  else {showError(ppcER[0]);}}
 else {showError(ppcER[1]);}
 
 DivRef = document.getElementById('PopUpCalendar');
 DivRefBln = document.getElementById('monthSelector');
 IfrRef = document.getElementById('frameDate'); 
 
 DivRef.style.display = "block";
 IfrRef.style.width = DivRef.offsetWidth+3;
 IfrRef.style.height = (DivRef.offsetHeight*2)+10;
 IfrRef.style.top = DivRef.style.top;
 IfrRef.style.left = DivRef.style.left;
 IfrRef.style.zIndex = DivRef.style.zIndex - 1;
 IfrRef.style.display = "block";
 }
 
function switchMonth(sItemMnth,sItemYear) {
 //var tmp = param.split("|");
 //alert(sItemMnth+"-->"+sItemYear)
 setCalendar(sItemYear,sItemMnth);}
 
function chksDate(dtchk){
var sts=false;
var datePat=/^(0[1-9]|[1-9]|1[0-2])\/(0[1-9]|[1-9]|[1-2][0-9]|3[0-1])\/([0-9]|[0-9][0-9]|19[1-9][0-9]|20[0-9][0-9])$/;	
if (dtchk!=""){	
  var gotIt = datePat.exec(dtchk); 
  if(!gotIt)
  	{//alert("Date invalid (mm/dd/yy:" + dtchk + ").");
	}
  else{sts=true;}
return sts}
}
			
function moveMonth(dir) {
 var obj = null; 
 var obj1=null;
 var obj2=null;
 
 if (ppcIE) {obj = document.ppcMonthList.sItemMnth;obj1 = document.ppcMonthList.sItemYear;obj2 = document.ppcMonthList.sItemDateView;}
 else if (ppcNN) {
 	obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemMnth;
	obj1 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemYear;
	obj2 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemDateView;
	}
 else {showError(ppcER[0]);}
 
 var mnth=parseInt(obj.value)
 var yr=parseInt(obj1.value)
 if (obj != null) {
  if (dir.toLowerCase() == "back") 
  	{			
		if (mnth==0){mnth=11;yr=yr-1}
		else{mnth=mnth-1}		
		if(globmodel=="model2"){
			if(yr>=minYear){
				obj2.value=ppcMNshort[mnth]
				obj.value=mnth;obj1.value=yr		
				setCalendar(yr,mnth);
			}				
		}
		else
		if(globmodel=="model3"){
			if(yr>=minYear){
				obj2.value=ppcMNshort[mnth]
				obj.value=mnth;obj1.value=yr		
				setCalendar(yr,mnth);
			}				
		}		
		else{
			obj2.value=ppcMNshort[mnth]+" "+yr		
			obj.value=mnth;obj1.value=yr		
			setCalendar(yr,mnth);	
		}				
	}
  else if (dir.toLowerCase() == "forward") 
  	{		
		if (mnth==11){mnth=0;yr=yr+1}
		else{mnth=mnth+1}		
		if(globmodel=="model2"){
			if(yr<=maxYear){	
				obj2.value=ppcMNshort[mnth]		
				obj.value=mnth;obj1.value=yr
				setCalendar(yr,mnth);		
			}
		}
		else
		if(globmodel=="model3"){
			if(yr<=maxYear){	
				obj2.value=ppcMNshort[mnth]		
				obj.value=mnth;obj1.value=yr
				setCalendar(yr,mnth);		
			}
		}		
		else{
			obj2.value=ppcMNshort[mnth]+" "+yr		
			obj.value=mnth;obj1.value=yr
			setCalendar(yr,mnth);	
		}						
	}
 }}      
 
 function moveYear(dir) {
 var obj = null; 
 var obj1=null;
 var obj2=null;
 
 if (ppcIE) {obj = document.ppcMonthList.sItemMnth;obj1 = document.ppcMonthList.sItemYear;obj2 = document.ppcMonthList.sItemDateView;}
 else if (ppcNN) {
 	obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemMnth;
	obj1 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemYear;
	obj2 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemDateView;
	}
 else {showError(ppcER[0]);}
 
 var mnth=parseInt(obj.value)
 var yr=parseInt(obj1.value)
 if (obj != null) {
  if (dir.toLowerCase() == "back") 
  	{
		yr=yr-1
		obj2.value=ppcMNshort[mnth]+" "+yr
		obj.value=mnth;obj1.value=yr
		setCalendar(yr,mnth);
	}
  else if (dir.toLowerCase() == "forward") 
  	{
		yr=yr+1		
		obj2.value=ppcMNshort[mnth]+" "+yr
		obj.value=mnth;obj1.value=yr
		setCalendar(yr,mnth);
	}
 }}
	  
function setCurrent(sItemYear,sItemMnth){
 var obj = null; 
 var obj1=null;
 var obj2=null;
 
 if (ppcIE) {obj = document.ppcMonthList.sItemMnth;obj1 = document.ppcMonthList.sItemYear;obj2 = document.ppcMonthList.sItemDateView;}
 else if (ppcNN) { 	
 	obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemMnth;
	obj1 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemYear;
	obj2 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemDateView;	
	}
 else {showError(ppcER[0]);} 
 if (obj != null) { 	
    sItemYear=parseInt(sItemYear)
	sItemMnth=parseInt(sItemMnth)
	obj.value=sItemMnth-1
	obj1.value=sItemYear
	obj2.value=ppcMNshort[sItemMnth-1]+" "+sItemYear
	setCalendar(sItemYear,sItemMnth-1);
 }
}

function selectDate(param) {
 globCancelable = false;
 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)) {
  	globPpcRL=dateFormat(year,month,date,ppcRL)
	globPpcRL1=dateFormat(year,month,date,ppcRL1)
  	if(globFuncEvt!=""){
		if(globPrmFuncFlg=="0"){
			ppcSV.value = globPpcRL;
			ppcSV1.value = globPpcRL1;
			eval(globFuncEvt)
		}
		else if(globPrmFuncFlg=="1"){
			eval(globFuncEvt)
			if(!globLockObjDt && !globCancelable){
				ppcSV.value = globPpcRL;
				ppcSV1.value = globPpcRL1;
			}
		}
	}
	else{
		ppcSV.value = globPpcRL;
		ppcSV1.value = globPpcRL1;
	}	
	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,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("<html>\n<head>\n<title>DynDoc</title>\n</head>\n<body bgcolor=\"#FFFFFF\">\n");
   write(ppcCD);
   write("</body>\n</html>");
   close();}}
 else {showError(ppcER[0]);}
 ppcCD = ppcTT;}
 
function generateContent() {
 var year  = getFullYear(ppcPtr);
 var month = ppcPtr.getMonth();
 var date  = 1;
 var day   = ppcPtr.getDay();
 var len   = ppcML[month];
 var bgr,bgFnt,cnt,tmp = "";
 var j,i = 0;
 for (j = 0; j < 7; ++j) {
  if (date > len) {break;}
  for (i = 0; i < 7; ++i) {
   bgr = ((i == 0)||(i == 6)) ? "#FFFFFF" : "#FFFFFF"; //if true that the day is sunday & saturday
   bgFnt=(i == 0)?"#ff0000":"black"
   if (((j == 0)&&(i < day))||(date > len)) {tmp  += makeCell(bgr,bgFnt,year,month,0);}
   else {tmp  += makeCell(bgr,bgFnt,year,month,date);++date;}}
  ppcCD += "<tr align=\"center\">\n" + tmp + "</tr>\n";tmp = "";}
 ppcCD += "<tr><tr><td colspan=7 height=1 background=\"../image/glob_titik.gif\"><font size=1pt></font></td></tr><td colspan=7>"+ppcTInfo+"</td></tr></table></td></tr></table>\n";}
 
function makeCell(bgr,bgFnt,year,month,date) {
 var param = "\'"+year+"|"+month+"|"+date+"\'";
 var td1 = "<td width=\"20\" bgcolor=\""+bgr+"\" ";
 var td2 = (ppcIE) ? "</font></span></td>\n" : "</font></a></td>\n";
 var evt = "onMouseOver=\"this.style.backgroundColor=\'#00ffcc\'\" onMouseOut=\"this.style.backgroundColor=\'"+bgr+"\'\" onMouseUp=\"selectDate("+param+")\" ";
 var ext = "<span Style=\"cursor: hand\">";
 var lck = "<span Style=\"cursor: default\">";
 var lnk = "<a href=\"javascript:selectDate("+param+")\" onMouseOver=\"window.status=\' \';return true;\">";
 var cellValue = (date != 0) ? date+"" : "&nbsp;";
 cellValue="<font color=\""+bgFnt+"\">"+cellValue+"</font>"
 if ((ppcNow.getDate() == date)&&(ppcNow.getMonth() == month)&&(getFullYear(ppcNow) == year)) {
  td1 =td1+" style=\"border:1 solid blue\""
  cellValue = "<b>"+cellValue+"</b>";}
 var cellCode = "";
 if (date == 0) {
  if (ppcIE) {cellCode = td1+"Style=\"cursor: default\">"+lck+ppcFT+cellValue+td2;}
  else {cellCode = td1+">"+ppcFT+cellValue+td2;}}
 else {
  if (ppcIE) {cellCode = td1+evt+"Style=\"cursor: hand\">"+ext+ppcFT+cellValue+td2;}
  else {
   if (date < 10) {cellValue = "&nbsp;" + cellValue + "&nbsp;";}
   cellCode = td1+">"+lnk+ppcFT+cellValue+td2;}}
 return cellCode;}
 
 //not used
function setSelectList(year,month) {
 var i = 0;
 var obj = null;
 if (ppcIE) {obj = document.ppcMonthList.sItem;}
 else if (ppcNN) {obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItem;}
 else {/* NOP */}
 while (i < 13) {
  obj.options[i].value = year + "|" + month;s
  obj.options[i].text  = year + " • " + ppcMN[month];
  i++;
  month++;
  if (month == 12) {year++;month = 0;}}}
  
function hideCalendar() {
 if (ppcIE) {document.all['PopUpCalendar'].style.visibility = "hidden";}
 else if (ppcNN) {document.layers['PopUpCalendar'].visibility = "hide";window.status = " ";}
 else {/* NOP */}
 ppcTI = false;
 setCalendar();
 ppcSV = null;
 
 //--tambahan
 DivRef.style.display = "none";
 IfrRef.style.display = "none";
 
/*
 if (ppcIE) {var obj1 = document.ppcMonthList.sItemMnth;var obj2 = document.ppcMonthList.sItemYear;}
 else if (ppcNN) 
 	{
		var obj1 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemMnth;
		var obj2 = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.ppcMonthList.sItemYear;
	}
 else { NOP }
obj1.selectedIndex = 0;
obj2.selectedIndex = 0;
*/
 }
 
function showError(message) {
 window.alert("[ PopUp Calendar ]\n\n" + message);}
 
function isLeap(year) {
 if ((year%400==0)||((year%4==0)&&(year%100!=0))) {return true;}
 else {return false;}}
 
function getFullYear(obj) {
 if (ppcNN) {return obj.getYear() + 1900;}
 else 
	 {
	 	obj=String(obj)
	 	return obj.substr(obj.length-4,4)
 		//return obj.getYear()
	 }
 }
 
function validDate(date) {
 var reply = true;
 if (ppcRL == null) {/* NOP */}
 else {
  var arr = ppcRL.split(":");
  var mode = arr[0];
  var arg  = arr[1];
  var key  = arr[2].charAt(0).toLowerCase();
  if (key != "d") {
   var day = ppcPtr.getDay();
   var orn = isEvenOrOdd(date);
   reply = (mode == "[^]") ? !((day == arg)&&((orn == key)||(key == "a"))) : ((day == arg)&&((orn == key)||(key == "a")));}
  else {reply = (mode == "[^]") ? (date != arg) : (date == arg);}}
 return reply;}
 
function isEvenOrOdd(date) {
 if (date - 21 > 0) {return "e";}
 else if (date - 14 > 0) {return "o";}
 else if (date - 7 > 0) {return "e";}
 else {return "o";}}
 
function dateFormat(year,month,date,rule) {
 var ppcT=rule
 if (ppcT == null) {ppcT = "m/d/Y";}
 var day = ppcPtr.getDay();
 var crt = "";
 var str = "";
 var chars = ppcT.length;
 for (var i = 0; i < chars; ++i) {
  crt = ppcT.charAt(i);
  switch (crt) {
   case "M": str += ppcMN[month]; break;
   case "s": str += ppcMNshort[month]; break;
   case "m": str += (month<9) ? ("0"+(++month)) : ++month; break;
   case "Y": str += year; break;
   case "y": str += year.substring(2); break;
   case "d": str += ((ppcDF.indexOf("m")!=-1)&&(date<10)) ? ("0"+date) : date; break;
   case "W": str += ppcWN[day]; break;
    default: str += crt;}}
 return unescape(str);}

 function giveBlankDt(){
 	ppcRL=ppcRL1=null
	globPpcRL=globPpcRL1=null
	if(globFuncEvt!=""){
		if(globPrmFuncFlg=="0"){
			ppcSV.value = ""
			ppcSV1.value = ""
			eval(globFuncEvt)
		}
		else if(globPrmFuncFlg=="1"){
			eval(globFuncEvt)
			if(!globLockObjDt){
				ppcSV.value = ""
				ppcSV1.value = ""
			}
		}
	}
	else{
		ppcSV.value = ""
		ppcSV1.value = ""
	}	
	hideCalendar()
 } 
 
function defView(sdtserver){	
	var s=""
	var dt=new Date(sdtserver)
	var mnth=dt.getMonth()
	var smnth=mnth+""	
	var yr=dt.getYear()	
	
	ppcTInfo='\n'+'<table width=100% border="0"  cellspacing="0" cellpadding=0>'
	ppcTInfo+='\n'+'	<tr>'
	ppcTInfo+='\n'+'		<td width=20%>'
	ppcTInfo+='\n'+'			<font face=verdana,arial style="background-color:#eaeaea;" size=1 color=#6666ff><nobr><a href=\"javascript:giveBlankDt()\">&nbsp;Blank&nbsp;</a></font>'
	ppcTInfo+='\n'+'		</td>'	
	ppcTInfo+='\n'+'		<td width=20%>'
	ppcTInfo+='\n'+'			<nobr>&nbsp;&nbsp;<font face=verdana,arial size=1 style="background-color:#eaeaea;" color=#6666ff><a href=\"javascript:setCurrent('+yr+','+parseInt(mnth+1)+')\">&nbsp;Today&nbsp;</a></font>'
	ppcTInfo+='\n'+'		</td>'
	ppcTInfo+='\n'+'		<td width=60%></td>'
	ppcTInfo+='\n'+'		<td width=20% align=right>'
	ppcTInfo+='\n'+'			<font face=verdana,arial size=1 style="background-color:#eaeaea;"color=red><nobr><a href=javascript:hideCalendar()>&nbsp;Close&nbsp;</a></font>'
	ppcTInfo+='\n'+'		</td>'
	ppcTInfo+='\n'+'	</tr>'
	ppcTInfo+='\n'+'</table>'
	
	s+='\n'+'<table border="0"  cellspacing="0" cellpadding=0>'
	s+='\n'+'	<tr>'
	s+='\n'+'		<td style="border-left:1 solid black;border-right:1 solid black;">'
	s+='\n'+'<table border="0" cellspacing="0" cellpadding="2" width="200"  vspace="0" hspace="0">'
	s+='\n'+'	<form name="ppcMonthList">'
	s+='\n'+'	<tr>'
	s+='\n'+'		<td align="center" bgcolor="#330066" height=18>'	
	s+='\n'+'			<table width=100% cellpadding=2 cellspacing=0 border=0>'
	s+='\n'+'				<tr>'
	
									switch(globmodel){
										case "model1":
	s+='\n'+'							<td width=20% align=right>'
	s+='\n'+'								<a href="javascript:moveYear(\'back\')"><img src="../images/btn_calenderthnleft.gif" border=0></a>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=20% >'
	s+='\n'+'								<a href="javascript:moveMonth(\'back\')"><img src="../images/btn_calenderblnleft.gif" border=0></a>'
	s+='\n'+'							</td>'	
	s+='\n'+'							<td width=20%>'
	s+='\n'+'								<font face="MS Sans Serif, sans-serif" size="1">'
	s+='\n'+'									<input type=hidden name=sItemMnth value="'+mnth+'">'
	s+='\n'+'									<input type=hidden name=sItemYear value="'+yr+'">'
	s+='\n'+'									<input type=text size=8 name=sItemDateView value="'+smnth.substr(0,3)+'" "'+yr+'" style=\"border:0;background-color=\'#330066\';font-weight:bold;font-family:verdana,arial;font-size:8pt;text-align:right;color:white\" readonly>'
	s+='\n'+'								</font>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=20% align=right>'
	s+='\n'+'								<a href="javascript:moveMonth(\'forward\')"><img src="../images/btn_calenderblnright.gif" border=0></a>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=20% >'	
	s+='\n'+'								<a href="javascript:moveYear(\'forward\')"><img src="../images/btn_calenderthnright.gif" border=0></a>'
	s+='\n'+'							</td>'
											break;
										case "model2":					
	s+='\n'+'							<td width=40%>'
	s+='\n'+'								<a href="javascript:moveMonth(\'back\')"><img src="../images/btn_calenderblnleft.gif" border=0></a>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=10%>'
	s+='\n'+'								<input type=hidden name=sItemMnth value=\"'+mnth+'\">'
	s+='\n'+'								<input type=text size=2 name=sItemDateView value=\"'+smnth.substr(0,3)+'\" style=\"border:0;background-color=\'#330066\';font-weight:bold;font-family:verdana,arial;font-size:8pt;text-align:right;color:white\" readonly>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=10%>'
	s+='\n'+'								<select name=sItemYear onchange="javascript:setCalendar(this.value,document.ppcMonthList.sItemMnth.value)" style="font-family:arial;font-size:8pt;">'
												for (var i=yr-globyear;i<=yr;i++){
	
	s+='\n'+'											<option value=\"'+i+'\"'
															if (i==yr){s+=' selected '}
	s+='											>'+i+'\n'
												}	
	s+='\n'+'								</select>'						
	s+='\n'+'							</td>'							
	s+='\n'+'							<td width=40% align=right>'
	s+='\n'+'								<a href=\"javascript:moveMonth(\'forward\')\"><img src="../images/btn_calenderblnright.gif" border=0></a>'
	s+='\n'+'							</td>'
											break;
										case "model3":					
	s+='\n'+'							<td width=40%>'
	s+='\n'+'								<a href="javascript:moveMonth(\'back\')"><img src="../images/btn_calenderblnleft.gif" border=0></a>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=10%>'
	s+='\n'+'								<input type=hidden name=sItemMnth value=\"'+mnth+'\">'
	s+='\n'+'								<input type=text size=2 name=sItemDateView value=\"'+smnth.substr(0,3)+'\" style=\"border:0;background-color=\'#330066\';font-weight:bold;font-family:verdana,arial;font-size:8pt;text-align:right;color:white\" readonly>'
	s+='\n'+'							</td>'
	s+='\n'+'							<td width=10%>'
	s+='\n'+'								<select name=sItemYear onchange="javascript:setCalendar(this.value,document.ppcMonthList.sItemMnth.value)" style="font-family:arial;font-size:8pt;">'
												for (var i=yr;i<=yr+globyear;i++){
	
	s+='\n'+'											<option value=\"'+i+'\"'
															if (i==yr){s+=' selected '}
	s+='											>'+i+'\n'
												}	
	s+='\n'+'								</select>'						
	s+='\n'+'							</td>'							
	s+='\n'+'							<td width=40% align=right>'
	s+='\n'+'								<a href=\"javascript:moveMonth(\'forward\')\"><img src="../images/btn_calenderblnright.gif" border=0></a>'
	s+='\n'+'							</td>'
											break;											
										}	
	
	s+='\n'+'				</tr>'
	s+='\n'+'			</table>'
	s+='\n'+'		</td>'
	s+='\n'+'	</tr>'
	s+='\n'+'	</form>'
	s+='\n'+'</table>'
	s+='\n'+'		</td>'
	s+='\n'+'	</tr>'
	s+='\n'+'</table>'
	
	s+='\n'+'<table border="0"  cellspacing="0" cellpadding=0>'
	s+='\n'+'	<tr>'
	s+='\n'+'		<td style="border-left:1 solid black;border-right:1 solid black;">'
	s+='\n'+'			<table border="0" cellspacing="0" cellpadding="4" width="200" vspace="0" hspace="0">'
	s+='\n'+'				<tr align="center">'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1" color=red>S</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">M</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">T</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">W</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">T</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">F</font></b></td>'
	s+='\n'+'					<td width="20"><b><font face="MS Sans Serif, sans-serif" size="1">S</font></b></td>'
	s+='\n'+'				</tr>'
	s+='\n'+'				<tr align="center">'
	s+='\n'+'					<td colspan=7 height=2 background="../images/btn_dot.gif"><font size=1pt></font></td>'
	s+='\n'+'				</tr>'
	s+='\n'+'			</table>'
	s+='\n'+'		</td>'
	s+='\n'+'	</tr>'
	s+='\n'+'</table>'
	document.all["divDate"].innerHTML=s	
} 