function oc_report(Obj, Evt, bSummary, bQty, bHasMore)
{
	return oc_type_sel(Obj, Evt, 'RepSrchTitle', 'r', "rep_rfi", bSummary, bQty, bHasMore, false);
}
function oc_doctype(Obj, Evt, bImportable)
{
	return oc_type_sel(Obj, Evt, 'DocSrchTitle', 'd', "ser_rfi", false, false, false, !bImportable);
}
function oc_type_sel(Obj, Evt, sTitleField, sType, sFieldID, bSummary, bQty, bHasMore, bNoImport)
{
	var Titles= document.getElementsByName('DocTitle');
	if (Titles.length <= 0) {return true;}
	var nn, jj, sReportID= '';
	var Attrs= Obj.attributes;
	for (jj= 0; jj < Attrs.length; jj++) {
		if (Attrs[jj].nodeName==sFieldID) sReportID= Attrs[jj].nodeValue;
	}
	if ('' == sReportID) {return true;}
	var nTitle= -1;
	for (nn= 0; nn < Titles.length; nn++) {
		Attrs= Titles[nn].attributes;
		for (jj= 0; jj < Attrs.length; jj++) {
			if (Attrs[jj].nodeName==sFieldID) {
				if (Attrs[jj].nodeValue == sReportID) {
					nTitle= nn;
					break;
				}
			}
		}
	}
	if (nTitle < 0) {
		return true;
	}
	for (nn= 0; nn < Titles.length; nn++) {
		Attrs= Titles[nn].attributes;
		for (jj= 0; jj < Attrs.length; jj++) {
			if (Attrs[jj].nodeName=='class' || Attrs[jj].nodeName=='CLASS') {
				Attrs[jj].nodeValue= 'DocType';
			}
		}
	}
	Attrs= Titles[nTitle].attributes;
	for (jj= 0; jj < Attrs.length; jj++) {
		if (Attrs[jj].nodeName=='class' || Attrs[jj].nodeName=='CLASS') {
			Attrs[jj].nodeValue= 'DocSel';
			var Title= document.getElementById(sTitleField);
			if (Title != null) {
				if (Title.tagName=='INPUT') {
					Title.value= Titles[nTitle].innerHTML;
				}
				else {
					Title.innerHTML= Titles[nTitle].innerHTML;
				}
			}
			break;
		}
	}
	CheckSelection(sType, sReportID, bSummary, bQty, bHasMore, bNoImport);
	return true;
}