CAllIBlock::OnBeforeLangDelete

static function OnBeforeLangDelete($lang)
{
	/** @global CDatabase $DB */
	global $DB;
	/** @global CMain $APPLICATION */
	global $APPLICATION;

	$r = $DB->Query("
		SELECT IBLOCK_ID
		FROM b_iblock_site
		WHERE SITE_ID='".$DB->ForSQL($lang, 2)."'
		ORDER BY IBLOCK_ID
	");
	$arIBlocks = array();
	while($a = $r->Fetch())
		$arIBlocks[] = $a["IBLOCK_ID"];
	if(count($arIBlocks) > 0)
	{
		$APPLICATION->ThrowException(GetMessage("IBLOCK_SITE_LINKS_EXISTS", array("#ID_LIST#" => implode(", ", $arIBlocks))));
		return false;
	}
	else
	{
		return true;
	}
}