' Check if multiple items exist in 
listbox, IF yes, then select those ELSE report error
         Dim AppList ,Obj
		 AppList = ListApplicationsToSelect()
         Set Obj = Browser("SMART").Page("Add User").WebList
("seiApp")
        ItemSelected = SelectMultipleListItems 
("SEI_Applications", Obj, AppList)
        SelectMultipleListItems(
	   	If  ItemSelected <> "PASS" Then
            AddUserInfo_Page1 = ItemSelected
			'Exit function 
		end if