function AddAll(cAvail,cSelect)
	{
	nCurLen = document.getElementById(cSelect).length;
	document.getElementById(cSelect).length = nCurLen + document.getElementById(cAvail).length;
	if (document.getElementById(cAvail).length > 0)
		{
		for (i = 1; i <= document.getElementById(cAvail).length; i = i + 1)
			{
			document.getElementById(cSelect)[nCurLen-1+i].value = document.getElementById(cAvail)[i-1].value;
			document.getElementById(cSelect)[nCurLen-1+i].text = document.getElementById(cAvail)[i-1].text;
			}
		}
	document.getElementById(cAvail).length = 0;
	}

function AddOne(cAvail,cSelect)
	{
	cPro = "F";
	if (document.getElementById(cAvail).length > 0)
		{
		for (i = 1; i <= document.getElementById(cAvail).length; i = i + 1)
			{
			if (document.getElementById(cAvail)[i-1].selected == true)
				{
				cPro = "T";
				document.getElementById(cSelect).length = document.getElementById(cSelect).length + 1;
				document.getElementById(cSelect)[document.getElementById(cSelect).length-1].value = document.getElementById(cAvail)[i-1].value;
				document.getElementById(cSelect)[document.getElementById(cSelect).length-1].text = document.getElementById(cAvail)[i-1].text;

				for (j = i; j <= document.getElementById(cAvail).length-1; j = j + 1)
					{
					document.getElementById(cAvail)[j-1].value = document.getElementById(cAvail)[j].value;
					document.getElementById(cAvail)[j-1].text = document.getElementById(cAvail)[j].text;
					}
				}
			}
		}
	if (cPro == "T") { document.getElementById(cAvail).length = document.getElementById(cAvail).length - 1; }
	}

function RemOne(cAvail,cSelect)
	{
	cPro = "F";
	if (document.getElementById(cSelect).length > 0)
		{
		for (i = 1; i <= document.getElementById(cSelect).length; i = i + 1)
			{
			if (document.getElementById(cSelect)[i-1].selected == true)
				{
				cPro = "T";
				document.getElementById(cAvail).length = document.getElementById(cAvail).length + 1;
				document.getElementById(cAvail)[document.getElementById(cAvail).length-1].value = document.getElementById(cSelect)[i-1].value;
				document.getElementById(cAvail)[document.getElementById(cAvail).length-1].text = document.getElementById(cSelect)[i-1].text;

				for (j = i; j <= document.getElementById(cSelect).length-1; j = j + 1)
					{
					document.getElementById(cSelect)[j-1].value = document.getElementById(cSelect)[j].value;
					document.getElementById(cSelect)[j-1].text = document.getElementById(cSelect)[j].text;
					}
				}
			}
		}
	if (cPro == "T") { document.getElementById(cSelect).length = document.getElementById(cSelect).length - 1; }
	}

function RemAll(cAvail,cSelect)
	{
	nCurLen = document.getElementById(cAvail).length;
	document.getElementById(cAvail).length = nCurLen + document.getElementById(cSelect).length;
	if (document.getElementById(cSelect).length > 0)
		{
		for (i = 1; i <= document.getElementById(cSelect).length; i = i + 1)
			{
			document.getElementById(cAvail)[nCurLen-1+i].value = document.getElementById(cSelect)[i-1].value;
			document.getElementById(cAvail)[nCurLen-1+i].text = document.getElementById(cSelect)[i-1].text;
			}
		}
	document.getElementById(cSelect).length = 0;
	}