function padl(inString, delimStr, lenStr) {
	inStr = new String(inString);
	outStr = inStr;
	while (outStr.length < lenStr) {
		outStr = delimStr + outStr;
	}
	return outStr;
}

function getEmail(id) {
	var list = new Array(
		new Array('unk', 'feedback','www.st-boniface-episcopal.com'),
		new Array('pas', 'pastor',  'www.st-boniface-episcopal.com'),
		new Array('sec', 'secretary',  'www.st-boniface-episcopal.com'),
		new Array('shs', 'Fr.Scherck', 'nycap.rr.com'),
		new Array('fjb', 'bassettinthewood', 'gmail.com'),
		new Array('abn', 'anapoli', 'nycap.rr.com'),
		new Array('jpn', 'jnapoli', 'nycap.rr.com'),
		new Array('bb',  'rmntboynton', 'aol.com'),
		new Array('bc',  'rconklin4','nycap.rr.com'),
		new Array('be',  'WEmerson106', 'aol.com'),
		new Array('cg',  'cgiglio', 'nycap.rr.com'),
		new Array('cdp', 'cdarbeau', 'nycap.rr.com'),
		new Array('ck',  'camkesq', 'aol.com'),
		new Array('hh',  'hhuth',   'verizon.net'),
		new Array('kb',  'kathybrittell', 'hotmail.com'),
		new Array('jp',  'JPFLIEGER', 'nycap.rr.com'),
		new Array('jv',  'vitale',   'nycap.rr.com'),
		new Array('ls',  'lynmagd3', 'hotmail.com'),
		new Array('lw',  'lwetterau', 'nycap.rr.com'),
		new Array('mb',  'mbrittel', 'nycap.rr.com'),
		new Array('pg',  'pgiglio', 'nycap.rr.com'),
		new Array('rb',  'william_bouteiller', 'dps.state.ny.us'),
		new Array('rm',  'rmason1', 'nycap.rr.com'),
		new Array('rs',  'rgs33',    'juno.com'),
		new Array('pk',  'pek_mwk',  'msn.com'),
		new Array('mw',  'mabwills', 'juno.com'),
		new Array('bon', 'bonitabryant', 'verizon.net'),
		new Array('vs',  'vgs0C', 'juno.com'),
		new Array('bek', 'choo27', 'nycap.rr.com'),
		''
	)
	// Find the entry in the array
	gotit = 0;
	for (i=0; i<list.length-1; i++) {
		if (id == list[i][0]) {
			gotit = i;
		}
	}
	return list[gotit][1] + '@' + list[gotit][2];
}

function getEmailLink(id) {
	email = getEmail(id);
	return '<a class=blue href="mailto:' + email + '">' + email + '</a>';
}

function buildTable() {
	domArray = new Array('Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday');
	var lines = getEvents();
	var ret = '';
	var qs = new Querystring();
	var dateStr = qs.get("date");
	var dateTyp = qs.get("type");
	var msg = 'Schedule for ' + dateStr;
	// dateStr is either mm/dd/yyyy or mm/yyyy or yyyy
	// change it to yyyy-mm-dd or yyyy-mm or yyyy
	testDate = '';
	if (dateTyp == 'D') 
		testDate = dateStr.substr(6,4) + '-' + dateStr.substr(0,2) + '-' + dateStr.substr(3,2);
	else if (dateTyp == 'M') 
		testDate = dateStr.substr(3,4) + '-' + dateStr.substr(0,2);
	else
		testDate = dateStr;
	var ret = '<table border="1" class="txt1">';
	ret += '<tr><td align="center" colspan="4"><h2>' + msg + '</h2></td></tr>';
	ret += '<tr><th>Date</th><th>Day</th><th>Time</th><th>Event</th></tr>';
	// Go through the array
	var preDate = '';
	for (i=0; i<lines.length-1; i++) {
		// See if it is a match
		var gotOne = 0;
		lineDate = lines[i][0];
		// lineDate has format: yyyy-mm-dd 
		yy = lineDate.substr(0,4);
		mm = lineDate.substr(5,2);
		dd = lineDate.substr(8,2);
		formDate = mm + '/' + dd + '/' + yy;
		domIdx = new Date(formDate).getDay();
		dom = domArray[domIdx];
		// dateStr has format: yyyy-mm-dd or yyyy-mm or yyyy
		if ((dateTyp == 'D' && testDate == lineDate) || 
			(dateTyp == 'M' && testDate == lineDate.substr(0,7)) ||
			(dateTyp == 'Y' && testDate == lineDate.substr(0,4)))
		{
			gotOne = 1;
		}
		if (gotOne) {
			if (preDate != '' && lines[i][0] != preDate) {
				ret += '<tr><td>&nbsp</td><td>&nbsp</td><td>&nbsp</td><td>&nbsp</td></tr>';
			}
			ret += '<tr>' + 
				'<td nowrap>' + formDate + '</td>' +
				'<td>' + dom + '</td>' +
				'<td nowrap>' + lines[i][1] + '</td>' +
				'<td>' + lines[i][2] + '</td>' +
				'</tr>';
			preDate = lineDate;
		}
	}
	ret += '</table>';
	return ret;
}

function buildHead() {
	var ret = '<table cellspacing="0" cellpadding="0" width="100%" border="0">';
	ret += '<tbody>';
	ret += '<tr>';
	ret += '<td>';
	ret += '<img alt="Welcome to St. Boniface Episcopal Church\'s Website"';
	ret += 'src="./images/sign.jpg" height="135" border=0>';
	ret += '</td>';
	ret += '<td align="center">';
	ret += '<h1>St. Boniface Episcopal Church</h1>';
	ret += '<h3>5148 Western Avenue, Guilderland, NY, 12084<br/>(518) 355-0134</h3>';
	ret += '</td>';
	ret += '<td align="right">';
	ret += '<IMG alt="Welcome to St. Boniface Episcopal Church\'s Website"';
	ret += 'src="./images/stbon2.jpg" height="135" border=0>';
	ret += '</td>';
	ret += '</tr>';
	ret += '</tbody>';
	ret += '</table>';
	return ret;
}

function writeLink(link, sub, page, name, title) {
	var special = '';
	if (title == undefined) {
		title = name;
	}
	if (sub == page) {
		special = ' bgcolor="red"';
	}
	var ret = '<td' + special +'><a href="' + link + '" title="' + title + '">' + name + '</a></td>';
	return ret;
}

function buildQuickLink(page) {
	a = splitIt(page);
	page = a[0];
	sub  = a[1];
	var ret = '';
	if (page == 'indx') {	// Not run
		ret += '<td><select style="font-size:7pt;height:17px" id="quickLinkDD" size="1" name="quickLink" onChange="quickLinksRedirect(this.options[this.selectedIndex].value)">';
		ret += '<option value="0"style="background-color:white;">Links to Other Resources</option>';
		ret += '<option value="/support/contOFTcont.htm" style="background-color:white;">Contact CIO/OFT</option>';
		ret += '</select></td>';
		ret += '<td><a href="/index.html" title="Home Page">Home</a></td>';
		ret += '<td><input type="button" class="printMode" id="printModeOn" value="Print Mode" onClick="printMode(\'on\')" title="Adjust this page for printing"></td>';
		ret += '<td><input type="button" class="printMode" id="printModeOff" value="Web Mode" onClick="printMode(\'off\')" title="Return page to normal" style="display:none;"></td>';
	}
	else if (page == 'about') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./prog_aboutus.html',  		sub, 'about',	'Winter 2009-10');
		ret += writeLink('./prog_abusXmas09.html',  	sub, 'about2',	'Christmas 09');
		ret += writeLink('./prog_abusFall09.html',  	sub, 'about3',	'Fall 09');
		ret += writeLink('./prog_aboutpriest.html',  	sub, 'priest',	'Our Pastor');
		ret += writeLink('./prog_history.html',  		sub, 'history',	'History of St. Boniface');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'brother') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./min_brother.html',   sub, 'brother', 'Brotherhood of St. Andrew');
		ret += writeLink('./open_letter.html', sub, 'open',  'Open Letter');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'build') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./min_building.html',   sub, 'build', 'Building and Grounds');
		ret += writeLink('./other_building.html', sub, 'pics',  'Pictures');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'fellow') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./min_fellowship.html',  sub, 'fellow',   'Fellowship');
		ret += writeLink('./min_coffee.html',      sub, 'coffee',   'Coffee Hour');
		//ret += writeLink('./coffee_schedule.html', sub, 'coffschd', 'Coffee Hour Schedule');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'finance') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./min_finance.html',     sub, 'finance', 'Finance');
		ret += writeLink('./min_stewardship.html', sub, 'steward', 'Stewardship');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'music') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./min_music.html',  sub, 'music',  'Music');
		ret += writeLink('./samp_music.html', sub, 'sample', 'Sample Music');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'worship') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./worship.html',           sub, 'worship',  'Worship');
		ret += writeLink('./worship_altar.html',     sub, 'altar',    'Altar');
		ret += writeLink('./worship_acolyte.html',   sub, 'acolyte',  'Acolyte&nbsp;Schedule');
		ret += writeLink('./worship_ministers.html', sub, 'minister', 'Eucharistic&nbsp;Ministers');
		ret += writeLink('./worship_lectors.html',   sub, 'lector',   'Lector&nbsp;Schedule');
		ret += writeLink('./worship_ushers.html',    sub, 'usher',    'Usher&nbsp;Schedule');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'news') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./news_1001.html', sub, '1001', 'Jan 10','January 2010');
		ret += writeLink('./news_1002.html', sub, '1002', 'Feb 10','February 2010');
		ret += writeLink('./news_1003.html', sub, '1003', 'Mar 10','March 2010');
		ret += writeLink('./news_1004.html', sub, '1004', 'Apr 10','April 2010');
		ret += writeLink('./news_1005.html', sub, '1005', 'May 10','May 2010');
		ret += writeLink('./news_1006.html', sub, '1006', 'Jun 10','June 2010');
		ret += '</tr>';
		ret += '</table>';
	}
	else if (page == 'pastor') {
		ret += '<table width="100%" border="1">';
		ret += '<tr>'; 
		ret += '<td align="left" width="210px"> </td>';
		ret += writeLink('./pastor_1001.html', sub, '1001', 'Jan 10','January 2010');
		ret += writeLink('./pastor_1002.html', sub, '1002', 'Feb 10','February 2010');
		ret += writeLink('./pastor_1003.html', sub, '1003', 'Mar 10','March 2010');
		ret += writeLink('./pastor_1004.html', sub, '1004', 'Apr 10','April 2010');
		ret += writeLink('./pastor_1005.html', sub, '1005', 'May 10','May 2010');
		ret += writeLink('./pastor_1006.html', sub, '1006', 'Jun 10','June 2010');
		ret += '</tr>';
		ret += '</table>';
	}
	else {
		ret += '<table width="100%"><tr><td align="center">';
		ret += '<font class="txt2">';
		//ret += 'Come meet our new pastor, Reverend Steven Scherck, and see what all the excitement is about at St. Boniface';
		ret += 'We hope you had a wonderful Easter. Click <a href="./prog_calendar.html">here</a> to see our busy Spring calendar';
		ret += '</font>';
		ret += '</td></tr></table>';
	}
	return ret;
}

function buildFooter() {
	var ret = ''
	//<a href="/support/contOFTcont.htm" title="Contact CIO/OFT">Contact CIO/OFT</a>
	//	<tr><td colspan="2"><hr/></td></tr>
	//	<tr>
	//	<td align="middle" colspan="2">
	//	<h4>
	//	Any question or comment about the Website:&nbsp;
	//	<script>document.write(getEmailLink('unk'))</script>
	//</h4>
	//</td>
	//</tr>
	return ret;
}

function buildMenu() {
	var ret = ''; //'<a name="menuBM">';
	ret += ' <div class="menuOuterUL">';
	ret += '  <div class="menuInnerContainer">';
	ret += '   <div class="menuTitle">Visitors Center:</div>';
	ret += '   <div class="menuInnerUL">';
	ret += '    <div class="menuLI"><a href="./index.html">Home Page</a></div>';
	ret += '    <div class="menuLI"><a href="./prog_aboutus.html" id="aboutus_link" ' +
		'onMouseOver="MM_showMenu(window.mm_aboutus,80,5,null,\'aboutus_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>About Us</a></div>';
	ret += '    <div class="menuLI"><a href="./prog_calendar.html">Calendar</a></div>';
	ret += '    <div class="menuLI"><a href="./prog_direction.html">Directions</a></div>';
	ret += '    <div class="menuLI"><a href="./prog_contactus.html">Contact us</a></div>';
	ret += '    <div class="menuLI"><a href="./prog_links.html">Other Links</a></div>';
	ret += '   </div>';
	ret += '  </div>';
	ret += '  <div class="menuInnerContainer">';
	ret += '   <div class="menuTitle">St. B News:</div>';
	ret += '   <div class="menuInnerUL">';
	ret += '    <div class="menuLI"><a href="./news_1006.html">Newsletters</a></div>';
	ret += '    <div class="menuLI"><a href="./pastor_1006.html">The Pastor\'s Page</a></div>';
	//ret += '    <div class="menuLI"><a href="./new_pastor_0904.html">We Have a Rector!</a></div>';
	//ret += '    <div class="menuLI"><a href="./other_chouse.html">Coffee House Concert</a></div>';
	//ret += '    <div class="menuLI"><a href="./other_fashion.html" title="Fashion Show">The Fashion Show</a></div>';
	//ret += '    <div class="menuLI"><a href="./other_bazaar.html">Christmas Bazaar</a></div>';
	ret += '   </div>';
	ret += '  </div>';
	ret += ' </div>';
	ret += '  <div class="menuInnerContainer">';
	ret += '   <div class="menuTitle">Ministries:</div>';
	ret += '   <div class="menuInnerUL">';
	ret += '    <div class="menuLI"><a href="./min_brother.html" id="brother_link" ' +
		'onMouseOver="MM_showMenu(window.mm_brother,80,5,null,\'brother_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>Brotherhood of St. Andrew</a></div>';	
	ret += '    <div class="menuLI"><a href="./min_building.html" id="building_link" ' +
		'onMouseOver="MM_showMenu(window.mm_building,80,5,null,\'building_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>Building and Grounds</a></div>';
	ret += '    <div class="menuLI"><a href="./min_education.html">Christian Education</a></div>';
	ret += '    <div class="menuLI"><a href="./min_fellowship.html" id="fellowship_link" ' +
		'onMouseOver="MM_showMenu(window.mm_fellowship,80,5,null,\'fellowship_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>Fellowship</a></div>';
	ret += '    <div class="menuLI"><a href="./min_finance.html" id="finance_link" ' +
		'onMouseOver="MM_showMenu(window.mm_finance,80,5,null,\'finance_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>Finance</a></div>';
	ret += '    <div class="menuLI"><a href="./min_evangelism.html">Evangelism</a></div>';
	ret += '    <div class="menuLI"><a href="./min_music.html">Music Ministry</a></div>';
	ret += '    <div class="menuLI"><a href="./min_outreach.html">Outreach</a></div>';
	ret += '    <div class="menuLI"><a href="./min_women.html">Women\'s Group</a></div>';
	ret += '    <div class="menuLI"><a href="./worship.html" id="worship_link" ' +
		'onMouseOver="MM_showMenu(window.mm_worship,80,5,null,\'worship_link\')" ' + 
		'onMouseOut="MM_startTimeout();"' +
		'>Worship</a></div>';
	ret += '   </div>';
	ret += '  </div>';
	return ret;
}

function writeLine(inStr) {
	var out = inStr;
	if (inStr.substring(0,1) == '1') {
		out = '<li>' + inStr.substring(1) + '</li>';
	}
	out = '<tr><td>' + out + '</td></tr>';
	return out;
}

function writePicsOld(pics) {
	var out = '<table cellpadding="3">';
	for (var i=0; i<pics.length; i++) {
		title = pics[i][0];
		msg   = pics[i][1];
		img	= pics[i][2];
		ori   = pics[i][3];
		out += '<tr><td><ul id="picmenu"><a href="#">' + title + '<span>' + title + '<br/>' +
			'<img src="./images/' + img + '" alt="' + title + '" ';
		if (ori == 'V')
			out += 'width="350" height="500"';
		else
			out += 'width="500" height="350"';
		out += '/>' + msg + '</span></a></li></ul></td></tr>';
	}
	out += '</table>';
	return out;
}

function writePics(pics) {
	var out = '<table cellpadding="3">';
	for (var i=0; i<pics.length; i++) {
		title = pics[i][0];
		msg   = pics[i][1];
		img	= pics[i][2];
		ori   = pics[i][3];
		if (ori == 'V') {
			wid ="350";
			hgt ="500";
			lwid ="90";
			lhgt ="125";
		}
		else {
			wid ="500";
			hgt ="350";
			lwid ="125";
			lhgt ="90";
		}
		out += '<tr><td><img src="./images/' + img + '" ' +
			'width="' + lwid + '" height="' +lhgt + '" ' +
			'name="Image' + i + '" ' +
			'onclick="javascript:Image' + i + '.width=' + wid + ';Image' + i + ';height=' + hgt + '" ' +
			'ondblclick="javascript:Image' + i + '.width=' + lwid + ';Image' + i + ';height=' + lhgt + '">' +
			'<br/>' + title + '</td>' +
			'<td valign="center">' + msg + '</td>' +
			'</tr>';
	}
	out += '</table>';
	return out;
}

function mmLoadMenus() {
	window.mm_worship = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_worship.addMenuItem("Worship", "location='./worship.html'");
		mm_worship.addMenuItem("Altar", "location='./worship_altar.html'");
		mm_worship.addMenuItem("Acolytes", "location='./worship_acolyte.html'");
		mm_worship.addMenuItem("Eucharistic Ministers", "location='./worship_ministers.html'");
		mm_worship.addMenuItem("Lectors", "location='./worship_lectors.html'");
		mm_worship.addMenuItem("Ushers", "location='./worship_ushers.html'");
		mm_worship.hideOnMouseOut=true;
		//mm_worship.bgColor='#EEEEEE';
		//mm_worship.menuBorder=1;
		//mm_worship.menuLiteBgColor='#FFFFFF';
		//mm_worship.menuBorderBgColor='#D8D5B6';

	window.mm_brother = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_brother.addMenuItem("Brotherhood of St. Andrew", "location='./min_brother.html'");
		mm_brother.addMenuItem("Open Letter", "location='./open_letter.html'");
		mm_brother.hideOnMouseOut=true;

	window.mm_building = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_building.addMenuItem("Building Report", "location='./min_building.html'");
		mm_building.addMenuItem("Building Pictures", "location='./other_building.html'");
		mm_building.hideOnMouseOut=true;

	window.mm_fellowship = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_fellowship.addMenuItem("Fellowship", "location='./min_fellowship.html'");
		mm_fellowship.addMenuItem("Coffee Hour", "location='./min_coffee.html'");
		//mm_fellowship.addMenuItem("Coffee Hour Schedule", "location='./coffee_schedule.html'");
		mm_fellowship.hideOnMouseOut=true;
		//mm_fellowship.bgColor='#EEEEEE';
		//mm_fellowship.menuBorder=1;
		//mm_fellowship.menuLiteBgColor='#FFFFFF';
		//mm_fellowship.menuBorderBgColor='#666666';

	window.mm_finance = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_finance.addMenuItem("Finance", "location='./min_finance.html'");
		mm_finance.addMenuItem("Stewardship", "location='./min_stewardship.html'");
		mm_finance.hideOnMouseOut=true;
		//mm_finance.bgColor='#EEEEEE';
		//mm_finance.menuBorder=1;
		//mm_finance.menuLiteBgColor='#FFFFFF';
		//mm_finance.menuBorderBgColor='#666666';

	window.mm_aboutus = new Menu("root",180,18,"arial,sans-serif,helvetica",12,"#000000","#0102BF","#D8D5B6","#D8D5B6","left","middle",3,0,1000,-5,7,true,true,true,0,true,true);
		mm_aboutus.addMenuItem("About Us", "location='./prog_aboutus.html'");
		mm_aboutus.addMenuItem("Christmas 09", "location='./prog_abusXmas09.html'");
		mm_aboutus.addMenuItem("Fall 2009", "location='./prog_abusFall09.html'");
		mm_aboutus.addMenuItem("Our Rector and Secretary", "location='./prog_aboutpriest.html'");
		mm_aboutus.addMenuItem("History", "location='./prog_history.html'");
		//mm_aboutus.addMenuItem("2006 Report", "location='./prog_report06.html'");
		//mm_aboutus.addMenuItem("2007 Report", "location='./prog_report07.html'");
		mm_aboutus.hideOnMouseOut=true;
		//mm_aboutus.bgColor='#EEEEEE';
		//mm_aboutus.menuBorder=1;
		//mm_aboutus.menuLiteBgColor='#FFFFFF';
		//mm_aboutus.menuBorderBgColor='#666666';

	mm_aboutus.writeMenus();
}

function splitIt(inStr) {
	var ret = ['', ''];
	var idx = inStr.indexOf('.');
	if (idx > 0) {
		ret[0] = inStr.substring(0,idx);
		ret[1] = inStr.substring(idx+1);
	}
	else {
		ret[0] = inStr;
	}
	return ret;
}