<?
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php");
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/subscribe/include.php");
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/subscribe/prolog.php");

IncludeModuleLangFile(__FILE__);

$POST_RIGHT = $APPLICATION->GetGroupRight("subscribe");
if($POST_RIGHT<="D")
	$APPLICATION->AuthForm(GetMessage("ACCESS_DENIED"));

$sTableID = "tbl_subscr";
$oSort = new CAdminSorting($sTableID, "ID", "desc");
$lAdmin = new CAdminList($sTableID, $oSort);

function CheckFilter()
{
	global $lAdmin, $find_update_1, $find_update_2, $find_insert_1, $find_insert_2;

	if (trim($find_update_1) <> '' || trim($find_update_2) <> '')
	{
		$date_1_ok = false;
		$date1_stm = MkDateTime(FmtDate($find_update_1,"D.M.Y"),"d.m.Y");
		$date2_stm = MkDateTime(FmtDate($find_update_2,"D.M.Y")." 23:59","d.m.Y H:i");

		if (!$date1_stm && trim($find_update_1) <> '')
			$lAdmin->AddFilterError(GetMessage("POST_WRONG_UPDATE_FROM"));
		else
			$date_1_ok = true;

		if (!$date2_stm && trim($find_update_2) <> '')
			$lAdmin->AddFilterError(GetMessage("POST_WRONG_UPDATE_TILL"));
		elseif ($date_1_ok && $date2_stm <= $date1_stm && $date2_stm <> '')
			$lAdmin->AddFilterError(GetMessage("POST_FROM_TILL_UPDATE"));
	}

	if (trim($find_insert_1) <> '' || trim($find_insert_2) <> '')
	{
		$date_1_ok = false;
		$date1_stm = MkDateTime(FmtDate($find_insert_1,"D.M.Y"),"d.m.Y");
		$date2_stm = MkDateTime(FmtDate($find_insert_2,"D.M.Y")." 23:59","d.m.Y H:i");

		if (!$date1_stm && trim($find_insert_1) <> '')
			$lAdmin->AddFilterError(GetMessage("POST_WRONG_INSERT_FROM"));
		else
			$date_1_ok = true;

		if (!$date2_stm && trim($find_insert_2) <> '')
			$lAdmin->AddFilterError(GetMessage("POST_WRONG_INSERT_TILL"));
		elseif ($date_1_ok && $date2_stm <= $date1_stm && $date2_stm <> '')
			$lAdmin->AddFilterError(GetMessage("POST_FROM_TILL_INSERT"));
	}

	return count($lAdmin->arFilterErrors)==0;
}

$FilterArr = Array(
	"find",
	"find_type",
	"find_id",
	"find_update_1",
	"find_update_2",
	"find_insert_1",
	"find_insert_2",
	"find_user",
	"find_user_id",
	"find_anonymous",
	"find_active",
	"find_email",
	"find_format",
	"find_confirmed",
	"find_distribution",
	);

$lAdmin->InitFilter($FilterArr);

if (CheckFilter())
{
	$arFilter = Array(
		"ID"		=> ($find!="" && $find_type == "id"? $find:$find_id),
		"EMAIL"		=> ($find!="" && $find_type == "email"? $find:$find_email),
		"UPDATE_1"	=> $find_update_1,
		"UPDATE_2"	=> $find_update_2,
		"INSERT_1"	=> $find_insert_1,
		"INSERT_2"	=> $find_insert_2,
		"USER_ID"	=> $find_user_id,
		"USER"		=> ($find!="" && $find_type == "user"? $find:$find_user),
		"ANONYMOUS"	=> $find_anonymous,
		"CONFIRMED"	=> $find_confirmed,
		"ACTIVE"	=> $find_active,
		"FORMAT"	=> $find_format,
		"DISTRIBUTION"	=> $find_distribution,
	);
}

if($lAdmin->EditAction() && $POST_RIGHT=="W")
{
	foreach($FIELDS as $ID=>$arFields)
	{
		if(!$lAdmin->IsUpdated($ID))
			continue;
		$DB->StartTransaction();
		$ID = intval($ID);
		$ob = new CSubscription;
		if(!$ob->Update($ID, $arFields))
		{
			$lAdmin->AddUpdateError(GetMessage("POST_SAVE_ERROR").$ID.": ".$ob->LAST_ERROR, $ID);
			$DB->Rollback();
		}
		$DB->Commit();
	}
}

$strError = $strOk = "";

if(($arID = $lAdmin->GroupAction()) && $POST_RIGHT=="W")
{
	if($_REQUEST['action_target']=='selected')
	{
		$cData = new CSubscription;
		$rsData = $cData->GetList(array($by=>$order), $arFilter);
		while($arRes = $rsData->Fetch())
			$arID[] = $arRes['ID'];
	}

	foreach($arID as $ID)
	{
		if($ID == '')
			continue;
		$ID = intval($ID);
		switch($_REQUEST['action'])
		{
		case "delete":
			@set_time_limit(0);
			$DB->StartTransaction();
			if(!CSubscription::Delete($ID))
			{
				$DB->Rollback();
				$lAdmin->AddGroupError(GetMessage("subscr_del_err"), $ID);
			}
			$DB->Commit();
			break;
		case "activate":
		case "deactivate":
			$ob = new CSubscription;
			$arFields = Array("ACTIVE"=>($_REQUEST['action']=="activate"?"Y":"N"));
			if(!$ob->Update($ID, $arFields))
				$lAdmin->AddGroupError(GetMessage("subscr_save_error").$ob->LAST_ERROR, $ID);
			break;
		case "confirm":
			$ob = new CSubscription;
			$arFields = Array("CONFIRMED"=>"Y");
			if(!$ob->Update($ID, $arFields))
				$lAdmin->AddGroupError(GetMessage("subscr_save_error").$ob->LAST_ERROR, $ID);
			break;
		}

	}
}

$cData = new CSubscription;
$rsData = $cData->GetList(array($by=>$order), $arFilter, array("nPageSize"=>CAdminResult::GetNavSize($sTableID)));
$rsData = new CAdminResult($rsData, $sTableID);
$rsData->NavStart();
$lAdmin->NavText($rsData->GetNavPrint(GetMessage("subscr_nav")));

$lAdmin->AddHeaders(array(
	array(	"id"		=>"ID",
		"content"	=>"ID",
		"sort"		=>"id",
		"align"		=>"right",
		"default"	=>true,
	),
	array(	"id"		=>"DATE_INSERT",
		"content"	=>GetMessage("POST_DATE_INSERT"),
		"sort"		=>"date_insert",
		"default"	=>true,
	),
	array(	"id"		=>"EMAIL",
		"content"	=>GetMessage("subscr_addr"),
		"sort"		=>"email",
		"default"	=>true,
	),
	array(	"id"		=>"USER_ID",
		"content"	=>GetMessage("subscr_user"),
		"sort"		=>"user",
		"default"	=>true,
	),
	array(	"id"		=>"CONFIRMED",
		"content"	=>GetMessage("subscr_conf"),
		"sort"		=>"conf",
		"default"	=>true,
	),
	array(	"id"		=>"ACTIVE",
		"content"	=>GetMessage("subscr_act"),
		"sort"		=>"act",
		"default"	=>true,
	),
	array(	"id"		=>"FORMAT",
		"content"	=>GetMessage("subscr_fmt"),
		"sort"		=>"fmt",
		"default"	=>true,
	),
	array(	"id"		=>"DATE_UPDATE",
		"content"	=>GetMessage("subscr_updated"),
		"sort"		=>"date_update",
		"default"	=>false,
	),
	array(	"id"		=>"DATE_CONFIRM",
		"content"	=>GetMessage("subscr_conf_time"),
		"sort"		=>"date_confirm",
		"default"	=>false,
	),
	array(	"id"		=>"CONFIRM_CODE",
		"content"	=>GetMessage("subscr_conf_code"),
		"sort"		=>"confirm_code",
		"default"	=>false,
	),
));

while($arRes = $rsData->NavNext(true, "f_")):
	$row =& $lAdmin->AddRow($f_ID, $arRes);

	if($f_USER_ID > 0)
		$strUser = "[<a class='tablebodylink' href=\"/bitrix/admin/user_edit.php?ID=".$f_USER_ID."&amp;lang=".LANG."\" title=\"".GetMessage("subscr_user_edit_title")."\">".$f_USER_ID."</a>] (".$f_USER_LOGIN.") ".$f_USER_NAME." ".$f_USER_LAST_NAME;
	else
		$strUser = GetMessage("subscr_adm_anon");
	$row->AddViewField("USER_ID", $strUser);
	$row->AddCheckField("ACTIVE");
	$row->AddInputField("EMAIL", array("size"=>20));
	$row->AddViewField("EMAIL", '<a href="subscr_edit.php?ID='.$f_ID.'&amp;lang='.LANG.'" title="'.GetMessage("subscr_upd").'">'.$f_EMAIL.'</a>');
	$row->AddSelectField("FORMAT",array("text"=>GetMessage("POST_TEXT"),"html"=>GetMessage("POST_HTML")));
	$row->AddCheckField("CONFIRMED");

	$arActions = Array();

	$arActions[] = array(
		"ICON"=>"edit",
		"DEFAULT"=>true,
		"TEXT"=>GetMessage("subscr_upd"),
		"ACTION"=>$lAdmin->ActionRedirect("subscr_edit.php?ID=".$f_ID)
	);
	if ($POST_RIGHT>="W")
		$arActions[] = array(
			"ICON"=>"delete",
			"TEXT"=>GetMessage("subscr_del"),
			"ACTION"=>"if(confirm('".GetMessage("subscr_del_conf")."')) ".$lAdmin->ActionDoGroup($f_ID, "delete")
		);
	$row->AddActions($arActions);

endwhile;

$lAdmin->AddFooter(
	array(
		array("title"=>GetMessage("MAIN_ADMIN_LIST_SELECTED"), "value"=>$rsData->SelectedRowsCount()),
		array("counter"=>true, "title"=>GetMessage("MAIN_ADMIN_LIST_CHECKED"), "value"=>"0"),
	)
);
$lAdmin->AddGroupActionTable(Array(
	"delete"=>GetMessage("MAIN_ADMIN_LIST_DELETE"),
	"activate"=>GetMessage("MAIN_ADMIN_LIST_ACTIVATE"),
	"deactivate"=>GetMessage("MAIN_ADMIN_LIST_DEACTIVATE"),
	"confirm"=>GetMessage("subscr_confirm"),
	));

$aContext = array(
	array(
		"TEXT"=>GetMessage("MAIN_ADD"),
		"LINK"=>"subscr_edit.php?lang=".LANG,
		"TITLE"=>GetMessage("subscr_add_title"),
		"ICON"=>"btn_new",
	),
);
$lAdmin->AddAdminContextMenu($aContext);
$lAdmin->CheckListMode();

$APPLICATION->SetTitle(GetMessage("subscr_title"));

require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");

$oFilter = new CAdminFilter(
	$sTableID."_filter",
	array(
		GetMessage("POST_F_ID"),
		GetMessage("POST_F_INSERT"),
		GetMessage("POST_F_UPDATE"),
		GetMessage("POST_F_EMAIL"),
		GetMessage("POST_F_ANONYMOUS"),
		GetMessage("POST_F_USER_ID"),
		GetMessage("POST_F_USER"),
		GetMessage("POST_F_CONFIRMED"),
		GetMessage("POST_F_ACTIVE"),
		GetMessage("POST_F_FORMAT"),
		GetMessage("POST_F_DISTRIBUTION"),
	)
);
?>
<form name="find_form" method="get" action="<?echo $APPLICATION->GetCurPage();?>">
<?$oFilter->Begin();?>
<tr>
	<td><b><br />
<b>Fatal error</b>:  Uncaught Error: Call to undefined function GetMessage() in D:\ktt\ttepla.com\public_html\bitrix\modules\subscribe\admin\subscr_admin.php:301
Stack trace:
#0 {main}
  thrown in <b>D:\ktt\ttepla.com\public_html\bitrix\modules\subscribe\admin\subscr_admin.php</b> on line <b>301</b><br />