********************** calendar.js *********************************** var gdCtrl = new Object(); var goSelectTag = new Array(); var gcGray = "#cccccc"; var gcToggle = "#BACCE2"; var gcToggleBorder = "#666666"; var gcLinkText = '#ffff00'; var gcToggleText = '#00ff00'; var gcBG = "#efefef"; var gcTitleBG="#cccccc"; var gcTitleText="#838DA9" 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";function fSetDate(iYear, iMonth, iDay){ //VicPopCal.style.visibility = "hidden"; if ((iYear == 0) && (iMonth == 0) && (iDay == 0)){ 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;
window.returnValue=gdCtrl.value; // alert(window.returnValue); window.close(); }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; 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('日','月','火','水','木','金','土'); var styleTitleTD = " bgcolor='"+gcTitleBG+"' bordercolor='"+gcTitleBG+"' valign='middle' align='center' width=4 height='"+iCellHeight+"' style='font-size:12px; "; var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' width='3' height='"+iCellHeight+"' style='font-size:12px; "; with (document) { write("<tr>"); for(i=0; i<7; i++) write("<td "+styleTitleTD+" color:"+gcTitleText+"' style='padding:2'><b>" + WeekDay[i] + "</b></td>"); write("</tr>");//*************************************** var vv=window.dialogArguments; var qYear = vv.substring(0,4); var b = vv.substring(5,7); if(b=="08"){ qMonth=7; } else if(b=="09"){ qMonth=8; }else{ qMonth=parseInt(b)-1; } var c=vv.substring(8,10); if(c=="08"){ qDay=8; } else if(c=="09"){ qDay=9; }else{ qDay=parseInt(c); } if(qYear==""&&qMonth==""&&qDay==""){} else { var pp=new Date(qYear,qMonth,1); var mm=pp.getDay(); var tot=mm+qDay; var aa=tot%7; var bb=parseInt(tot/7); if(aa==0){ aa=6; bb=parseInt(tot/7); } else{ aa=tot%7-1; bb=parseInt(tot/7)+1; } }
//*************************************** for (w = 1; w < 7; w++) { write("<tr>"); for (d = 0; d < 7; d++) { //begin if(d==aa&&w==bb){ write("<td bgColor=gcBG id=calCell1 "+styleTD+"cursor:hand;' style='padding-left:4;padding-right:4;padding-top:3;padding-bottom:3' onMouseOver='this.bgColor=gcToggle;this.borderColor=gcToggleBorder' onMouseOut='this.bgColor=gcBG;this.borderColor=gcBG' onclick='fSetSelected(this)'>"); write("<font id=cellText face=Verdana><b> </b></font>"); write("</td>") } //end else{ write("<td id=calCell "+styleTD+"cursor:hand;' style='padding-left:4;padding-right:4;padding-top:3;padding-bottom:3' onMouseOver='this.bgColor=gcToggle;this.borderColor=gcToggleBorder' onMouseOut='this.bgColor=gcBG;this.borderColor=gcBG' onclick='fSetSelected(this)'>"); write("<font id=cellText face=Verdana><b> </b></font>"); write("</td>") } } write("</tr>"); } } }function fUpdateCal(iYear, iMonth) { myMonth = fBuildCal(iYear, iMonth); var i = 0; //begin var dCalDate=new Date(giYear, giMonth-1, 1); var iDayOfFirst1=dCalDate.getDay(); var tot=iDayOfFirst1+giDay; var aa=tot%7; var bb=parseInt(tot/7); if(aa==0){ aa=6; bb=parseInt(tot/7)-1; } else{ aa=tot%7-1; bb=parseInt(tot/7); }
//end 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==aa&&w==bb&&iMonth==giMonth&&iYear==giYear){ color = "#00ff00"; } // else if( d == 0 ){ color = "red"; }else if( d == 6 ){ color = "red"; }else{ color = "black"; } // End of above maxiang innerText = myMonth[w+1][d]; } } }function fSetYearMon(iYear, iMon){ 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(){ var iMon = tbSelMonth.value; var iYear = tbSelYear.value;
if (--iMon<1) { iMon = 12; iYear--; }
fSetYearMon(iYear, iMon); }function fNextMonth(){ 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; } //begin function fAdd(){ var cal=document.all.calCell1; if(cal){ cal.bgColor=gcBG; } } //end // 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; }
<HTML><HEAD>
<meta http-equiv=Content-Type content="text/html; charset=shift_jis">
<TITLE>カレンダー</TITLE>
<BODY bgColor=#efefef onload=fload()>
<script Language="JavaScript" src="././include/calendar.js"></script>
<SCRIPT>
function fload()
{
fPopCalendar(document.all.txt1, document.all.txt1);
}function fkeydown()
{
if(event.keyCode==27){
event.returnValue = null;
window.returnValue = null;
window.close();
}
}document.onkeydown=fkeydown;
</SCRIPT>
<INPUT id=txt1 style="DISPLAY: none"> </BODY></HTML>
var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#cccccc";
var gcToggle = "#BACCE2";
var gcToggleBorder = "#666666";
var gcLinkText = '#ffff00';
var gcToggleText = '#00ff00';
var gcBG = "#efefef";
var gcTitleBG="#cccccc";
var gcTitleText="#838DA9"
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";function fSetDate(iYear, iMonth, iDay){
//VicPopCal.style.visibility = "hidden";
if ((iYear == 0) && (iMonth == 0) && (iDay == 0)){
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;
window.returnValue=gdCtrl.value;
// alert(window.returnValue);
window.close();
}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;
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('日','月','火','水','木','金','土');
var styleTitleTD = " bgcolor='"+gcTitleBG+"' bordercolor='"+gcTitleBG+"' valign='middle' align='center' width=4 height='"+iCellHeight+"' style='font-size:12px; ";
var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' width='3' height='"+iCellHeight+"' style='font-size:12px; "; with (document) {
write("<tr>");
for(i=0; i<7; i++)
write("<td "+styleTitleTD+" color:"+gcTitleText+"' style='padding:2'><b>" + WeekDay[i] + "</b></td>");
write("</tr>");//***************************************
var vv=window.dialogArguments;
var qYear = vv.substring(0,4);
var b = vv.substring(5,7);
if(b=="08"){
qMonth=7;
}
else if(b=="09"){
qMonth=8;
}else{
qMonth=parseInt(b)-1;
}
var c=vv.substring(8,10);
if(c=="08"){
qDay=8;
}
else if(c=="09"){
qDay=9;
}else{
qDay=parseInt(c);
}
if(qYear==""&&qMonth==""&&qDay==""){}
else {
var pp=new Date(qYear,qMonth,1);
var mm=pp.getDay();
var tot=mm+qDay;
var aa=tot%7;
var bb=parseInt(tot/7);
if(aa==0){
aa=6;
bb=parseInt(tot/7);
}
else{
aa=tot%7-1;
bb=parseInt(tot/7)+1;
}
}
write("<tr>");
for (d = 0; d < 7; d++) {
//begin
if(d==aa&&w==bb){
write("<td bgColor=gcBG id=calCell1 "+styleTD+"cursor:hand;' style='padding-left:4;padding-right:4;padding-top:3;padding-bottom:3' onMouseOver='this.bgColor=gcToggle;this.borderColor=gcToggleBorder' onMouseOut='this.bgColor=gcBG;this.borderColor=gcBG' onclick='fSetSelected(this)'>");
write("<font id=cellText face=Verdana><b> </b></font>");
write("</td>")
}
//end
else{
write("<td id=calCell "+styleTD+"cursor:hand;' style='padding-left:4;padding-right:4;padding-top:3;padding-bottom:3' onMouseOver='this.bgColor=gcToggle;this.borderColor=gcToggleBorder' onMouseOut='this.bgColor=gcBG;this.borderColor=gcBG' onclick='fSetSelected(this)'>");
write("<font id=cellText face=Verdana><b> </b></font>");
write("</td>")
}
}
write("</tr>");
}
}
}function fUpdateCal(iYear, iMonth) {
myMonth = fBuildCal(iYear, iMonth);
var i = 0;
//begin
var dCalDate=new Date(giYear, giMonth-1, 1);
var iDayOfFirst1=dCalDate.getDay();
var tot=iDayOfFirst1+giDay;
var aa=tot%7;
var bb=parseInt(tot/7);
if(aa==0){
aa=6;
bb=parseInt(tot/7)-1;
}
else{
aa=tot%7-1;
bb=parseInt(tot/7);
}
//end
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==aa&&w==bb&&iMonth==giMonth&&iYear==giYear){
color = "#00ff00";
}
//
else if( d == 0 ){
color = "red";
}else if( d == 6 ){
color = "red";
}else{
color = "black";
}
// End of above maxiang
innerText = myMonth[w+1][d];
}
}
}function fSetYearMon(iYear, iMon){
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(){
var iMon = tbSelMonth.value;
var iYear = tbSelYear.value;
if (--iMon<1) {
iMon = 12;
iYear--;
}
fSetYearMon(iYear, iMon);
}function fNextMonth(){
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;
}
//begin
function fAdd(){
var cal=document.all.calCell1;
if(cal){
cal.bgColor=gcBG;
}
}
//end
// 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;
//begin
var vv=window.dialogArguments;
var qYear = vv.substring(0,4);
var qMonth = vv.substring(5,7);
var qDay=vv.substring(8,10);
if(qYear==""&&qMonth==""){
fSetYearMon(giYear, giMonth);
}
else {
fSetYearMon(qYear, qMonth);
}
var point = fGetXY(popCtrl);
//end
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';
}
}//begin liu
var vv=window.dialogArguments;
var qYear = vv.substring(0,4);
var qMonth = vv.substring(5,7);
var qDay=vv.substring(8,10);
//end liu
var gMonths = new Array("1月","2月","3月","4月","5月","6月","7月","8月","9月","10月","11月","12月");
with (document) {
write("<Div id='VicPopCal' style='OVERFLOW:hidden;POSITION:absolute;VISIBILITY:hidden;border:0px ridge;width:100%;height:100%;top:0;left:0;z-index:100;overflow:hidden'>");
write("<table border='0' bgcolor='#79A6CA' cellspacing=0 cellpadding=1>");
write("<TR>");
write("<td valign='middle' align='left'>");
write(" <span title='先月' onclick='javascript:fPrevMonth(); javascript:fAdd()' onmouseover='this.style.color=gcToggleText' onMouseOut='this.style.color=gcLinkText' style='cursor:hand; font-family:webdings; color:"+gcLinkText+"'><font size=4>3</font></span> ");write("<SELECT name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value); javascript:fAdd()' Victor='Won'>");
for(i=1900;i<2031;i++){
if(qYear==""&&qMonth==""&&qDay==""){
write("<OPTION value='"+i+"'>"+i+"年</OPTION>");
}
else {
if(qYear==i){ write("<OPTION value='"+i+"' Selected>"+i+"年</OPTION>");
}
else{
write("<OPTION value='"+i+"'>"+i+"年</OPTION>");
}
}
}
write("</SELECT>");
write(" <select name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value); javascript:fAdd()' Victor='Won'>");
for (i=0; i<12; i++)
write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");write(" <span title='来月' onclick='javascript:fNextMonth(); javascript:fAdd()' onmouseover='this.style.color=gcToggleText' onMouseOut='this.style.color=gcLinkText' style='cursor:hand; font-family:webdings; color:"+gcLinkText+"'><font size=4>4</font></span>");
write(" <span title='クリア' onclick='javascript:fSetDate(0,0,0)' onmouseover='this.style.color=gcToggleText' onMouseOut='this.style.color=gcLinkText' style='cursor:hand; font-family:webdings; color:"+gcLinkText+"'><font size=4>q</font></span>");write("</td>");
write("</TR><TR>");
write("<td align='right'>");
write("<DIV style='background-color:#cccccc'><table width='100%' border='1' cellspacing=1 cellpadding=0>");
if(qYear==""&&qMonth==""&&qDay==""){
// alert("mei you");
fDrawCal(giYear, giMonth, 6, '12');
}
else {
fDrawCal(qYear, qMonth, 6, '12');
}write("</table></DIV>");
write("</td>");
write("</TR><TR><TD align='center'>");
write("<TABLE width='100%'><TR><TD align='right'>");
write("<span ID=\"CAL_B_BLANK\" style='color:"+gcLinkText+"; visibility:visible; cursor:hand; font-size:9pt' onclick='fSetDate(0,0,0)' onMouseOver='this.style.color=gcToggleText' onMouseOut='this.style.color=gcLinkText' >[ ?N???A ]</span>");write("<span style='color:"+gcLinkText+";cursor:hand; font-size:9pt' onclick='fSetDate(giYear,giMonth,giDay)' onMouseOver='this.style.color=gcToggleText' onMouseOut='this.style.color=gcLinkText' title=????> [ "+giYear+"-"+giMonth+"-"+giDay+" ]</span>");
write("</td></tr></table>");
write("</TD></TR>");
write("</TABLE></Div>");
}