SetVariable('HasChanges', 0);
$pathtolocal = $pathtoroot;
//Set Section
$section = 'in-portal:mod_status';
//Set Environment Variable
$envar = "env=" . BuildEnv();
//Display header
$objListToolBar = new clsToolBar();
$objListToolBar->Set("section",$section);
$objListToolBar->Set("load_menu_func","");
$objListToolBar->Set("CheckClass","ModChecks");
$objListToolBar->Set("CheckForm","modlistform");
$listImages = array();
//$img, $alt, $link, $onMouseOver, $onMouseOut, $onClick
$objListToolBar->Add( "mod_enable",
"la_ToolTip_Enable",
"#",
"if (ModChecks.itemChecked()) swap('mod_enable','toolbar/tool_approve_f2.gif');",
"if (ModChecks.itemChecked()) swap('mod_enable', 'toolbar/tool_approve.gif');",
"if (ModChecks.itemChecked()) ModChecks.check_submit('mod_status', 'm_mod_enable');",
"tool_approve.gif");
$listImages[] = "ModChecks.addImage('mod_enable','$imagesURL/toolbar/tool_approve.gif','$imagesURL/toolbar/tool_approve_f3.gif',1); ";
$objListToolBar->Add( "mod_disable",
"la_ToolTip_Disable",
"#",
"if (ModChecks.itemChecked()) swap('mod_disable','toolbar/tool_decline_f2.gif');",
"if (ModChecks.itemChecked()) swap('mod_disable', 'toolbar/tool_decline.gif');",
"if (ModChecks.itemChecked()) ModChecks.check_submit('mod_status', 'm_mod_disable');",
"tool_decline.gif");
$listImages[] = "ModChecks.addImage('mod_disable','$imagesURL/toolbar/tool_decline.gif','$imagesURL/toolbar/tool_decline_f3.gif',1); ";
$objListToolBar->AddToInitScript($listImages);
$order = $objConfig->Get("Module_SortOrder");
$orderBy = trim($objConfig->Get("Module_SortField")." ".$order);
if(strlen($orderBy))
{
$orderBy = " ORDER BY LoadOrder,".$orderBy;
}
else
$orderBy = " ORDER BY LoadOrder";
$where = '';
$sql = "SELECT m.Name as Name,m.Version as Version, ";
$sql .="ELT(m.Loaded+1,'".admin_language("la_Text_Disabled")."','".admin_language("la_Text_Enabled")."') as Status ";
$sql .="FROM ".GetTablePrefix()."Modules as m ".$where." ".$orderBy;
if($objSession->HasSystemPermission("DEBUG.LIST"))
echo htmlentities($sql,ENT_NOQUOTES)."
\n";
$objModules->Clear();
$objModules->Query_Item($sql);
$itemcount = TableCount(GetTablePrefix()."Modules", $where,0);
$title = admin_language("la_Text_Modules")." (".$itemcount.")";
$objListView = new clsListView($objListToolBar,$objModules);
$objListView->IdField = "Name";
$objListView->PageLinkTemplate = $pathtoroot.$admin."/templates/user_page_link.tpl";
$objListView->ColumnHeaders->Add("Name", admin_language("la_prompt_Name"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Name");
$objListView->ColumnHeaders->Add("Status",admin_language("la_prompt_Status"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Status");
$objListView->ColumnHeaders->Add("Version",admin_language("la_Text_Version"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Version");
$objListView->ColumnHeaders->SetSort($objConfig->Get("Module_SortField"),$order);
$objListView->PrintToolBar = FALSE;
$objListView->SearchBar = FALSE;
$objListView->SearchAction="";
$objListView->CurrentPageVar = "Page_Modules";
$objListView->PerPageVar = "Perpage_Modules";
$objListView->CheckboxName = "itemlist[]";
$objListView->TotalItemCount = $itemcount;
int_header($objListToolBar,NULL,$title);
?>