удаление сообщений из форума

Может где-то в коде напортачил:

<?if(!defined("B_PROLOG_INCLUDED") || B_PROLOG_INCLUDED!==true)die();?><?
IncludeTemplateLangFile(__FILE__);
if (CModule::IncludeModule("forum")):
//*******************************************************

// Infoblock items should have property with FORUM_TOPIC_ID code!

$FORUM_ID = IntVal($FORUM_ID);



$FORUM_TOPIC_ID=1;
if ($FORUM_ID>0)
{

$arForum = CForumNew::GetByID($FORUM_ID);
if (!$arForum)

$strSystemErrorMessage .= str_replace("#FORUM#", intval($FORUM_ID), GetMessage("FTR_NO_FID")).". ";

}
if ($_SERVER["REQUEST_METHOD"]=="POST") {
//    CForumMessage::CanUserDeleteMessage($_POST["MESS_ID"],$USER->GetUserGroupArray(),$USER->GetID()) = true;
   CForumMessage::Delete($_POST["MESS_ID"]);
}
?>


<?
if ($FORUM_TOPIC_ID > 0):

$parser = new textParser(LANGUAGE_ID);
$db_res = CForumMessage::GetList(Array("ID"=>"DESC"), Array("FORUM_ID"=>$FORUM_ID, "TOPIC_ID"=>$FORUM_TOPIC_ID, "APPROVED" => "Y"));


 
$db_res->NavStart(5, true);

$arAllow = array(
"HTML" => $arForum["ALLOW_HTML"],
"ANCHOR" => $arForum["ALLOW_ANCHOR"],
"BIU" => $arForum["ALLOW_BIU"],
"IMG" => $arForum["ALLOW_IMG"],
"LIST" => $arForum["ALLOW_LIST"],
"QUOTE" => $arForum["ALLOW_QUOTE"],
"CODE" => $arForum["ALLOW_CODE"],
"FONT" => $arForum["ALLOW_FONT"],
"SMILES" => $arForum["ALLOW_SMILES"],
"UPLOAD" => $arForum["ALLOW_UPLOAD"],
"NL2BR" => $arForum["ALLOW_NL2BR"]
);
?>

<?
while ($arMessage = $db_res->Fetch()):
if ($arMessage["USE_SMILES"] != "Y")
$arAllow["SMILES"] = "N";
?>
<form action="<?$APPLICATION->GetCurPageParam("a","a")?>" method="POST">
</form>
<?
endwhile;
?>
<?
endif;
?>
<?
if (IntVal($FORUM_ID)>0 && IntVal($FORUM_TOPIC_ID)>0):
$arTopic = CForumTopic::GetByID($FORUM_TOPIC_ID);
if($arTopic["APPROVED"]=="Y"):
$arForumPaths = CForumNew::GetSites($FORUM_ID);
if (isset($arForumPaths[LANG]) && strlen($arForumPaths[LANG])>0)
{
$strForumPath = CForumNew::PreparePath2Message($arForumPaths[LANG], array("FORUM_ID"=>$FORUM_ID, "TOPIC_ID"=>$FORUM_TOPIC_ID, "MESSAGE_ID"=>""));
?>
<?
}
endif;
endif;
?>

<font class="tablebodytext"> <?= $parser->convert($arMessage["POST_MESSAGE"], $arAllow); ?> <input type="hidden" name="mess_id" value="<?= htmlspecialchars($arMessage["ID"]);?>"><input type="submit" value="delete_message"> <div align="right"><?= htmlspecialchars($arMessage["AUTHOR_NAME"]); ?><br><?= htmlspecialchars($arMessage["AUTHOR_EMAIL"]); ?> <?= $arMessage["POST_DATE"]; ?></div> </font>

<font class="tablebodytext"> <?echo $db_res->NavPrint(GetMessage("NAV_OPINIONS"));?> </font>

<font class="tablebodytext"> </font>

<?





//*******************************************************
endif;
?>