CDav::GetIntranetSite

static function GetIntranetSite()
{
	static $intranetSite = null;

	if (is_null($intranetSite))
	{
		$arSkipSites = array();
		if (IsModuleInstalled("extranet"))
			$arSkipSites[] = COption::GetOptionString("extranet", "extranet_site", "ex");

		$arSites = array();

		$dbSite = CSite::GetList("SORT", "ASC", array("ACTIVE" => "Y"));
		while ($arSite = $dbSite->Fetch())
		{
			if (!in_array($arSite["ID"], $arSkipSites))
				$arSites[] = $arSite["ID"];
		}

		if (count($arSites) > 0)
			$intranetSite = $arSites[0];
	}

	return $intranetSite;
}