\n");
foreach( $aTopLevelClasses as $sClassName)
{
$sClassLabel = MetaModel::GetName($sClassName);
$oPage->add("
");
if (count(MetaModel::GetSubclasses($sClassName)) > 0)
{
$sActiveSubclass = ReadParam('subclassname', '');
foreach(MetaModel::GetSubclasses($sClassName) as $sSubclassName)
{
$sSubclassLabel = MetaModel::GetName($sSubclassName);
//$oSearchFilter = new CMDBSearchFilter($sSubclassName);
$oSearchFilter = $oContext->NewFilter($sSubclassName);
$oSearchFilter ->AddCondition('org_id', $sCurrentOrganization, '=');
$oPage->add("
\n");
$oPage->add("
\n");
$oPage->p("$sSubclassLabel - ".MetaModel::GetClassDescription($sSubclassName));
$oPage->add("\n");
$oPage->add("
\n");
$oSet = new CMDBObjectSet($oSearchFilter);
$iMatchesCount = $oSet->Count();
if ($iMatchesCount == 0)
{
$oPage->p("No $sSubclassLabel matches these criteria.");
$oPage->small_p("(".$oSearchFilter->__DescribeHTML().")");
}
else
{
$oPage->p("$iMatchesCount item(s) found.");
cmdbAbstractObject::DisplaySet($oPage, $oSet);
}
$oPage->p("
Create a new $sSubclassLabel\n");
$oPage->add("
\n");
}
}
else
{
// No subclasses, list the form directly
//$oSearchFilter = new CMDBSearchFilter($sClassName);
$oSearchFilter = $oContext->NewFilter($sClassName);
$oSearchFilter ->AddCondition('org_id', $sCurrentOrganization, '=');
$oPage->add("
\n");
$oPage->add("
\n");
$oPage->p("$sClassLabel - ".MetaModel::GetClassDescription($sClassName));
$oPage->add("\n");
$oPage->add("
\n");
$oPage->add("
\n");
$oSet = new CMDBObjectSet($oSearchFilter);
$iMatchesCount = $oSet->Count();
if ($iMatchesCount == 0)
{
$oPage->p("No $sClassLabel matches these criteria.");
$oPage->small_p("(".$oSearchFilter->__DescribeHTML().")");
}
else
{
$oPage->p("$iMatchesCount item(s) found.");
cmdbAbstractObject::DisplaySet($oPage, $oSet);
$oPage->small_p("(".$oSearchFilter->__DescribeHTML().")");
}
$oPage->p("
Create a new $sClassLabel\n");
$oPage->add("
\n");
$oPage->add("
\n");
}
$oPage->add("