function html_select(name, size, ocjs, opttext, optval)
{
	var	curtext;
	var	curval;
	var	retstr;
	var	optwalk = 3;
	var	ocstr = "";

	if (ocjs != null && ocjs != "")
	{
		ocstr += ' onchange="' + ocjs + '" ';
	}
	retstr = '<SELECT NAME="' + name + '" ' + ocstr + ' SIZE="' + size + '">\n';

	while ((optwalk + 2) <= html_select.arguments.length )
	{
		retstr += html_option(html_select.arguments[optwalk],
					html_select.arguments[optwalk+1]);
		optwalk += 2;
	}
	retstr += '</SELECT>';

	return(retstr);
}

function html_option(opttext)
{
	var	optval = "";
	var	retstr;

	if (html_option.arguments.length > 1)
	{
		optval = html_option.arguments[1];
	} else {
		optval = opttext;
	}
	
	retstr = '<OPTION VALUE="' + optval + '">' + opttext + '</OPTION>\n';
	
	return(retstr);
}