Set("section",$section);
$objListToolBar->Set("load_menu_func","");
$objListToolBar->Set("CheckClass","GroupChecks");
$listImages = array();
//$img, $alt, $link, $onMouseOver, $onMouseOut, $onClick
$objListToolBar->Add("select", "la_ToolTip_Select","#","swap('select','toolbar/tool_select_f2.gif');",
"swap('select', 'toolbar/tool_select.gif');",
"SelectSubmit();",
"tool_select.gif");
$objListToolBar->Add("cancel", "la_ToolTip_Stop","#","swap('cancel','toolbar/tool_stop_f2.gif');",
"swap('cancel', 'toolbar/tool_stop.gif');","window.close();","tool_stop.gif");
/*$objListToolBar->Add("divider");
$objListToolBar->Add("viewmenubutton", "la_ToolTip_View","#","swap('viewmenubutton','toolbar/tool_view_f2.gif'); ",
"swap('viewmenubutton', 'toolbar/tool_view.gif');",
"ShowViewMenu();","tool_view.gif");*/
$objListToolBar->AddToInitScript($listImages);
$objListToolBar->AddToInitScript("fwLoadMenus();");
$order = $objConfig->Get("GroupSelect_SortOrder");
$SelectorType = GetVar('Selector');
if(!$SelectorType) $SelectorType = 'checkbox';
$source = GetVar('source');
$objGroups->Page = GetVar('lpn');
if($source)
{
switch($source)
{
case "addcategory_permissions":
$SelectorType = "radio";
$ado = &GetADODBConnection();
$sql = "SELECT Distinct(GroupId) FROM ".GetTablePrefix()."Permissions WHERE CatId=".$_GET["CatId"];
//$sql = "SELECT Distinct(p.GroupId) FROM ".GetTablePrefix()."Permissions AS p LEFT JOIN ".GetTablePrefix()."PortalGroup AS pg ON p.GroupId = pg.GroupId WHERE p.CatId=".$_GET["CatId"]." AND pg.Personal=0";
//echo "SQL 1: $sql
";
$rs = $ado->Execute($sql);
$inlist = array();
while($rs && !$rs->EOF)
{
array_push($inlist,$rs->fields["GroupId"]);
$rs->MoveNext();
}
if(count($inlist)>0)
{
$catlist = implode(",",$inlist);
$field = $objConfig->Get("GroupSelect_SortField");
if(!strlen($field))
$field = "Name";
$orderby = trim($field." ".$order);
$sql = "SELECT * FROM ".GetTablePrefix()."PortalGroup WHERE GroupId NOT IN (".$catlist.") AND Personal = 0 ORDER BY $orderby";
//echo "SQL 4: $sql
";
$objGroups->Query_Item($sql);
}
else
$objGroups->LoadGroups("Personal = 0",trim($objConfig->Get("GroupSelect_SortField")." ".$order));
break;
case "adduser_groups":
$SelectorType = "radio";
$ado = &GetADODBConnection();
//$sql = sprintf('SELECT GroupId FROM '.GetTablePrefix().'UserGroup WHERE PortalUserId = %s', $_GET["UserId"]);
$sql = sprintf('SELECT GroupId FROM '.$objSession->GetEditTable("UserGroup").' WHERE PortalUserId = %s', $_GET["UserId"]);
$inlist = $ado->GetCol($sql);
if($inlist !== false)
{
$catlist = implode(',', $inlist);
$field = $objConfig->Get("GroupSelect_SortField");
if( !strlen($field) ) $field = "Name";
$orderby = $field." ".$order;
$sql = "SELECT * FROM ".GetTablePrefix()."PortalGroup WHERE GroupId NOT IN (".$catlist.") ORDER BY $orderby";
$objGroups->Query_Item($sql);
}
else
$objGroups->LoadGroups('',trim($objConfig->Get("GroupSelect_SortField")." ".$order));
break;
default:
$objGroups->LoadGroups('',trim($objConfig->Get("GroupSelect_SortField")." ".$order));
break;
}
}
else
{
//echo "Loading Groups..
\n";
$objGroups->LoadGroups("",trim($objConfig->Get("GroupSelect_SortField")." ".$order));
}
$objListView = new clsListView($objListToolBar,$objGroups);
$objListView->IdField = "ResourceId";
$objListView->PageLinkTemplate = $pathtoroot.$admin."/templates/user_page_link.tpl";
$objListView->ColumnHeaders->Add("Name", admin_language("la_prompt_Name"),1,0,$order,"width=\"20%\"","GroupSelect_SortField","GroupSelect_SortOrder","Name");
$objListView->ColumnHeaders->Add("Description", admin_language("la_prompt_Description"),1,0,$order,"width=\"30%\"","GroupSelect_SortField","GroupSelect_SortOrder","Description");
$objListView->ColumnHeaders->SetSort($objConfig->Get("GroupSelect_SortField"),$order);
$objListView->PrintToolBar = FALSE;
$objListView->CurrentPageVar = "Page_Grouplist";
$objListView->PerPageVar = "Perpage_Grouplist";
$objListView->CheckboxName = "itemlist[]";
$objListView->TotalItemCount = $objGroups->QueryItemCount;
$objListView->SelectorType = $SelectorType;
$objListView->extra_env = 'destform='.GetVar('destform').'&destfield='.GetVar('destfield').'&Selector='.GetVar('Selector');
$title = 'Select Group';
int_header($objListToolBar,NULL,$title);
$values = GetVar('values');
if($values) $current_value = explode(',', $values);
?>