function start_app() {
	var myloc = escape(top.frame_body.location);
	top.app_started = true;
	if (myloc.search(/dummy/i) >= 0) top.frame_body.location = "fixed/proj_search.htm";
	if (top.frame_sess.uniqueid.value == "") {
		var uniqueid = Math.floor(Math.random()*100000 + 1);
		top.frame_sess.uniqueid.value = uniqueid;
	}
	window.complete_load();
}

function complete_load() {
	if (top.frame_loaded == true && top.applet_loaded) { top.check_refresh(); }
	else { setTimeout("window.complete_load()",500); }
	return;
}

function set_footer(cmd) {
	var myrows = new Array();
	var i;
	var newrows;
	myrows = (top.frame_root.rows).split(",");
	if (cmd == "hide") myrows[myrows.length - 1] = 0;
	else myrows[myrows.length - 1] = top.footer_rows;
	newrows = myrows[0];
	for (i=1;i<myrows.length;i++) {
		newrows += "," + myrows[i];
	}
	top.frame_root.rows = newrows;
}

function load_admin() {
	if (top.test_session()) top.open_admin();
	else alert("You do not have access to this screen");
}

function open_admin() {
	var myhtml = "../fixed/admin_frame.htm";
	var winopts = "width=980,height=500,resizable=yes,scrollbars=yes,left=0,top=0";
	var mywin = top.get_window("admin_window");
	if (mywin == null) mywin = top.open_window("admin_window","",winopts);
	else mywin.focus();
	mywin.location = myhtml;
}

function load_info (myhtml) {
	var winoptions = "width=800,height=600,resizable=yes,scrollbars=yes,left=0,top=20";
	var mywin = top.get_window("ref_info");
	if (mywin == null) mywin = top.open_window("ref_info","",winoptions);
	else mywin.focus();
	mywin.location = myhtml;
}

function stop_app() {
	var i;
	var myelem;
	var mywin;
	var j;
	var k;
	var l=0;
	var mysess = top.get_session_id();

	for (i=1;i<=6;i++) {
		myelem = eval("top.frame_sess.project" + i);
		if (myelem.value != "") {
			mywin = window.open("",myelem.value);
			if (! mywin.top.proj_id) {
				mywin.close();
				for (j=0;j<100000;j++) {j=j}
				mywin = window.open("",myelem.value);
				if (! mywin.top.proj_id) myelem.value = "";
			}
			if (mywin.top.editing) {
				mywin.exit_project(mysess);
			}
			else {
				mywin.close();
			}
			while(mywin.closed != false) { j=j }
		}
	}
	top.close_all_windows();
}

function set_history(cond,orderby,param) {
	var i;
	var o = top;
	var cnt = o.srch_cnt;

	o.srch[o.srch_ptr] = new srch_head();
	o.srch[o.srch_ptr].cond = cond;
	o.srch[o.srch_ptr].order = orderby;
	o.srch[o.srch_ptr].par = new Array();
	for (i=0;i<param.length;i++) {
		o.srch[o.srch_ptr].par[i] = new srch_ref();
		o.srch[o.srch_ptr].par[i].id = param[i].id;
		o.srch[o.srch_ptr].par[i].val = param[i].val;
		o.srch[o.srch_ptr].par[i].stxt = param[i].stxt;
	}
	o.srch_ptr = (o.srch_ptr + 1) % cnt;
	o.srch_cptr = o.srch_ptr;
}