function Put_Item(to_place, objItemsSelected, objItems)
{
	try
	{
		if (Check_MoreThenOne_Selected(objItemsSelected)==false)
		{
			if (objItemsSelected.selectedIndex!=-1)
				if (to_place!=-1)
				{
					elementp= objItemsSelected.item(objItemsSelected.selectedIndex);
					objItemsSelected.remove(objItemsSelected.selectedIndex);
					objItemsSelected.add(elementp,to_place);
					objItemsSelected.selectedIndex=to_place;
					/*
					for(i=objItemsSelected.options.length;i>=0;i--)
					{
						for(ii=objItems.options.length-1;ii>=0;ii--)
						{
							elementp= objItems.item(objItems.options(ii));
							objItems.remove(objItems.selectedIndex);
							objItems.add(elementp,i);
							objItems.selectedIndex=i;
						}
					}*/
				}
			else  alert("Please choose only one record");//alert("! אנא סמן רשומה אחת בלבד");
		}
		else
			alert("Please choose only one record");	//alert("אנא סמן רק רשומה אחת");
	}
	catch(e)
	{
		alert('Put_Item Error ' + e.message + ' occurred.'); 
	}

}

function SetDefaultView(rdSelectSome, sClientID,lbCollecion,lbSelected)
{
	var olbSelected=document.getElementById(lbSelected);
	var ordSelectSome=document.getElementById(rdSelectSome);
	var bSetDefault = true;
	
	if(olbSelected.options.length ==0)	
		ChangeView('SelectAll',sClientID,lbCollecion,lbSelected);
	else
		ordSelectSome.checked=true;
}

function ChangeView(rbId,sClientID,lbCollecion,lbSelected)
{
	var olbCollecion = document.getElementById(lbCollecion);
	var olbSelected=document.getElementById(lbSelected);
	var objSearch = eval("objSearch" + sClientID);
	
	if (rbId=="SelectAll")
	{
		Add_ALL_To_List(sClientID);		
		objSearch.value='';
		objSearch.disabled=true;
		olbCollecion.disabled=true;		
		olbSelected.disabled=true;		
	}
	else 
	{
		objSearch.disabled=false;
		olbCollecion.disabled=false;		
		olbSelected.disabled=false;
	}
}
		


function Add_ALL_To_List(sClientID)
{	
	try
	{ 
	    
		var objItemsSelected = eval("objItemsSelected" + sClientID);
		var objItemsCollection = eval("objItemsCollection" + sClientID);
		count_options=objItemsSelected.options.length;	

		for(i=count_options-1;i>=0;i--)
		{
		    objItemsSelected.options(i).selected=true;		    
		}
		Add_To_List(sClientID);
		
		count_options=objItemsCollection.options.length;	
		for(i=count_options-1;i>=0;i--)
		{
		    objItemsCollection.options(i).selected=false;		    
		}
	}
	catch(e)
	{
		alert('Add_ALL_To_List Error ' + e.message + ' occurred.'); 
	}
}

function Remove_From_List(sClientID)
{	
	try
	{
		var objItemsSelected = eval("objItemsSelected" + sClientID);
		var objItemsCollection = eval("objItemsCollection" + sClientID);
		var arrAllData = eval("ALLDATA" + sClientID);
		var objItems = eval("objItems" + sClientID);
		var objSearch = eval("objSearch" + sClientID);
         
         
		objSearch.value='';
		count_options_list=objItems.options.length;
		count_options=objItemsCollection.options.length;
		for(i=count_options-1;i>=0;i--)
		{
			if (objItemsCollection.options(i).selected)
			{ 
				
				for(ii=count_options_list-1;ii>=0;ii--)
				{
					if(objItemsCollection.options(i).value==objItems.options(ii).value)
					{	
						objItems.options(ii).selected=true;
					}
				}
				
				for(j=0;j<arrAllData.length;j++)
				{
					if (arrAllData[j].data_id==objItemsCollection.options(i).value)
					{
						arrAllData[j].selected=1;
						break;
					}	
				}
				elementp=objItemsCollection.item(i);
				elementp.selected=false;
				objItemsCollection.remove(i);
				objItemsSelected.add(elementp,0);
				
				if(IsMailingRequests && sClientID == 'slbTypes')
					SelectSubjectsByTypes();
			}
		}
	}
	catch(e)
	{
		alert('Remove_From_List Error ' + e.message + ' occurred.'); 
	}
}

function Add_To_List(sClientID)
{
try
	{
		var objItemsSelected = eval("objItemsSelected" + sClientID);
		var objItemsCollection = eval("objItemsCollection" + sClientID);
		var arrAllData = eval("ALLDATA" + sClientID);
		var objItems = eval("objItems" + sClientID);
		
		count_options_list=objItems.options.length;
		count_options=objItemsSelected.options.length;
		
		for(i=count_options-1;i>=0;i--)
		{
			if (objItemsSelected.options(i).selected)
			{ 
				for(ii=count_options_list-1;ii>=0;ii--)
				{
					if(objItemsSelected.options(i).value==objItems.options(ii).value)
					objItems.options(ii).selected=false;
				}

				for(j=0;j<arrAllData.length;j++)
				{
					if (arrAllData[j].data_id==objItemsSelected.options(i).value)
					{	
						arrAllData[j].selected=0;					
						break;
					}
				}
			elementp= objItemsSelected.item(i);
			elementp.selected=false;
			objItemsSelected.remove(i);
			objItemsCollection.add(elementp,objItemsCollection.options.length);
			
			if(IsMailingRequests && sClientID == 'slbTypes')
				SelectSubjectsByTypes();
			}
		}
	}
	catch(e)
	{
		alert('Add_To_List Error ' + e.message + ' occurred.'); 
	}
}

function Check_MoreThenOne_Selected(objItemsSelected)
{
	try
	{
		MoreTheOne=0;
		for(i=0;i<objItemsSelected.options.length;i++)
			{
				if (objItemsSelected.options(i).selected)
				{
					MoreTheOne=MoreTheOne+1;
					if (MoreTheOne==2) 
						break;
				}
			}
		if (MoreTheOne==2) 
			return true;
		else
			return false;
	}
	catch(e)
	{
		alert('Check_MoreThenOne_Selected Error ' + e.message + ' occurred.'); 
		return false;
	}
}

function PutFocusToListItem(objSearch, objItemsCollection, sClientID)
{
	try
	{
		var sCaption='';
		var ordSelectSome=document.getElementById('SelectSome_' + sClientID);
		if(ordSelectSome == null)
		{
			ordSelectSome = document.getElementById('rbChooseItem_' + sClientID);	
		}
		
		if(ordSelectSome.checked)
		{
			if(objSearch.value != "")
			{
				for(i=0;i<objItemsCollection.options.length;i++)
				{
					sCaption = objItemsCollection.options(i).text;
					objItemsCollection.options(i).selected = (sCaption.indexOf(objSearch.value)==0);
				}
			}
		}
	}
	catch(e)
	{
		alert('PutFocusToListItem Error ' + e.message + ' occurred.'); 
	}
}

function ConfirmDelete(str)
{
	return confirm(str);
}

function GetFocus()
{}

function SelectSubjectsByTypes()
{
	try
	{	
		var oListAllItems = document.getElementsByName("slbTypes:lbAllItems")(0);
		if(oListAllItems == null)
		{
			oListAllItems = document.getElementsByName("slbTypes_lbAllItems")(0);
		}
		var indx=0;
		var sTypes='';
		
		if(oListAllItems.length>0)
			for(indx=0; indx<oListAllItems.length ; indx++)
				if(oListAllItems.options(indx).selected)
					sTypes += ' or (TYPE_ID=' + oListAllItems.options(indx).value +')';
		
		if(sTypes!='')
		{
			sTypes = sTypes.substr(4);	
			sTypes = '/*/*[' + sTypes + ']';
		}
		else
		{
			sTypes = '/*/*[TYPE_ID=none]';
		}
		
		//alert(sTypes);
		
		var sXML = document.all("TypesXML").innerHTML;			
		var objXML = new ActiveXObject("Microsoft.XMLDOM");
		objXML.loadXML(sXML);
		
		var oXMLNodes = objXML.selectNodes(sTypes);
		
		//alert(oXMLNodes.length);
		//alert(oXMLNodes(0).xml)
		
		UpdateList(oXMLNodes);
		
	} 
	catch (e) 
	{ 
		alert('SelectSubjectsByTypes Error ' + e.message + ' occurred.'); 
	} 
}

function UpdateList(oXMLNodes)
{
	try
	{
		var indx=0;
		var oListCollection = document.getElementsByName("slbSubject:lbItemsCollection")(0);
		if(oListCollection == null)
		{
			oListCollection = document.getElementsByName("slbSubject_lbItemsCollection")(0);
		}
		var oListSelected = document.getElementsByName("slbSubject:lbItemsSelected")(0);
		if(oListSelected == null)
		{
			oListSelected = document.getElementsByName("slbSubject_lbItemsSelected")(0);
		}
		var oListAllItems = document.getElementsByName("slbSubject:lbAllItems")(0);
		if(oListAllItems == null)
		{
			oListAllItems = document.getElementsByName("slbSubject_lbAllItems")(0);
		}
		if(oListAllItems.length>0)
			for(indx=(oListAllItems.length-1);indx>=0;indx--)
				oListAllItems.options(indx).selected=false;		
		if(oListCollection.length>0)
			for(indx=oListCollection.length-1;indx>=0;indx--)
				oListCollection.remove(indx);
		if(oListSelected.length>0)
			for(indx=oListSelected.length-1;indx>=0;indx--)
				oListSelected.remove(indx);

		strMatchValues=';;';

		for(indx=0; indx<oXMLNodes.length ; indx++)
		{
			oNode = oXMLNodes(indx);
			SelValue = oNode.selectSingleNode("CODE_ID").text;
			strMatchValues += SelValue + ';';
		}
		var XX=0;
		var YY=0;

		for(indx=0;indx<oListAllItems.length;indx++)
		{
			opt = new Option(oListAllItems.options(indx).text, oListAllItems.options(indx).value);
			
			sVal = ';' + oListAllItems.options(indx).value + ';';
			if(strMatchValues.indexOf(sVal)>0)
			{
				XX++;				
				oListSelected.add(opt, XX);	
				oListAllItems.options(indx).selected=true;
			}
			else
			{
				YY++;				
				oListCollection.add(opt, YY);	
				oListAllItems.options(indx).selected=false;		
			}
		}
	} 
	catch (e) 
	{ 
		alert('UpdateAdvancedSearchList Error ' + e.message + ' occurred.'); 
	} 
}