function routine_switch_all_checked(oSrc, oDes)
{
	if(!oSrc) return;

	if (typeof(oDes) == "undefined" || oDes == null)
	{
		oDes = refElement('listchk[]', oSrc.form);
	}
	
	if(!oDes) return;

	checkbox_all_checked(oDes, oSrc.checked);
}

function refElement(rE, rF)
{
	var oF;
	if (typeof(rE) == "object") 
	{
		return rE;
	}
	else if (typeof(rE) == "string" || typeof(rF) == "number") 
	{
		if (oF = refForm(rF)) 
		{
			return oF.elements[rE];
		} 
		else 
		{
			return false;
		}
	} 
	else 
	{
		return false;
	}
}

function is_single_element(o)
{
	return (typeof(o.length) == "undefined");
}

function checkbox_all_checked(o, b)
{
	if (is_single_element(o)) 
	{
		o.checked = b;
	} 
	else 
	{
		var i;
		for (i=0; i<o.length; i++) 
		{
			o[i].checked = b;
		}
	}
}

function refForm(rF)
{
	if (typeof(rF) == "object") {
		return rF;
	} else if (typeof(rF) == "string" || typeof(rF) == "number") {
		return document.forms[rF];
	} else {
		return false;
	}
}