// Event Calendar
// copyright Stephen Chapman, 10th June 2006, 30th October 2006
var tb = 'b'; // top or bottom (t or b)
var todaybg = ' #ECEDED'; // current selected date background colour
var textclr = '#7B96A0'; // text colour
var linkclr = '#c04242'; // link text colour
var headbg= '#c04242';
var noMessage =  ''; // message to display when no entry in array
var nextEvent='Next events from today'
var dateFormat='1'
var dA = new Array(); var x = 0;
// first 8 characters in ccyymmdd format for single date events
// first 8 characters in 0000mmdd format for every year events
//dA[x++] = "00000101 New Year";
//dA[x++] = "20080104 Torunn";
dA[x++] = "20080325 Aqua Sur (Chile), 25-29", dA[x++] = "20080422 European Seafood Exposition (Brussels), 22-24/4", dA[x++] = "20080519 WAS 2008 (Korea), 19-23/5", dA[x++] = "20080521 Aquaculture UK 2008, 21-22/5", dA[x++] = "20080530 Re-opening Skretting ARC Fish Trials Station (Norway)", dA[x++] = "20080602 XIII International Symposium (Brasil), 2-5/6", dA[x++] = "20080630 Food for future & Bocuse   \'Or Europe (Stavanger), 30/6-2/7", dA[x++] = "20080803 Skretting Australasian Aquaculture Conference", dA[x++] = "20080915 Aquaculture Europe (Polen), 15-18/9", dA[x++] = "20080923 World Food Moscow, 23-26/9", dA[x++] = "20080929 AquaVision (Stavanger, Norway), 29/10-1/10", dA[x++] = "20090303 North Atlantic Seafood Show (Norway), 3-4/3", dA[x++] = "20090315 Boston Seafood Show, 15-17/3", dA[x++] = "20090430 Entries close for Skretting GREEN award!", dA[x++] = "20090729 Australian Prawn and Barramundi Conference", dA[x++] = "20100523 Australasian Aquaculture Conference 2010 Hobart", dA[x++] = "20100607 AquaVision 2010 Stavanger, Norway"
var dList = new Array(); var y = 0;
dList[y++] = ""
// permission is granted to use this javascript provided that the below code is not altered
var pageLoaded = 0; window.onload = function() {pageLoaded = 1;}
function loaded(i,f) {if (document.getElementById && document.getElementById(i) != null) f(); else if (!pageLoaded) setTimeout('loaded(\''+i+'\','+f+')',100);
}
function monthlength(month,year) {var dd = new Date(year, month, 0);return dd.getDate();}
var moy = ['January','February','March','April','May','June','July','August','September','October','November','December'];var today = new Date();var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());
function dispCal(yy,mm) {if (mm < 0 || mm > 12) {alert('month must be between 1 and 12'); return false;} if (yy != 0 && (yy < 1901 || yy > 2100)) {alert('year must be after 1900 and before 2101'); return false;} var dow = ['Mon','Tue','Wed','Thu','Fri','Sat','Sun']; var calendar = new Date();  var today = calendar.getDate(); calendar.setDate(1); if (yy > 1900) calendar.setFullYear(yy); if (mm > 0) calendar.setMonth(mm - 1); var yy = year = calendar.getFullYear(); var month = calendar.getMonth(); calendar.setDate(today); var weekday = (calendar.getDay() - 1) % 7;; var daysInMonth = monthlength(month+1,year); var hilite_start = '<td width="30" style="background:' + todaybg + '" align="center"><b>'; var td_start = '<td width="30" align="center">'; var cal = '<div id="cal"><div style="border:1pt solid #cccccc;height:150px;width:180px"><table border="0" cellspacing="0" cellpadding="2" align="center" class="events2"><tr><td colspan="7" style="background:' + headbg + '"><table border ="0" width="100%" class="calendarHeading"><tr><td align="left" ><b>' + moy[month]  + '</b></td><td align="right"><b> ' + year + '<\/b></td></tr></table><\/td><\/tr><tr>'; for(dex=0; dex < 7; dex++) {cal += td_start + dow[dex] + '</td>';} cal += '<\/tr><tr>'; var day2 = today; for (dex = today; dex > 6; dex -=7) day2 = dex; weekday -= day2 - 1; while (weekday < 0) weekday += 7; for(dex=0; dex < weekday; dex++) cal += td_start + ' <\/td>'; for(dex=1; dex <= daysInMonth; dex++) {if(weekday == 7) {cal += '</tr><tr>'; weekday = 0;} if(selDate==year+getmmdd(month+1,dex)) cal += hilite_start +'<span'+clickDate(dex,month,year) + '>'+ dex + '<\/span><\/b><\/td>'; else cal += td_start + '<span '+clickDate(dex,month,year) + '>' + dex + '<\/span><\/td>'; weekday += 1;} for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>';if (document.getElementById) {var mmb = month;  mm = month + 1; var yya = yyb = yy; if (mmb <1) {mmb += 12; yyb--;} var mma = month + 2; if (mma > 12) {mma -= 12; yya++;} var yb = yy -1; var ya = yy +1; cal += '<table border="0" cellspacing="0" cellpadding="2" width="177"><tr><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><img src="/Internet/SkrettingAustralia/webInternet.nsf/pil_linkV.gif" border="0" ></a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><img src="/Internet/SkrettingAustralia/webInternet.nsf/pil_link.gif" border="0" ></a></td></tr></table><\/tr><\/table><\/div>';} else {cal += '<div> </div>';} cal += '</div>'; return cal;}
function start() {
var x = '<br><div id="calDate" style="border:0pt solid #cccccc;width:180px"><\/div>'; 
var y = ''; 
if (tb == 't') y = x + dispCal(0,0); else y = dispCal(0,0) + x; 
document.getElementById('calendar').innerHTML = y; 
ev();
}
loaded('calendar',start);
function clickDate(day, month, year) {
var ct = nextDate(year + getmmdd(month+1,day));
if (ct == '') ct = nextDate('0000' + getmmdd(month+1,day));
if (ct == '') return 'style="color:'+textclr+'"'; else return 'style="text-decoration: underline;cursor:pointer;color:'+linkclr+'" onclick="selDate = '+year+ getmmdd(month+1,day)+'; isDate(' + day + ',' + month + ',' + year + '); return false;"';
}
function isDate(dayVal,monthVal,yearVal) {
var ct = nextDate(yearVal + getmmdd(monthVal+1,dayVal));
var ctlist = nextDateMultipleList(yearVal + getmmdd(monthVal+1,dayVal));
//if (ct == '') ct = nextDate('0000' + getmmdd(monthVal+1,dayVal));
//if (ct == '') ct = noMessage;document.getElementById('calDate').innerHTML ='<div class="events">'+selDate.toString().substr(6,2)+"."+selDate.toString().substr(4,2)+"."+ //selDate.toString().substr(0,4) + ':<br \/>' +ct + '<br><br><b>'+nextEvent+'</b><br><table border ="0" class="events"></table></div>'
;
if (ctlist == '') ct = nextDateMultipleList('0000' + getmmdd(monthVal+1,dayVal));
if (ctlist == '') ct = noMessage;document.getElementById('calDate').innerHTML ='<div class="events">'+ctlist+ '<br><br><b>'+nextEvent+'</b><br><table border ="0" class="events"></table></div>';
return false;}
function nextDate(yymmdd) {
var x = dA.length;
var output = '';
//output = output + "<div class=\"events\">";
	for (var i = 0; i < x; i++) {
		if (dA[i].substr(0,8) == yymmdd) {
			output = output + dA[i].substr(8) + "<br>";
		}
 	}
//output = output + "</div>";
return output;
}
function nextDateMultipleList(yymmdd) {
var x = dA.length;
var y = dList.length;
var output = '';
var check = false;
output = output + "<table border =\"0\" class=\"events\">";
	
	for (var t = 0; t < y; t++) {
		if (dList[t] != '') {
			
			//get current string
			var currentString =dList[t];
			
			var stringArray = currentString.split('¤');
			var date = stringArray [4];
			if(date == yymmdd && stringArray != null) {
					
					var realdate = stringArray[0];
					var title = stringArray[1];
					var URL = stringArray[2];
					var target = stringArray[3];
					if(dateFormat == 2) {
						var tempdate = new Array;
						tempdate = realdate.split('.');
						var dateFormatted = '';
						dateFormatted = tempdate[1]+'/'+tempdate[0]+'/'+tempdate[2];
					}
					
					if(URL == '' || URL == null) {
						//change date format
						if(dateFormat == 2) {
							output = output + "<tr><td valign=\"top\">" + dateFormatted+ " </td><td>  "+title+"</td></tr>";
						}
						else {
							output = output + "<tr><td valign=\"top\">" + realdate + " </td><td>  "+title+"</td></tr>";
						}
					} else {
						//change date format
						if(dateFormat == 2) {
							output = output + "<tr><td valign=\"top\">" + dateFormatted+ "</td><td>   <a href=\""+URL+"\" 										target=\""+target+"\">"+title+"</a></td></tr>";;
						}
						else {
							output = output + "<tr><td valign=\"top\">" + realdate+ "</td><td>   <a href=\""+URL+"\" 										target=\""+target+"\">"+title+"</a></td></tr>";
}
					}
					check = "true";
			}
		}
 	}
output = output + "</table>";
return output;
}
function getmmdd(mm,dd) {return (mm > 9 ? '' + mm : '0' + mm) + (dd > 9 ? dd : '0' + dd);
}
function ev() {var ct = nextDate(selDate);var ct = nextDate(selDate);if (ct == '') ct = nextDate('0000' + selDate.substr(4));if (ct == '') ct = noMessage; document.getElementById('calDate').innerHTML ='<div class="events">'+ct+'</div>';
}