 
<!-- Begin  //place these scripts within BODY tag if you are using IE 4.0 or below.
//****************************************************************************
// PopCalendar 3.30, Emailware(please mail&commend me if u like it)
// Originally coded by Liming(Victor) Weng, email: victorwon@netease.com
// Release date: 2000.3.7
// Anyone may modify it to satify his needs, but please leave this comment ahead.
//****************************************************************************
 
//modify by chamnan :august 06,2004
// CDO CPG Thailand

var gdCtrl = new Object();
var goSelectTag = new Array();
var oldCellClass ;
var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();
var firstYear = giYear - 100 ;
var lastYear = giYear + 50 ;

var displayFirstYear = firstYear + difYear ;
var displayLastYear = lastYear + difYear ;

var WeekDay ;//= new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
//document.write("??");

//var gMonths ; //new Array("January","February","March","April","May","June","July","August","September","October","November","December");
//var gShortMonths ;// = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
/*
function setShortMonths(aryMonth){
	gShortMonths = aryMonth;
}

function setLongMonths(aryMonth){
	alert("setLongMonth");
	gMonths = aryMonth;
}
*/

function fSetDate(iYear, iMonth, iDay){
  VicPopCal.style.visibility = "hidden";
  if (difYear==543) {//Thai Calendar
	gdCtrl.value =iDay+" "+ gMonths[iMonth - 1 ] +" "+ (iYear + difYear ); //Here, you could modify the locale as you need !!!!
  }else{ // Eng Calendar
	gdCtrl.value = gMonths[iMonth - 1 ]+" "+iDay+", "+iYear;
  }
  gdCtrl.nextSibling.value = iMonth + "/" + iDay + "/" + iYear;
  
  for (i in goSelectTag)
   goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;
}

//Clear Date 
//By chamnan [19-nov-04]
function fClearDate(){
	VicPopCal.style.visibility = "hidden";
	gdCtrl.value = "";

	gdCtrl.nextSibling.value = "";
    for (i in goSelectTag)
		goSelectTag[i].style.visibility = "visible";
	goSelectTag.length = 0;
  
}

function fSetSelected(aCell){
  var tbSelMonth = document.getElementById("tbSelMonth");
  var tbSelYear = document.getElementById("tbSelYear");  
  
  var iOffset = 0;
  var iYear = parseInt(tbSelYear.value - difYear);
  var iMonth = parseInt(tbSelMonth.value);
 
  self.event.cancelBubble = true;
  //aCell.bgColor = gcBG;
  with (aCell.children["cellText"]){
		var iDay = parseInt(innerText);
		if (className=="notCurrentMonthText")
			iOffset = (Victor<10)?-1:1;
			
		iMonth += iOffset;
		if (iMonth<1) {
			iYear--;
			iMonth = 12;
		}else if (iMonth>12){
			iYear++;
			iMonth = 1;
		}
  }
  
  fSetDate(iYear, iMonth, iDay);
}
 
 
function Point(iX, iY){
 this.x = iX;
 this.y = iY;
}
 
function fBuildCal(iYear, iMonth) {
  var aMonth=new Array();
  for(i=1;i<7;i++)
   aMonth[i]=new Array(i);
 
  var dCalDate=new Date(iYear, iMonth-1, 1);
  var iDayOfFirst=dCalDate.getDay();
  var iDaysInMonth=new Date(iYear, iMonth, 0).getDate();
  var iOffsetLast=new Date(iYear, iMonth-1, 0).getDate()-iDayOfFirst+1;
  var iDate = 1;
  var iNext = 1;
 
  for (d = 0; d < 7; d++)
 	aMonth[1][d] = (d<iDayOfFirst)?-(iOffsetLast+d):iDate++;
	
  for (w = 2; w < 7; w++)
   for (d = 0; d < 7; d++)
  		aMonth[w][d] = (iDate<=iDaysInMonth)?iDate++:-(iNext++);
		
  return aMonth;
}
 
//function fDrawCal(iYear, iMonth, iCellHeight, iDateTextSize) {
function fDrawCal(iYear, iMonth) {

  with (document) {
	 write("<tr>");
	 for(i=0; i<7; i++)
	  write("<td class='headTD' >" + WeekDay[i] + "</td>");
	 write("</tr>");
 
   	for (w = 1; w < 7; w++) {
	  write("<tr>");
		for (d = 0; d < 7; d++) {
		write("<td id=calCell class='normalCell'  onMouseOver=toggleCell(this,'toggleCell') onMouseOut=unToggleCell(this) onclick='fSetSelected(this)'>");
		write("<font id=cellText > </font>");
		write("</td>")
		}
	  write("</tr>");
 	}
  }
}

//chamnan [22-nov-04]
function toggleCell(cell,cName)
{
	oldCellClass = cell.className;
	cell.className=cName;
}

function unToggleCell(cell)
{
	cell.className=oldCellClass ;
}

function fUpdateCal(iYear, iMonth) {
  myMonth = fBuildCal(iYear, iMonth);
	//chamnan[19-nov-04]
	var actDate = gdCtrl.nextSibling.value;
	var aryMdY = actDate.split("/"); //month/day/year  
	//alert(aryMdY[0] + "  " + iMonth);
	
  var i = 0;
	for (w = 0; w < 6; w++)
		for (d = 0; d < 7; d++){
			with (cellText[(7*w)+d]) {
			Victor = i++;
			if (myMonth[w+1][d]<0) {
				className = "notCurrentMonthText";
				innerText = -myMonth[w+1][d];
			}else{
				className = ((d==0)||(d==6))?"holidayText":"workingDayText";
				innerText = myMonth[w+1][d];
			}
			//chamnan[19-nov-04]
			
				with (calCell[(7*w)+d])
				{
					if ( gdCtrl.nextSibling.value != "" ) {
						//if ( aryMdY[2] == iMonth && aryMdY[1] == iYear  &&   myMonth[w+1][d] >= 0 && innerText==iDay) {
						if ( aryMdY[2] == iYear  && aryMdY[0] == iMonth  && innerText==aryMdY[1] && myMonth[w+1][d]>=0) {
							
							className = "selectedCell";
						}else{
							//if this is today
							if (giYear == iYear  && giMonth == iMonth  && giDay==innerText && myMonth[w+1][d]>=0 ) {
								
								className = "todayCell";
							}else{
								
								className = "normalCell";
							}		
													
						}				
						
					}else{
						//if this is today
						if (giYear == iYear  && giMonth == iMonth  && giDay==innerText && myMonth[w+1][d]>=0 ) {
							
							className = "todayCell";
						}else{
							
							className = "normalCell";
						}							
						
						
					}
				}
				
		}
 
  }
}

//Add by Chamnan
function fUpdateCalDay(iYear, iMonth,iDay) {
	myMonth = fBuildCal(iYear, iMonth);
  		//chamnan[19-nov-04]
	var actDate = gdCtrl.nextSibling.value;
	var aryMdY = actDate.split("/"); //month/day/year  
		
	var i = 0;
	for (w = 0; w < 6; w++)
	{
		for (d = 0; d < 7; d++)
		{
				with (cellText[(7*w)+d]) {
						Victor = i++;
						if (myMonth[w+1][d]<0) {
							className = "notCurrentMonthText";
							innerText = -myMonth[w+1][d];
						}else{
							color = ((d==0)||(d==6))?"holidayText":"workingDayText";
							innerText = myMonth[w+1][d];
							//if (innerText==iDay) color= "blue";
						}
				}
				//chamnan[19-nov-04]
				
				with (calCell[(7*w)+d])
				{
					if ( gdCtrl.nextSibling.value != "" ) {
						//if ( aryMdY[2] == iMonth && aryMdY[1] == iYear  &&   myMonth[w+1][d] >= 0 && innerText==iDay) {
						if ( aryMdY[2] == iYear  && aryMdY[0] == iMonth  && innerText==aryMdY[1] && myMonth[w+1][d]>=0) {
							
							className = "selectedCell";
						}else{
						
							
							//if this is today
							if (giYear == iYear  && giMonth == iMonth  && giDay==innerText && myMonth[w+1][d]>=0 ) {
								
								className = "todayCell";
							}else{
								
								className = "normalCell";
							}		
													
						}				
						
					}else{
						//if this is today
						if (giYear == iYear  && giMonth == iMonth  && giDay==innerText && myMonth[w+1][d]>=0 ) {
						
							className = "todayCell";
						}else{
							
							className = "normalCell";
						}							
						
						
					}
				}					
		}
	}
				
}

function fSetYearMon(iYear, iMon){
  var tbSelMonth = document.getElementById("tbSelMonth");
  var tbSelYear = document.getElementById("tbSelYear");
  
  tbSelMonth.options[iMon-1].selected = true;

  for (i = 0; i < tbSelYear.length; i++)
	 if (tbSelYear.options[i].value == iYear + difYear)
	  tbSelYear.options[i].selected = true;


  fUpdateCal(iYear, iMon);
}

//Add By Chamnan
function fSetYearMonDay(iYear, iMon,iDay){

  var tbSelMonth = document.getElementById("tbSelMonth");
  var tbSelYear = document.getElementById("tbSelYear");  	

  tbSelMonth.options[iMon-1].selected = true;
  //tbSelYear.options[10].selected = true;
  dYear = difYear + parseInt(trim(iYear));

  for (i = 0; i < tbSelYear.length; i++){
	
	 if (trim(tbSelYear.options[i].value) == dYear){
	    tbSelYear.options[i].selected = true;
	 }
  }
  
  
fUpdateCalDay(iYear, iMon,iDay);

}


 // Add By chamnan
 function trim(inputString) {
   // Removes leading and trailing spaces from the passed string. Also removes
   // consecutive spaces and replaces it with one space. If something besides
   // a string is passed in (null, custom object, etc.) then return the input.
   if (typeof inputString != "string") { return inputString; }
   var retValue = inputString;
   var ch = retValue.substring(0, 1);
   while (ch == " ") { // Check for spaces at the beginning of the string
      retValue = retValue.substring(1, retValue.length);
      ch = retValue.substring(0, 1);
   }
   ch = retValue.substring(retValue.length-1, retValue.length);
   while (ch == " ") { // Check for spaces at the end of the string
      retValue = retValue.substring(0, retValue.length-1);
      ch = retValue.substring(retValue.length-1, retValue.length);
   }
   while (retValue.indexOf("  ") != -1) { // Note that there are two spaces in the string - look for multiple spaces within the string
      retValue = retValue.substring(0, retValue.indexOf("  ")) + retValue.substring(retValue.indexOf("  ")+1, retValue.length); // Again, there are two spaces in each of the strings
   }
   return retValue; // Return the trimmed string back to the user
} // Ends the "trim" function

function fPrevMonth(){
  var tbSelMonth = document.getElementById("tbSelMonth");
  var tbSelYear = document.getElementById("tbSelYear");  
  
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;
 
  if (--iMon<1) {
   iMon = 12;
   iYear--;
  }
 
  //fSetYearMon(iYear, iMon);
	tbSelMonth.value =iMon  ;
	tbSelYear.value=iYear ;
	
	fUpdateCal(tbSelYear.value - difYear, tbSelMonth.value)  
}
 
function fNextMonth(){
  var tbSelMonth = document.getElementById("tbSelMonth");
  var tbSelYear = document.getElementById("tbSelYear");  
  
  var iMon = tbSelMonth.value;
  var iYear = tbSelYear.value;
 
  if (++iMon>12) {
   iMon = 1;
   iYear++;
  }
 
 // fSetYearMon(iYear, iMon);
	tbSelMonth.value =iMon  ;
	tbSelYear.value=iYear ;
	
  fUpdateCal(tbSelYear.value - difYear, tbSelMonth.value)
}
 
function fToggleTags(){
  with (document.all.tags("SELECT")){
  for (i=0; i<length; i++)
   if ((item(i).Victor!="Won")&&fTagInBound(item(i))){
    item(i).style.visibility = "hidden";
    goSelectTag[goSelectTag.length] = item(i);
   }
  }
}
 
function fTagInBound(aTag){
  with (VicPopCal.style){
   var l = parseInt(left);
   var t = parseInt(top);
   var r = l+parseInt(width);
   var b = t+parseInt(height);
 var ptLT = fGetXY(aTag);
 return !((ptLT.x>r)||(ptLT.x+aTag.offsetWidth<l)||(ptLT.y>b)||(ptLT.y+aTag.offsetHeight<t));
  }
}
 
function fGetXY(aTag){
  var oTmp = aTag;
  var pt = new Point(0,0);
  do {
   pt.x += oTmp.offsetLeft;
   pt.y += oTmp.offsetTop;
   oTmp = oTmp.offsetParent;
  } while(oTmp.tagName!="BODY");
  return pt;
}


// Main: popCtrl is the widget beyond which you want this calendar to appear;
//       dateCtrl is the widget into which you want to put the selected date.
// i.e.: <input type="text" name="dc" style="text-align:center" readonly><INPUT type="button" value="V" onclick="fPopCalendar(dc,dc);return false">
function fPopCalendar(popCtrl, dateCtrl){

  gdCtrl = dateCtrl;
	 
	if ( gdCtrl.nextSibling.value == "" ) {
		fSetYearMon(giYear, giMonth);
	}else{
	
		//dateCtrl.nextSibling.value = gdCtrl.value;
		
		var actDate = gdCtrl.nextSibling.value;
	
		var aryMdY = actDate.split("/"); //month/day/year
		//var aryMD= aryMdY[0].split(" ");
	
		
		fSetYearMonDay(aryMdY[2], aryMdY[0] ,aryMdY[1]);
		//fSetYearMon(aryMdY[1], getMonthInt(aryMD[0]));

	}
  
	var point = fGetXY(popCtrl);
	with (VicPopCal.style) {
	left = point.x;
	top  = point.y+popCtrl.offsetHeight+1;
	width = VicPopCal.offsetWidth;
	height = VicPopCal.offsetHeight;
	fToggleTags(point);
	visibility = 'visible';
	}
	VicPopCal.focus();
  
}



function getMonthInt(strMonth){
return strMonth
/*
	var i 
	for(i in gShortMonths ) {
		if ( gShortMonths[i]  == strMonth ){
			i++ ;
			return i;
			
		}
	}
	return 1 ;
*/

} 
  
function fHideCal(){
  var oE = window.event;
  if ((oE.clientX>0)&&(oE.clientY>0)&&(oE.clientX<document.body.clientWidth)&&(oE.clientY<document.body.clientHeight)) {
 var oTmp = document.elementFromPoint(oE.clientX,oE.clientY);
 while ((oTmp.tagName!="BODY") && (oTmp.id!="VicPopCal"))
  oTmp = oTmp.offsetParent;
 if (oTmp.id=="VicPopCal")
  return;
  }
  VicPopCal.style.visibility = 'hidden';
  for (i in goSelectTag)
 goSelectTag[i].style.visibility = "visible";
  goSelectTag.length = 0;
}
 

// alert('yes');

with (document) {

write("<Div id='VicPopCal' onblur='fHideCal()' onclick='focus()' style='POSITION:absolute;visibility:hidden;border:2px ridge;width:10;z-index:100;'>");
write("<table border='0' class='mainTable' >");
write("<TR>");
write("<td valign='middle' align='center'><input type='button' name='PrevMonth' value='<' class='previousMonth' onClick='fPrevMonth()' onblur='fHideCal()'>");
write("&nbsp;&nbsp;<select name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value - difYear, tbSelMonth.value)' Victor='Won' onclick='self.event.cancelBubble=true' onblur='fHideCal()'>");
for (i=0; i<12; i++)
 write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
write("&nbsp;&nbsp;<SELECT name='tbSelYear' onChange='fUpdateCal(tbSelYear.value - difYear, tbSelMonth.value)' Victor='Won' onclick='self.event.cancelBubble=true' onblur='fHideCal()'>");
for(i=displayFirstYear;i<=displayLastYear;i++)
 write("<OPTION value='"+i+"'>&nbsp;&nbsp;"+i+"&nbsp;&nbsp;</OPTION>");
write("</SELECT>");
write("&nbsp;&nbsp;<input type='button' name='NextMonth' value='>' class='nextMonth' onclick='fNextMonth()' onblur='fHideCal()'>");
write("</td>");
write("</TR><TR>");
write("<td align='center'>");
write("<DIV><table class='calendarTable' width='100%' border='0' cellspacing='1'>");
          fDrawCal(giYear, giMonth);
write("</table></DIV>");
write("</td>");
write("</TR><TR><TD  align='center'>");
write("<input type='button' name='btnClearDate' value='Clear Date' class='clearDateButton' onclick='fClearDate(); self.event.cancelBubble=true'  onblur='fHideCal()' />");
 write("&nbsp;&nbsp;");
write("<input type='button' name='btnToday' value='Today'  class='todayButton' onclick='fSetDate(giYear,giMonth,giDay); self.event.cancelBubble=true'  onblur='fHideCal()' />");

write("</TD></TR>");write("</TD></TR>");

write("</TABLE></Div>");
}

// End -- Coded by Liming Weng, email: victorwon@netease.com -->
 
