<?

require($_SERVER["DOCUMENT_ROOT"]."/bitrix/header.php");

$APPLICATION->SetTitle("Статистика прохождения системы тестирования ");

CModule::IncludeModule("learning");

?>

<?

$arFilterLetter = array(">=DATE_END" => array(false, ConvertTimeStamp(time()-604800)));

$res = CTestAttempt::GetList(array(),$arFilterLetter);

while ($arAttempt = $res->GetNext())

    {

$s++;

}

$arFilterLetter = array(">=DATE_END" => array(false, ConvertTimeStamp(time()-86400 )));

$res = CTestAttempt::GetList(array(),$arFilterLetter);

while ($arAttempt = $res->GetNext())

    {

$s2++;

}

$arFilterLetter = array(">=DATE_END" => array(false, ConvertTimeStamp(time()-2592000 )));

$res = CTestAttempt::GetList(array(),$arFilterLetter);

while ($arAttempt = $res->GetNext())

    {

$s3++;

}

$arFilterLetter = array(">=DATE_END" => array(false, ConvertTimeStamp(time()-31536000 )));

$res = CTestAttempt::GetList(array(),$arFilterLetter);

while ($arAttempt = $res->GetNext())

    {

$s4++;

}

echo "За сутки: ". $s2."<br>";

echo "За неделю: ". $s."<br>";

echo "За месяц: ". $s3."<br>";

echo "За год: ". $s4."<br>";

?>

<?

$arFilterLetterOb = array("COMPLETED"=>"Y");

$resOb = CTestAttempt::GetList(array());

while ($arAttemptOb = $resOb->GetNext())

    {$Ob++;}

$arFilterLetterY = array("COMPLETED"=>"Y");

$resY = CTestAttempt::GetList(array(),$arFilterLetterY);

while ($arAttemptY = $resY->GetNext())

    {$Y++;}

$arFilterLetterN = array("COMPLETED"=>"N");

$resN = CTestAttempt::GetList(array(),$arFilterLetterN);

while ($arAttemptN = $resN->GetNext())

    {$N++;}

$Y_pr = (100/$Ob)*$Y;

$N_pr = (100/$Ob)*$N;

echo "Сдали: ".$Y_pr."%<br>";

echo "Не сдали: ".$N_pr."%<br>";

?>

<?

 $res = CTestResult::GetList(

        Array("ID" => "ASC"),

        Array("ANSWERED" => "N")

    );

    while ($arQuestionPlan = $res->GetNext())

{$res_n[$arQuestionPlan["QUESTION_NAME"]]= $res_n[$arQuestionPlan["QUESTION_NAME"]]+1;}

arsort($res_n);

foreach ($res_n as $key=>$val){echo "Самый сложный вопрос: ".$key."<br>"; break;}

$res = CTestResult::GetList(

        Array("ID" => "ASC"),

        Array("ANSWERED" => "Y")

    );

    while ($arQuestionPlan = $res->GetNext())

{$res_Y[$arQuestionPlan["QUESTION_NAME"]]= $res_Y[$arQuestionPlan["QUESTION_NAME"]]+1;}

arsort($res_Y);

foreach ($res_Y as $key=>$val){echo "Самый простой вопрос: ".$key."<br>"; break;}

?>

CTestAttempt::GetList