/********************************************************************
* カレンダーによる日付入力スクリプト 20100130
*
* ( 下記スクリプトは改造も可能ですがまったくいじらずにそのままペース
*   トするだけでもご利用いただけるように書いてあります )
*
====================================================================
Syntax : 

	wrtCalendarLay( formElementObject , event|position , 日付タイプ ) 

--------------------------------------------------------------------
使いたいINPUT入力タグにonFocus="wrtCalendarLay(this,event)"をペー
ストします。FORMとINPUTタグに違う名前(NAME属性)を忘れずに付けておい 
てください。ページにbodyタグを書き忘れるとエラーが出る場合があります。

====================================================================
引数 : 

	 formElementObject  入力したいフォームエレメント 

	 event|position     イベントまたは位置 
						 ( event | null | 'left,top') 
						 eventでカーソルのそばに現れる、nullで固定 
						 指定位置に表示させる場合は、
						 left,topをピクセルで指定

	 日付タイプ   
	 
						 'yyyy' → 2005 
						 'yyyy/mm' → 2005/3 
						 'yyyy/mm/dd' → 2002/2/19 
						 'mm/dd' → 12/24 
						 'mm' → 3 
						 'dd' → 31 
						 'yyyy/mm/dd[曜]' → 2002/6/4 [火] 
						 'yyyy/mm/dd(曜)' → 2002/6/4 (火) 
						 'yyyy年mm月dd日(曜)'→ 2002年2月19日(火) 
						 'mm月dd日' → 1月1日 
						 'mm月dd日(曜)' → 1月1日(木) 

						 *　デフォルトは、'yyyy/mm/dd' 
						 *  Mac版IEでは漢字の混ざるタイプは使えません。

例1 : wrtCalendarLay( this , event ) 
例2 : wrtCalendarLay( this , event , 'mm/dd' ) 
例3 : wrtCalendarLay( document.form1.element3 , event , 'mm月dd日(曜)' ) 
例4 : wrtCalendarLay( this.form.element['e0'] , event , 'yyyy年mm月dd日(曜)' ) 
//最初から指定位置に表示させる場合
例5 : body onload="wrtCalendarLay(document.calf1.e1,'250,10')"

====================================================================
Example : 

		受付日1:<input name="e1" type="text" 
								 onFocus="wrtCalendarLay(this,event)"> 

		受付日2:<input name="e2" type="text" 
								 onFocus="wrtCalendarLay(this,event,'yyyy年mm月dd日(曜)')"> 

		受付日3:<input name="e2" type="text" 
								 onFocus="wrtCalendarLay(this,'10,10','yyyy年mm月dd日(曜)')"> 

====================================================================
その他 カスタマイズ用変数 : カレンダーを使うページの日付入力スクリ
														プトまたは.js読込の前に指定してください
--------------------------------------------------------------------
	window.xDaysAfter          何日目以降を有効にするか? 
																( 無効の日はリンクがなくなり入力
																	できなくなります )

例1 : window.xDaysAfter = 3     (3日目以降が有効)
例2 : window.xDaysAfter = -10   (10日前以降が有効)
例3 : window.xDaysAfter = null  (すべての日が有効)
																	 設定しなければ自動的にnull
--------------------------------------------------------------------
*
* ------------------------------------------------------------------
* calendar.js 
* Copyright(c)1999-2005 Toshirou Takahashi tato@fureai.or.jp
* Support http://jsgt.org/mt/archives/01/000161.html
* ------------------------------------------------------------------
*/


var now    = new Date()
var absnow = now
var Win    = navigator.userAgent.indexOf('Win')!=-1
var Mac    = navigator.userAgent.indexOf('Mac')!=-1
var X11    = navigator.userAgent.indexOf('X11')!=-1
var Moz    = navigator.userAgent.indexOf('Gecko')!=-1
var msie   = navigator.userAgent.indexOf('MSIE')!=-1
var bwlang = getBrowserLANG()
var _utf   = "あ".length > 1 
var nonja  = ( _utf || bwlang == 'en')
if( nonja )
	var week   = new Array('sun','mon','tue','wed','thu','fri','sat');
else 
	var week   = new Array('日','月','火','水','木','金','土');

//何日目以降を有効にするか?
//ページ内で指定がなかった時のデフォルトをnullにする
if( !window.xDaysAfter ) var xDaysAfter  = null  ;
if( xDaysAfter != null )
			var intervaldate  = 1000 * 60 * 60 * 24 * ( xDaysAfter - 1 )
else  var intervaldate  = - 1000 * 60 * 60 * 24 * 365 * 100

//入力後退避位置
if( Mac && msie ){ var gox=2000 ; var goy=2000 }
else             { var gox=-300 ; var goy=-300 }
//Closeボタン後退避位置
if( Mac && msie ){ var goxc=2000 ; var goyc=2000 }
else             { var goxc=-300 ; var goyc=-300 }
//n4用レイヤー出力位置
if(document.layers){var n4_left=300 ; var n4_top= 100 }

calendarLay['calendar']=new calendarLay('calendar',-100,-100,'')

function wrtCalendarLay(oj,e,dateType,arg1){

	set_event__wrtCalendarLay() //イベントキャプチャースタート

	// 日付タイプデフォルト値設定と空白文字列除去
	if(!arguments[2])dateType='yyyy/mm/dd';
	else arguments[2].split(' ').join('').split('　').join('')

	// 月移動フラグデフォルト設定
	if(!arguments[3])arg1=0

	wrtCalendarLay.arg1=arg1
	wrtCalendarLay.oj=oj
	wrtCalendarLay.dateType=dateType

	// 現在初期化
	if(arg1==0)now = new Date()

	// 年月日取得
	nowdate  = now.getDate()
	nowmonth = now.getMonth()
	nowyear  = now.getYear()

	// 月移動処理
	if(nowmonth==11 && arg1 > 0){        //12月でarg1が+なら
		nowmonth = -1 + arg1 ; nowyear++   //月はarg1-1;1年加算
	} else if(nowmonth==0 && arg1 < 0){  //1月でarg1が-なら
		nowmonth = 12 + arg1 ; nowyear--   //月はarg1+12;1年減算
	} else {
		nowmonth +=  arg1                  //2-11月なら月は+arg1
	}

	// 2000年問題対応
	if(nowyear<1900)nowyear=1900+nowyear

	// 現在月を確定
	now   = new Date(nowyear,nowmonth,1)

	// YYYYMM作成
	nowyyyymm=nowyear*100+nowmonth

	// YYYY/MM作成
	nowtitleyyyymm=nowyear+'/'+(nowmonth + 1)

	// カレンダー構築用基準日の取得
	fstday   = now                                           //今月の1日
	startday = fstday - ( fstday.getDay() * 1000*60*60*24 )  //最初の日曜日
	startday = new Date(startday)

	// カレンダー構築用HTML
	ddata = ''
	ddata += '<FORM>\n'
	ddata += '<TABLE BORDER=0 BGCOLOR="#FFFFFF"  BORDERCOLOR="#dddddd" WIDTH=280 HEIGHT=140\n'
	ddata += 'STYLE="\n'
	ddata += 'font-family      : Arial;\n'
	ddata += 'font-size        : 14px;\n'
	ddata += 'border-top       : 1px outset #ffffff;\n'
	ddata += 'border-right     : 1px outset #888888;\n'
	ddata += 'border-bottom    : 1px outset #555555;\n'
	ddata += 'border-left      : 1px outset #ffffff;"\n'
	ddata += '>\n'

	// Month
	ddata += '   <TR id="trmonth" BORDERCOLOR=#6699ff HEIGHT=14>\n'
		ddata += '   <TH COLSPAN=7 HEIGHT=14 ALIGN="right"><NOBR>\n'
		ddata += '   <FONT SIZE="4" FACE="Arial">\n'
		ddata +=       nowtitleyyyymm
		ddata += '   </FONT>\n'
		ddata += '<INPUT TYPE=button VALUE="<<" \n'
		ddata += 'onClick="wrtCalendarLay(window.document.'+oj.form.name+'.'+oj.name+',null,\''+dateType+'\',-1)"\n'
		ddata += ' style="border:#999 1px solid; background:#FFF;"><INPUT TYPE=button VALUE="o" \n'
		ddata += 'onClick="wrtCalendarLay(window.document.'+oj.form.name+'.'+oj.name+',null,\''+dateType+'\',0)"\n'
		ddata += ' style="border:#999 1px solid; background:#FFF;"><INPUT TYPE=button VALUE=">>" \n'
		ddata += 'onClick="wrtCalendarLay(window.document.'+oj.form.name+'.'+oj.name+',null,\''+dateType+'\',1)" style="border:#999 1px solid; background:#FFF;">\n'
		ddata += '</NOBR></TH>\n'
	ddata += '   </TR>\n'

	// Week
	ddata += '   <TR>\n'

	for (i=0;i<7;i++){
		ddata += '   <TD WIDTH=40 style="line-height:2em; text-align:center;">\n'
		ddata += '   <FONT SIZE="2">\n'
		ddata +=       week[i]
		ddata += '   </FONT>\n'
		ddata += '   </TD>\n'
	}
	ddata += '   </TR>\n'

	// Date
	for(j=0;j<6;j++){
		ddata += '   <TR BGCOLOR=#eeeeee>\n'
		for(i=0;i<7;i++){
			nextday     = startday.getTime() + (i * 1000*60*60*24)
			wrtday      = new Date(nextday)
			wrtdate     = wrtday.getDate()
			wrtmonth    = wrtday.getMonth()
			wrtyear     = wrtday.getYear()
			if(wrtyear < 1900) wrtyear = 1900 + wrtyear
			wrtyyyymm   = wrtyear * 100 + wrtmonth
			wrtyyyymmdd = ''+wrtyear +'/'+ (wrtmonth+1) +'/'+wrtdate
			getday      = getWeek(wrtyyyymmdd)
			var outputdate=eval( getDateType(dateType))
			var sabundate = nextday-absnow.getTime()
			
			if( sabundate >= intervaldate ){
				wrtdateA  = '<A HREF="javascript:function v(){'
				wrtdateA += 'document.'+oj.form.name+'.'+oj.name+'.value=(\''+outputdate
				wrtdateA += '\');if(!(Mac&&document.layers))calendarLay[\'calendar\'].moveLAYOJ(getStyleOj(\'calendar\'),'
				wrtdateA += gox+','+goy+');stop_event__wrtCalendarLay()};v()"    style="text-decoration:none;">\n'
				wrtdateA += '<FONT COLOR=#000000>\n'
				wrtdateA += wrtdate
				wrtdateA += '</FONT>\n'
				wrtdateA += '</A>\n'
			}else{
				wrtdateA  = '<FONT COLOR=#888888>\n'
				wrtdateA += wrtdate
				wrtdateA += '</FONT>\n'
			}

			if(wrtyyyymm != nowyyyymm){ 
				ddata += ' <TD BGCOLOR=#ffffff HEIGHT=14 style="text-align:center;">\n'
				ddata += wrtdateA

			} else if(   wrtdate == absnow.getDate()   
								&& wrtmonth == absnow.getMonth() 
								&& wrtday.getYear() == absnow.getYear()){
				ddata += ' <TD BGCOLOR=#f79646 HEIGHT=14 style="text-align:center;">\n'
				ddata += '<FONT COLOR="#ffffff">'+wrtdateA+'</FONT>\n'

			} else {
				ddata += ' <TD HEIGHT=14 style="text-align:center;">\n'
				ddata += wrtdateA
			}
			ddata += '   </TD>\n'
		}
		ddata += '   </TR>\n'

		startday = new Date(nextday)
		startday = startday.getTime() + (1000*60*60*24)
		startday = new Date(startday)
	}
	// ステータス行 日付タイプ
	ddata += '   <TR>\n'
		ddata += '   <TD COLSPAN=7 ALIGN=center STYLE="font-size:11px">\n'
		 //ddata += wrtCalendarLay.dateType
		 ddata += ' <INPUT TYPE=button VALUE="close" \n'
		 ddata += 'onClick="moveLAYOJ(getStyleOj(\'calendar\'),'+goxc+','+goyc+')" style="border:#999 1px solid; background:#FFF;">\n'
		ddata += '   </TD>\n'
	ddata += '   </TR>\n'

	ddata += '</TABLE>\n'
	ddata += '</FORM>\n'
	ddata += '</BODY>\n'
	ddata += '</HTML>\n'

	calendarLay['calendar'].outputLAYOJ(getLayOj('calendar'),'')//一時クリア
	calendarLay['calendar'].outputLAYOJ(getLayOj('calendar'),ddata)


	var typeofe = (typeof e).toLowerCase()

	if(typeofe == "object"){

		if(e!=null){
			if(navigator.userAgent.indexOf('Gecko')!=-1){   //n6,m1用
				var left = e.currentTarget.offsetLeft + 1000
				var top  = e.currentTarget.offsetTop  + 100
			} else {
				var left = getMouseX(e) + 50
				var top  = getMouseY(e) - 30
			}
			if(document.layers){ var left = n4_left ; var top  = n4_top }//n4修正
		}

	} else if(typeofe == "string"){
		left = e.split(",")[0]
		top  = e.split(",")[1]
		gox  = left
		goy  = top
	}
	
	if(e!==null)
		calendarLay['calendar'].moveLAYOJ(getStyleOj('calendar'),left,top)
}

// 曜日取得
function getWeek(date){
	if(arguments.length>0)date=date
	else date=null
	if(  Mac && msie )//MacIE5用
		week   = new Array('sun','mon','tue','wed','thu','fri','sat');
	var now  = new Date(date) ;
	return week[now.getDay()] ;
}
// 出力日付のデータタイプ
function getDateType(dateType){
		if(nonja || ( Mac && msie )){ //漢字式表記の回避
			if ( dateType == 'yyyy年mm月dd日(曜)')  dateType = 'yyyy/mm/dd(曜)'
			else if( dateType == 'mm月dd日')        dateType = 'mm/dd'
			else if( dateType == 'mm月dd日(曜)')    dateType = 'mm/dd(曜)' 
		}
		switch(dateType){
			case 'yyyy'              
: dtate= "''+wrtyear                                                    " ; break ;
			case 'yyyy/mm'           
: dtate= "''+wrtyear +'/'+ (wrtmonth+1)                                 " ; break ;
			case 'yyyy/mm/dd'        
: dtate= "''+wrtyear +'/'+ (wrtmonth+1) +'/'+wrtdate                    " ; break ;
			case 'mm/dd'             
: dtate= "''+              (wrtmonth+1) +'/'+wrtdate                    " ; break ;
			case 'mm'                
: dtate= "''+              (wrtmonth+1)                                 " ; break ;
			case 'dd'                
: dtate= "''+                                wrtdate                    " ; break ;
			case 'yyyy/mm/dd[曜]'    
: dtate= "''+wrtyear +'/'+ (wrtmonth+1) +'/'+wrtdate +' ['+getday +']'  " ; break ;
			case 'yyyy/mm/dd(曜)'    
: dtate= "''+wrtyear +'/'+ (wrtmonth+1) +'/'+wrtdate +' ('+getday +')'  " ; break ;
			case 'mm/dd(曜)'    
: dtate= "''+              (wrtmonth+1) +'/'+wrtdate +' ('+getday +')'  " ; break ;
			case 'yyyy年mm月dd日(曜)'
: dtate= "''+wrtyear +'年'+ (wrtmonth+1)+'月'+wrtdate +'日('+getday +')'" ; break ;
			case 'mm月dd日'          
: dtate= "''+              (wrtmonth+1) +'月'+wrtdate +'日'             " ; break ;
			case 'mm月dd日(曜)'      
: dtate= "''+              (wrtmonth+1) +'月'+wrtdate +'日('+getday +')'" ; break ;
			default                  
: dtate= "''+wrtyear +'/'+ (wrtmonth+1) +'/'+wrtdate                    " ;
		}
	return dtate
}

//--レイヤー生成
function calendarLay(layName,x,y,dateType){
	this.id      = layName   // ドラッグできるようにするレイヤー名
	this.x       = x         // 初期left位置
	this.y       = y         // 初期top位置
	this.dateType = dateType // YYYY/MM/DD
	this.day     = new Array()
	if(document.layers)      //n4用
		this.div='<layer name="'+layName+'" left="'+x+'" top="'+y+'"\n'
						+'       onfocus="clickElement=\''+layName
																	+'\';mdown_wrtCalendarLay(event);return false">\n'
						+'<a     href="javascript:void(0)"\n'
						+'       onmousedown="clickElement=\''+layName
																	+'\';mdown_wrtCalendarLay(event);return false">\n'
						+ '</a></layer>\n'
	else                     //n4以外用
		this.div='<div  id="'+layName+'" class="dragLays"\n'
						+'      onmousedown="clickElement=\''+layName
																	+'\';mdown_wrtCalendarLay(event);return false"\n'
						+'      style="position:absolute;left:'+x+'px;top:'+y+'px">\n'
						+ '</div>\n'
	document.write(this.div)
	return 
}
calendarLay.prototype.moveLAYOJ   = moveLAYOJ   //メソッドを追加する
calendarLay.prototype.outputLAYOJ = outputLAYOJ //メソッドを追加する
calendarLay.prototype.zindexLAYOJ = zindexLAYOJ //メソッドを追加する

//--レイヤー移動
function moveLAYOJ(oj,x,y){
	if(document.getElementById){  //e5,e6,n6,m1,o6用
		oj.left = (x + "px");
		oj.top  = (y + "px");
	} else if(document.all){      //e4用
		oj.pixelLeft = (x + "px");
		oj.pixelTop  = (y + "px");
	} else if(document.layers)    //n4用
		oj.moveTo((x + "px"),(y + "px"))
}
//--HTML出力
function outputLAYOJ(oj,html){
	if(document.getElementById) oj.innerHTML=html  //n6,m1,e5,e6用
	else if(document.all) oj.innerHTML=html //e4用
	else if(document.layers)                       //n4用
		 with(oj.document){
			 open()
			 write(html)
			 close()
		}
}
//--奥行きZ座標set 
function zindexLAYOJ(oj,zindex){
	if(document.getElementById) oj.zIndex=zindex  //n6,m1,e5,e6,o6用
	else if(document.all)       oj.zIndex=zindex  //e4用
	else if(document.layers)    oj.zIndex=zindex  //n4用
}

//--layNameで指定したオブジェクトを返す(必ずonload後に実行すること)
function getLayOj(layName){  
	if(document.getElementById) 
		return document.getElementById(layName)           //e5,e6,n6,m1,o6用
	else if(document.all)   return document.all(layName)    //e4用
	else if(document.layers)return document.layers[layName] //n4用
}
function getStyleOj(clickElement){  
		 return (!!document.layers)?getLayOj(clickElement)
															 :getLayOj(clickElement).style
}

//--マウスX座標get 
function getMouseX(e){
	if(window.opera)                            //o6用
			return e.clientX
	else if(document.all)                       //e4,e5,e6用
			return document.body.scrollLeft+event.clientX
	else if(document.layers||document.getElementById)
			return e.pageX                          //n4,n6,m1用
}

//--マウスY座標get 
function getMouseY(e){
	if(window.opera)                            //o6用
			return e.clientY
	else if(document.all)                       //e4,e5,e6用
			return document.body.scrollTop+event.clientY
	else if(document.layers||document.getElementById)
			return e.pageY                          //n4,n6,m1用
}

//--レイヤ−左辺X座標get 
function getLEFT(layName){
	if(document.all)                            //e4,e5,e6,o6用
		return document.all(layName).style.pixelLeft
	else if(document.getElementById)            //n6,m1用
		return (document.getElementById(layName).style.left!="")
						?parseInt(document.getElementById(layName).style.left):""
	else if(document.layers)                    //n4用
		return document.layers[layName].left 
}

//--レイヤ−上辺Y座標get 
function getTOP(layName){
	if(document.all)                          //e4,e5,e6,o6用
		return document.all(layName).style.pixelTop
	else if(document.getElementById)          //n6,m1用
		return (document.getElementById(layName).style.top!="")
						?parseInt(document.getElementById(layName).style.top):""
	else if(document.layers)                  //n4用
		return document.layers[layName].top 
}

//--マウスカーソルを動かした時レイヤーもmoveLAYOJで動かす
function mmove_wrtCalendarLay(e) {
	if(!window.clickElement) return
	if (getLayOj(clickElement)) {
		 movetoX = getMouseX(e) - offsetX
		 movetoY = getMouseY(e) - offsetY
		 var oj=getStyleOj(clickElement)
		calendarLay[clickElement].moveLAYOJ(oj,movetoX,movetoY)
		return false
	}
}

//--マウスボタンを押し下げた時
//  レイヤー内のカーソルoffset位置取得
function mdown_wrtCalendarLay(e) {
	if(navigator.userAgent.indexOf('Gecko')!=-1)   //n6,m1用
		if(e.currentTarget.className != 'dragLays') return
		else clickElement = e.currentTarget.id
	var selLay = getLayOj(clickElement)
	if (selLay){
			offsetX = getMouseX(e) - getLEFT(selLay.id)
			offsetY = getMouseY(e) - getTOP(selLay.id)
		 if(document.layers){
			offsetX = getMouseX(e)+10 ; offsetY = getMouseY(e)+10
		 }
	}
	return false
}

//--マウスボタンを上げた時ドラッグ解除
var zcount = 0
function mup_wrtCalendarLay(e) {
	if(!window.clickElement) return
	if (getLayOj(clickElement)) {
		calendarLay[clickElement].zindexLAYOJ(
			getStyleOj(clickElement),zcount++)
		clickElement=null
	}
}

//--イベントキャプチャー開始
function set_event__wrtCalendarLay(){
	document.onmousemove = mmove_wrtCalendarLay   //n4,m1,n6,e4,e5,e6,o6用
	document.onmouseup   = mup_wrtCalendarLay     //n4,m1,n6,e4,e5,e6,o6用
	if(navigator.userAgent.indexOf('Gecko')!=-1)  //m1,n6用
		document.onmousedown = mdown_wrtCalendarLay
	if(document.layers){                          //n4用
		document.captureEvents(Event.MOUSEMOVE)
		document.captureEvents(Event.MOUSEUP)
	}
}

//--イベントキャプチャー停止
function stop_event__wrtCalendarLay(){
	document.onmousemove = null                   //n4,m1,n6,e4,e5,e6,o6用
	document.onmouseup   = null                   //n4,m1,n6,e4,e5,e6,o6用
	if(navigator.userAgent.indexOf('Gecko')!=-1)  //m1,n6用
		document.onmousedown = null
	if(document.layers){                          //n4用
		document.releaseEvents(Event.MOUSEMOVE)
		document.releaseEvents(Event.MOUSEUP)
	}
}

//--ブラウザの言語を取得
function getBrowserLANG(){
	if(document.all)                  
		return navigator.browserLanguage      //e4,e5,e6,o6用
	else if(document.layers) 
		return navigator.language             //n4用
	else if(document.getElementById) 
		return navigator.language.substr(0,2) //n6,n7,m1用
}