/*

HPE - News Portal Engine
Copyright (C) 2000-2001 Mike Krus

This program is free software; it is distributed in the hope 
that it will be useful, but WITHOUT ANY WARRANTY; without 
even the implied warranty of MERCHANTABILITY or FITNESS 
FOR A PARTICULAR PURPOSE.  

READ LICENSE.TXT IN THE BASE DIRECTORY FOR INFORMATION 
ABOUT REDISTRIBUTING THIS SOURCE CODE

*/

function HPECheckSelSrc()
{
	var docObjName = (document.all) ? "document.all." : "document.";

	dml = eval(docObjName + 'HPESourceTools');
	len = dml.elements.length;
	
	var i;
	var items = new Array();
	for(i=0;i<len;i++)
	{
		if(dml.elements[i].name == 'sl[]')
		{
			if(dml.elements[i].checked)
				items.push(dml.elements[i].value);
		}
	}
	if(items.length)
	{
		return true;
	}
	else 
	{
		alert(HPENoSelectError);
		return false;
	}
}


function HPEGetSelectedSources()
{
	var docObjName = (document.all) ? "document.all." : "document.";

	dml = eval(docObjName + 'HPESourceTools');
	len = dml.elements.length;
	
	var i;
	var items = new Array();
	for(i=0;i<len;i++)
	{
		if(dml.elements[i].name == 'sl[]')
		{
			if(dml.elements[i].checked)
				items.push(dml.elements[i].value);
		}
	}
	if(items.length)
	{
		return items.join('/');
	}
	else 
	{
		alert(HPENoSelectError);
		return '';
	}
}


function HPEAddSources()
{
	selection = HPEGetSelectedSources();
	if(selection != '')
	{
		var docObjName = (document.all) ? "document.all." : "document.";

		dml = eval(docObjName + 'HPESourceTools');
		page = dml.slp.value;
		dml.action += page + '/add/';
		dml.submit();
	}
}


function HPEAddOneSource()
{
	var docObjName = (document.all) ? "document.all." : "document.";

	dml = eval(docObjName + 'HPESourceTools');
	page = dml.slp.value;
	dml.action += page + '/add/';
	dml.submit();
}