<?
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php");

if (!CModule::IncludeModule('learning'))
{
	require($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/prolog_admin_after.php'); // second system's prolog

	if (IsModuleInstalled('learning') && defined('LEARNING_FAILED_TO_LOAD_REASON'))
		echo LEARNING_FAILED_TO_LOAD_REASON;
	else
		CAdminMessage::ShowMessage(GetMessage('LEARNING_MODULE_NOT_FOUND'));

	require($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/epilog_admin.php');	// system's epilog
	exit();
}

require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/learning/prolog.php");
IncludeModuleLangFile(__FILE__);

ClearVars();

$arStatus = Array(
	"B" => GetMessage('LEARNING_ATTEMPT_STATUS_B'),
	"D" => GetMessage('LEARNING_ATTEMPT_STATUS_D'),
	"F" => GetMessage('LEARNING_ATTEMPT_STATUS_F'),
	"N" => GetMessage('LEARNING_ATTEMPT_STATUS_N'),
);

$message = null;
$bVarsFromForm = false;
$ID = intval($ID);
$bBadAttempt = false;

if (!$bBadAttempt)
{
	$r = CTestAttempt::GetList(
		array(), 
		array(
			'ID' => $ID, 
			'ACCESS_OPERATIONS' => 
				CLearnAccess::OP_LESSON_READ 
				| CLearnAccess::OP_LESSON_WRITE
			)
		);
	if(!$r->ExtractFields("str_"))
		$bBadAttempt = true;

	$ar = $r->Fetch();
}

if($bBadAttempt)
{
	$APPLICATION->SetTitle(GetMessage("LEARNING_ADMIN_TITLE"));
	require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");

	$aContext = array(
		array(
			"ICON" => "btn_list",
			"TEXT"=>GetMessage("LEARNING_BACK_TO_ADMIN"),
			"LINK"=>"learn_attempt_admin.php?lang=".LANG,
			"TITLE"=>GetMessage("LEARNING_BACK_TO_ADMIN")
		),
	);
	$context = new CAdminContextMenu($aContext);
	$context->Show();

	CAdminMessage::ShowMessage(GetMessage("LEARNING_BAD_ATTEMPT_ID_EX"));

	require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/epilog_admin.php");
	die();
}

$aTabs = array(
	array(
		"DIV" => "edit1",
		"ICON"=>"main_user_edit",
		"TAB" => GetMessage("LEARNING_ADMIN_TAB1"),
		"TITLE"=>GetMessage("LEARNING_ADMIN_TAB1_EX")
	),
);
$aTabs[] = $USER_FIELD_MANAGER->EditFormTab("LEARN_ATTEMPT");

$tabControl = new CAdminForm("attemptTabControl", $aTabs);

if (!$bBadAttempt && $_SERVER["REQUEST_METHOD"] == "POST" && $Update <> '' && check_bitrix_sessid())
{
	$ta = new CTestAttempt;

	$arFields = Array(
		"SCORE" => $SCORE,
		"MAX_SCORE" => $MAX_SCORE,
		"COMPLETED" => $COMPLETED == "Y" ? "Y" : "N",
		"STATUS" => $STATUS,
		"DATE_START" => $DATE_START,
		"DATE_END" => $DATE_END,
	);
	$USER_FIELD_MANAGER->EditFormAddFields("LEARN_ATTEMPT", $arFields);

	$res = $ta->Update($ID, $arFields);

	if(!$res)
	{
		if($e = $APPLICATION->GetException())
			$message = new CAdminMessage(GetMessage("LEARNING_ERROR"), $e);

		$bVarsFromForm = true;
	}
	else
	{
		if($apply == '')
		{
			if ($return_url <> '')
				LocalRedirect($return_url);
			else
				LocalRedirect("/bitrix/admin/learn_attempt_admin.php?lang=". LANG.GetFilterParams("filter_", false));
		}

		LocalRedirect("/bitrix/admin/learn_attempt_edit.php?ID=".$ID."&tabControl_active_tab=".urlencode($tabControl_active_tab).GetFilterParams("filter_", false));
	}
}

$APPLICATION->SetTitle(GetMessage("LEARNING_ADMIN_TITLE"));

if($bVarsFromForm)
{
	$DB->InitTableVarsForEdit("b_learn_attempt", "", "str_");
}


require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");

if ($message)
	echo $message->Show();

$aContext = array(
	array(
		"ICON" => "btn_list",
		"TEXT"=>GetMessage("MAIN_ADMIN_MENU_LIST"),
		"LINK"=>"learn_attempt_admin.php?lang=".LANG.GetFilterParams("filter_"),
		"TITLE"=>GetMessage("MAIN_ADMIN_MENU_LIST")
	),
);


if ($ID > 0)
{
	$aContext[] = 	array(
		"ICON" => "btn_delete",
		"TEXT"=>GetMessage("MAIN_ADMIN_MENU_DELETE"),
		"LINK"	=> "javascript:if(confirm('".GetMessage("LEARNING_CONFIRM_DEL_MESSAGE")."'))window.location='learn_attempt_admin.php?lang=".LANG."&action=delete&ID=".$ID."&lang=".LANG."&".bitrix_sessid_get().urlencode(GetFilterParams("filter_", false))."';",
	);

}

$context = new CAdminContextMenu($aContext);
$context->Show();


?>

<br />
<b>Warning</b>:  Undefined variable $tabControl in <b>D:\ktt\ttepla.com\public_html\bitrix\modules\learning\admin\learn_attempt_edit.php</b> on line <b>161</b><br />
<br />
<b>Fatal error</b>:  Uncaught Error: Call to a member function BeginEpilogContent() on null in D:\ktt\ttepla.com\public_html\bitrix\modules\learning\admin\learn_attempt_edit.php:161
Stack trace:
#0 {main}
  thrown in <b>D:\ktt\ttepla.com\public_html\bitrix\modules\learning\admin\learn_attempt_edit.php</b> on line <b>161</b><br />