// JavaScript Document
var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#999999";
var gcToggle = "#333333";
var gcBG = "#FFFFFF";
var previousObject = null;

var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();

var gCalMode = "";
var gCalDefDate = "";

var CAL_MODE_NOBLANK = "2";

N = (document.all) ? 0 : 1;

function fSetDate(iYear, iMonth, iDay){
VicPopCal.style.visibility = "hidden";
if ((iYear == 0) && (iMonth == 0) && (iDay == 0)){
gdCtrl.value = "";
}
else if ((iYear == 1) && (iMonth == 1) && (iDay == 1)){
//gdCtrl.value = "";
}else{
iMonth = iMonth + 100 + "";
iMonth = iMonth.substring(1);
iDay = iDay + 100 + "";
iDay = iDay.substring(1);
gdCtrl.value = iYear+"-"+iMonth+"-"+iDay;
}
for (i in goSelectTag)
goSelectTag[i].style.visibility = "visible";
goSelectTag.length = 0;

if(N){
// if(typeof(opener.winPopupWindow.args) == "") 
// alert(opener.winPopupWindow.args.value);
if(opener.winPopupWindow.args.value ){
opener.winPopupWindow.returnedValue = gdCtrl.value;
opener.winPopupWindow.args.value = gdCtrl.value;
}else if(opener.winPopupWindow.args.value == null ||
opener.winPopupWindow.args.value == "" ){
opener.winPopupWindow.returnedValue = gdCtrl.value;
opener.winPopupWindow.args.value = gdCtrl.value;
}else{
opener.winPopupWindow.returnedValue = gdCtrl.value;
}
if(opener.winPopupWindow.returnFunc) opener.winPopupWindow.returnFunc();
//window.close();
}else{
window.returnValue=gdCtrl.value;
//window.close();
}
}

function fGetDate(dt)
{
var ipYear = dt.getFullYear();
var ipMonth = dt.getMonth()+1;
fSetYearMon(ipYear, ipMonth); 
}

function HiddenDiv()
{
var i;
VicPopCal.style.visibility = "hidden";
for (i in goSelectTag)
goSelectTag[i].style.visibility = "visible";
goSelectTag.length = 0;

}
function fSetSelected(aCell){
var iOffset = 0;
if(N){
tbSelYear = document.getElementById("tbSelYear");
tbSelMonth = document.getElementById("tbSelMonth"); 
var iYear = parseInt(tbSelYear.value);
var iMonth = parseInt(tbSelMonth.value);
aCell.bgColor = gcBG;
fontObj = aCell.getElementsByTagName("font");
var iDay = parseInt(fontObj[0].childNodes[0].nodeValue);
// alert(fontObj[0].color);
/*** below temp patch by maxiang ***/
if( fontObj[0].color == gcGray ){
iOffset = (iDay < 15 )?1:-1;
}
/*** above temp patch by maxiang ***/

iMonth += iOffset;
if (iMonth<1) {
iYear--;
iMonth = 12;
}else if (iMonth>12){
iYear++;
iMonth = 1;
}
}else{
var iYear = parseInt(tbSelYear.value);
var iMonth = parseInt(tbSelMonth.value);
aCell.bgColor = gcBG;
with (aCell.children["cellText"]){
var iDay = parseInt(innerText);
if (color==gcGray)
iOffset = (Victor<10)?-1:1;

/*** below temp patch by maxiang ***/
if( color == gcGray ){
iOffset = (iDay < 15 )?1:-1;
}
/*** above temp patch by maxiang ***/

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, sDateTextSize) {
var WeekDay = new Array("S","M","T","W","T","F","S");
var styleTD = " bgcolor='"+gcBG+"' valign='middle' align='center' height='"+iCellHeight+"' style='font-size:12px; ";

with (document) {
write("<tr>");
for(i=0; i<7; i++)
write("<td "+styleTD+" color:#990099' >" + WeekDay[i] + "</td>");
write("</tr>");

for (w = 1; w < 7; w++) {
write("<tr>");
for (d = 0; d < 7; d++) {
write("<td id=calCell "+styleTD+"cursor:pointer; height:15px;' onMouseOver='this.bgColor=gcToggle' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)'>");
write("<font id=cellText name='cellText'><b> </b></font>");
write("</td>")
}
write("</tr>");
}
}
}

function fUpdateCal(iYear, iMonth) {
if(N){
cellText = document.getElementsByName("cellText");
// alert(cellText);
myMonth = fBuildCal(iYear, iMonth);
var i = 0;
for (w = 0; w < 6; w++){
for (d = 0; d < 7; d++){
var ind = (7*w) + d;
Victor = i++;
if (myMonth[w+1][d]<0) {
cellText[ind].color = gcGray;
cellText[ind].innerHTML = -myMonth[w+1][d];
}else{
if( d == 0 ){
cellText[ind].color = "red";
}else if( d == 6 ){
cellText[ind].color = "blue";
}else{
cellText[ind].color = "black";
}
// End of above maxiang
cellText[ind].innerHTML = myMonth[w+1][d];
}
}
}
}else{
myMonth = fBuildCal(iYear, 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) {
color = gcGray;
innerText = -myMonth[w+1][d];
}else{
// Modified by maxiang for we need 
// Saturday displayed in blue font color.
//color = ((d==0)||(d==6))?"red":"black";
if( d == 0 ){
color = "red";
}else if( d == 6 ){
color = "blue";
}else{
color = "black";
}
// End of above maxiang
innerText = myMonth[w+1][d];
}
}
}
}

function fSetYearMon(iYear, iMon){
if (N) {
var objSelMonth;
objSelMonth = document.getElementById("tbSelMonth");
objSelYear = document.getElementById("tbSelYear");
objSelMonth.options[iMon-1].selected = true;
for (i = 0; i < objSelYear.length; i++)
if (objSelYear.options[i].value == iYear)
objSelYear.options[i].selected = true;
}else{
tbSelMonth.options[iMon-1].selected = true;
for (i = 0; i < tbSelYear.length; i++)
if (tbSelYear.options[i].value == iYear)
tbSelYear.options[i].selected = true;
}
fUpdateCal(iYear, iMon);
}

function fPrevMonth(){
if(N){
objSelMonth = document.getElementById("tbSelMonth");
objSelYear = document.getElementById("tbSelYear");
var iMon = objSelMonth.value;
var iYear = objSelYear.value;
}else{
var iMon = tbSelMonth.value;
var iYear = tbSelYear.value;
}

if (--iMon<1) {
iMon = 12;
iYear--;
}

fSetYearMon(iYear, iMon);
}

function fNextMonth(){
if(N){
objSelMonth = document.getElementById("tbSelMonth");
objSelYear = document.getElementById("tbSelYear");
var iMon = objSelMonth.value;
var iYear = objSelYear.value;
}else{
var iMon = tbSelMonth.value;
var iYear = tbSelYear.value;
}

if (++iMon>12) {
iMon = 1;
iYear++;
}

fSetYearMon(iYear, iMon);
}

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, mode, defDate){
gCalMode = mode;
gCalDefDate = defDate;

if (popCtrl == previousObject){
if (VicPopCal.style.visibility == "visible"){
//HiddenDiv();
return true;
}

}
previousObject = popCtrl;
gdCtrl = dateCtrl;
fSetYearMon(giYear, giMonth); 
if(N){
VicPopCal = document.getElementById("VicPopCal");
VicPopCal.style.visibility = 'visible';
return;
} 
var point = fGetXY(popCtrl);

if( gCalMode == CAL_MODE_NOBLANK ){
document.all.CAL_B_BLANK.style.visibility = "hidden"; 
}else{
document.all.CAL_B_BLANK.style.visibility = "visible";
} 

with (VicPopCal.style) {
left = point.x;
top = point.y+popCtrl.offsetHeight;
width = VicPopCal.offsetWidth;
height = VicPopCal.offsetHeight;
fToggleTags(point); 
visibility = 'visible';
}
}

var gMonths = new Array("Jan.","Feb.","Mar.","Apr.","May.","Jun.","Jul.","Aug.","Sept.","Oct.","Nov.","Dec.");

with (document) {
write("<div id='VicPopCal' style='position:absolute;visibility:hidden;z-index:100;overflow:hidden;width:180px;'>");
write("<table width='180' border='0' cellpadding='0' cellspacing='0' bgcolor='#FFFFFF' style=' border: 1px outset #CCCCCC;'><tr><td valign='middle' align='center'>");
//write("<input type='button' name='PrevMonth' value='<' style='height:20;width:20;font-weight:bold;' onClick='fPrevMonth();'>");
write("<span style='cursor:pointer;font-size:14px;font-weight:bold;' onClick='fPrevMonth();'>＜</span> ");
write("<SELECT name='tbSelYear' id=tbSelYear onChange='fUpdateCal(document.getElementById(\"tbSelYear\").value, document.getElementById(\"tbSelMonth\").value)' Victor='Won'>");
for(i=1930;i<2101;i++)
write("<OPTION value='"+i+"'>"+i+"</OPTION>");
write("</SELECT>");
write("<select name='tbSelMonth' id='tbSelMonth' onChange='fUpdateCal(document.getElementById(\"tbSelYear\").value, document.getElementById(\"tbSelMonth\").value)' Victor='Won'>");
for (i=0; i<12; i++)
write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
//write("<input type='button' name='PrevMonth' value='>' style='height:20;width:20;font-weight:bold;' onclick='fNextMonth();'>");
write(" <span style='cursor:pointer;font-size:14px;font-weight:bold;' onClick='fNextMonth();'>＞</span>");
write("</td><td align='center'>");
write("<p style='cursor:pointer;font-size:14px;' onclick='fSetDate(1,1,1);'>×</p>");
write("</td></tr><tr><td align='center' colspan='2'>");
write("<div style='background-color:#CCCCCC'><table table width='100%' border='0' cellpadding='1' cellspacing='1'>");
fDrawCal(giYear, giMonth, 8, '12');
write("</table></div></td></tr><tr><td align='center' height='20'>");
write("<p style='cursor:pointer;font-size:12px;' onclick='fSetDate(giYear,giMonth,giDay)'>Today: "+giYear+"-"+giMonth+"-"+giDay+"</p>");
write("</td><td algin='center'>");
write("<p ID=\"CAL_B_BLANK\" style='cursor:pointer;font-size:12px;' onclick='fSetDate(0,0,0)'>Clear</p>");
write("</td></tr></table></div>");
}

function fLoadDate(theojbt){
	var textObj = document.getElementById(theojbt);
	fSetDate(1,1,1);
	fPopCalendar(textObj, textObj);
	if(window.dialogArguments != null) fGetDate(window.dialogArguments);
	document.onkeydown=fkeydowns;
}
fkeydowns=function(){
fSetDate(1,1,1);
}

function fkeydown(){
	if(event.keyCode==27 && !N){
	event.returnValue = null;
	window.returnValue = null;
	}
}