function leftTrim(val)
{
	while (val.substring(0,1) == " ") {
		val = val.substring(1, val.length);
	}
	return val;
}

function rightTrim(val)
{
	while (val.substring(val.length-1, val.length) == " ") {
		val = val.substring(0,val.length-1);
	}
	return val;
}

function Trim(val)
{
	var strn = rightTrim(leftTrim(val));
	return strn;
}

function lCase(val)
{
	var strn = val.toLowerCase();
	return strn;
}

function uCase(val)
{
	var strn = val.toUpperCase();
	return strn;
}

function Left(val, n)
{
	var strn = val.substring(0, n);
	return strn;
}

function Mid(val, n)
{
	var strn = val.substring(n, val.length);
	return strn;
}

function inStr(val, strFind)
{
	n = strFind.length;
	for (i = 0; i < val.length; i++) {
		if (val.substring(i, i + n) == strFind) break;
	}
	if (i >= val.length) i = -1;
	return i;
}

function inStrRev(val, strFind)
{
	n = strFind.length;
	for (i = val.length-1; i > 0; i--) {
		if (val.substring(i, i + n) == strFind) break;
	}
	return i;
}

function isDate(dtI)
{
	try {
		var dt = Date.parse(dtI);
		if (isNaN(dt)) return false;
		if (dt < 0) return false;
		if (dt > 5000000000000) return false;
		dt = new Date(dtI);
		var dtn = new Date();
		var n = Math.abs(dt.getFullYear() - dtn.getFullYear());
		if (n > 10) return false;
		return true;
	}
	catch(e) {
		return false;
	}
}

var strMsgBoxMsg;
var bMsgOk;
var bMsgOkCancel;
var bMsgBoxAccess;

function jsMsgBoxBrowser(val, bCancel)
{
	if (bMsgOkCancel) {
		return window.confirm(val);
	}
	alert(val);
}

//	if (typeof(window.opera) != "undefined") alert("Opera not supported.");

function jsMsgBox(val, bCancel)
{
	bMsgOkCancel = bCancel;
	bMsgOk = false;
	bMsgBoxAccess = false;
	var n = 75;
	strMsgBoxMsg = new String(val);
	if (strMsgBoxMsg.length > 25) n = 150;
	if (strMsgBoxMsg.length > 100) n = 300;

	try {
		window.showModalDialog("MsgBox.htm", window, "dialogHeight:" + n + "px;dialogWidth:250px;center:yes;help:off;resizable:yes;scroll:yes;status:yes;unadorned:off;");
		if ( ! bMsgBoxAccess) return jsMsgBoxBrowser(val);
		return bMsgOk;
	}
	catch(e) {
		return jsMsgBoxBrowser(val);
	}
}