/******************************************************************** Profanity dictionary. ********************************************************************/ require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php"); \Bitrix\Main\Loader::includeModule("forum"); ClearVars(); $forumPermissions = $APPLICATION->GetGroupRight("forum"); if ($forumPermissions == "D") $APPLICATION->AuthForm(GetMessage("ACCESS_DENIED")); $forumPermWrite = CFilterUnquotableWords::FilterPerm(); IncludeModuleLangFile(__FILE__); require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/forum/prolog.php"); $bVarsFromForm = false; $ID = intval($ID); $ID = ($ID < 0) ? 0 : $ID; $DICTIONARY_ID = intval($_REQUEST["DICTIONARY_ID"]); $DICTIONARY_ID = ($DICTIONARY_ID < 0) ? 0 : $DICTIONARY_ID; $arFields = array(); /*******************************************************************/ if ($REQUEST_METHOD=="POST" && ($Update = 'Y') && $forumPermWrite && check_bitrix_sessid()) { $erMsg = array(); $APPLICATION->ResetException(); $arFields["LETTER"] = trim($LETTER); $arFields["REPLACEMENT"] = trim($REPLACEMENT); $arFields["DICTIONARY_ID"] = $DICTIONARY_ID; if ((($ID>0) && (CFilterLetter::Update($ID, $arFields))) || (CFilterLetter::Add($arFields))) LocalRedirect("forum_letter.php?DICTIONARY_ID=".$DICTIONARY_ID."&lang=".LANG); if ($ex = $APPLICATION->GetException()) $APPLICATION->ThrowException($ex->GetString()); else $APPLICATION->ThrowException(GetMessage("FLTR_NOT_SAVE")); } $bVarsFromForm = true; $sDocTitle = ($ID > 0) ? str_replace("#ID#", $ID, GetMessage("FLTR_EDIT")) : GetMessage("FLTR_NEW"); $APPLICATION->SetTitle($sDocTitle); require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php"); /*******************************************************************/ $str_LETTER = ""; $str_REPLACEMENT = ""; $str_DICTIONARY_ID = $DICTIONARY_ID; if ($ID > 0) { $db_res = CFilterLetter::GetList(array(), array("ID" => $ID)); $db_res->ExtractFields("str_", False); } if ($bVarsFromForm) $DB->InitTableVarsForEdit("b_forum_letter", "", "str_"); $aMenu = array( array( "TEXT" => GetMessage("FLTR_LIST"), "LINK" => "/bitrix/admin/forum_letter.php?DICTIONARY_ID=".$DICTIONARY_ID."&lang=".LANG, "ICON" => "btn_list", ) ); if ($ID > 0 && $forumPermWrite) { $aMenu[] = array("SEPARATOR" => "Y"); $aMenu[] = array( "TEXT" => GetMessage("FLTR_NEW"), "LINK" => "/bitrix/admin/forum_dictionary_edit.php?DICTIONARY_ID=".$DICTIONARY_ID."&lang=".LANG, "ICON" => "btn_new", ); $aMenu[] = array( "TEXT" => GetMessage("FLTR_DEL"), "LINK" => "javascript:if(confirm('".GetMessage("FLTR_DEL_CONFIRM")."')) window.location='/bitrix/admin/forum_letter.php?DICTIONARY_ID=".$DICTIONARY_ID."&lang=".LANG."&action=delete&ID[]=".$ID."&".bitrix_sessid_get()."';", "ICON" => "btn_delete", ); } $context = new CAdminContextMenu($aMenu); $context->Show(); if ($err = $APPLICATION->GetException()) CAdminMessage::ShowMessage($err->GetString()); /*******************************************************************/ $db_res = CFilterDictionary::GetList(array(), array("TYPE" => "T")); $Dict = array(); while ($res = $db_res->Fetch()) { $Dict["reference_id"][] = $res["ID"]; $Dict["reference"][] = $res["TITLE"]; } ?>