ILIAS  Release_4_0_x_branch Revision 61816
 All Data Structures Namespaces Files Functions Variables Groups Pages
Public Member Functions | Data Fields | Protected Member Functions | Private Attributes
ilTestExport Class Reference
Modules/Test

Export class for tests. More...

+ Collaboration diagram for ilTestExport:

Public Member Functions

 ilTestExport (&$a_test_obj, $a_mode="xml")
 Constructor public.
 getExtension ()
 getInstId ()
 buildExportFile ()
 build export file (complete zip file)
 buildExportResultFile ()
 build xml export file
 exportToExcel ($deliver=TRUE, $filterby="", $filtertext="", $passedonly=FALSE)
 Exports the evaluation data to the Microsoft Excel file format.
 exportToCSV ($deliver=TRUE, $filterby="", $filtertext="", $passedonly=FALSE)
 Exports the evaluation data to the CSV file format.
 buildExportFileXML ()
 build xml export file
 exportXHTMLMediaObjects ($a_export_dir)

Data Fields

 $err
 $db
 $ilias
 $test_obj
 $inst_id
 $mode

Protected Member Functions

 aggregatedResultsToExcel ($deliver=TRUE)
 Exports the aggregated results to the Microsoft Excel file format.
 aggregatedResultsToCSV ($deliver=TRUE)
 Exports the aggregated results to CSV.

Private Attributes

 $lng

Detailed Description

Export class for tests.

Author
Helmut Schottmüller helmu.nosp@m.t.sc.nosp@m.hottm.nosp@m.uell.nosp@m.er@ma.nosp@m.c.co.nosp@m.m
Version
Id:
class.ilTestExport.php 24656 2010-07-15 13:31:38Z hschottm

Definition at line 34 of file class.ilTestExport.php.

Member Function Documentation

ilTestExport::aggregatedResultsToCSV (   $deliver = TRUE)
protected

Exports the aggregated results to CSV.

Parameters
boolean$deliverTRUE to directly deliver the file, FALSE to return the data

Definition at line 226 of file class.ilTestExport.php.

References $data, $key, $separator, ilUtil\deliverData(), exit, and ilUtil\getASCIIFilename().

Referenced by exportToCSV().

{
$data = $this->test_obj->getAggregatedResultsData();
$rows = array();
array_push($rows, array(
$this->lng->txt("result"),
$this->lng->txt("value")
));
foreach ($data["overview"] as $key => $value)
{
array_push($rows, array(
$key,
$value
));
}
array_push($rows, array(
$this->lng->txt("question_title"),
$this->lng->txt("average_reached_points"),
$this->lng->txt("points"),
$this->lng->txt("percentage"),
$this->lng->txt("number_of_answers")
));
foreach ($data["questions"] as $key => $value)
{
array_push($rows, array(
$value[0],
$value[4],
$value[5],
$value[6],
$value[3]
));
}
$csv = "";
$separator = ";";
foreach ($rows as $evalrow)
{
$csvrow =& $this->test_obj->processCSVRow($evalrow, TRUE, $separator);
$csv .= join($csvrow, $separator) . "\n";
}
if ($deliver)
{
ilUtil::deliverData($csv, ilUtil::getASCIIFilename($this->test_obj->getTitle() . ".csv"));
exit;
}
else
{
return $csv;
}
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::aggregatedResultsToExcel (   $deliver = TRUE)
protected

Exports the aggregated results to the Microsoft Excel file format.

Parameters
boolean$deliverTRUE to directly deliver the file, FALSE to return the binary data

Definition at line 160 of file class.ilTestExport.php.

References $data, $key, $row, ilExcelUtils\_convert_text(), ilUtil\deliverFile(), exit, ilUtil\getASCIIFilename(), and ilUtil\ilTempnam().

Referenced by exportToExcel().

{
$data = $this->test_obj->getAggregatedResultsData();
include_once "./Services/Excel/classes/class.ilExcelWriterAdapter.php";
$excelfile = ilUtil::ilTempnam();
$adapter = new ilExcelWriterAdapter($excelfile, FALSE);
$testname = ilUtil::getASCIIFilename(preg_replace("/\s/", "_", $this->test_obj->getTitle())) . ".xls";
$workbook = $adapter->getWorkbook();
$workbook->setVersion(8); // Use Excel97/2000 Format
// Creating a worksheet
$format_percent =& $workbook->addFormat();
$format_percent->setNumFormat("0.00%");
$format_title =& $workbook->addFormat();
$format_title->setBold();
$format_title->setColor('black');
$format_title->setPattern(1);
$format_title->setFgColor('silver');
include_once "./Services/Excel/classes/class.ilExcelUtils.php";
$worksheet =& $workbook->addWorksheet(ilExcelUtils::_convert_text($this->lng->txt("tst_results_aggregated")));
$row = 0;
$col = 0;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("result")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("value")), $format_title);
$row++;
foreach ($data["overview"] as $key => $value)
{
$col = 0;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($key));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value));
$row++;
}
$row++;
$col = 0;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("question_title")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("average_reached_points")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("points")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("percentage")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("number_of_answers")), $format_title);
$row++;
foreach ($data["questions"] as $key => $value)
{
$col = 0;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value[0]));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value[4]));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value[5]));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value[6]), $format_percent);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($value[3]));
$row++;
}
$workbook->close();
if ($deliver)
{
ilUtil::deliverFile($excelfile, $testname, "application/vnd.ms-excel", false, true);
exit;
}
else
{
return $excelfile;
}
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::buildExportFile ( )

build export file (complete zip file)

public

Returns

Definition at line 107 of file class.ilTestExport.php.

References buildExportFileXML(), and buildExportResultFile().

{
switch ($this->mode)
{
case "results":
return $this->buildExportResultFile();
break;
default:
return $this->buildExportFileXML();
break;
}
}

+ Here is the call graph for this function:

ilTestExport::buildExportFileXML ( )

build xml export file

Definition at line 998 of file class.ilTestExport.php.

References $ilBench, exportXHTMLMediaObjects(), ilUtil\makeDir(), ilXmlWriter\xmlSetDtdDef(), and ilUtil\zip().

Referenced by buildExportFile().

{
global $ilBench;
$ilBench->start("TestExport", "buildExportFile");
include_once("./classes/class.ilXmlWriter.php");
$this->xml = new ilXmlWriter;
// set dtd definition
$this->xml->xmlSetDtdDef("<!DOCTYPE Test SYSTEM \"http://www.ilias.uni-koeln.de/download/dtd/ilias_co.dtd\">");
// set generated comment
$this->xml->xmlSetGenCmt("Export of ILIAS Test ".
$this->test_obj->getId()." of installation ".$this->inst.".");
// set xml header
$this->xml->xmlHeader();
// create directories
$this->test_obj->createExportDirectory();
include_once "./Services/Utilities/classes/class.ilUtil.php";
ilUtil::makeDir($this->export_dir."/".$this->subdir);
ilUtil::makeDir($this->export_dir."/".$this->subdir."/objects");
// get Log File
$expDir = $this->test_obj->getExportDirectory();
include_once "./Services/Logging/classes/class.ilLog.php";
$expLog = new ilLog($expDir, "export.log");
$expLog->delete();
$expLog->setLogFormat("");
$expLog->write(date("[y-m-d H:i:s] ")."Start Export");
// write qti file
$qti_file = fopen($this->export_dir."/".$this->subdir."/".$this->qti_filename, "w");
fwrite($qti_file, $this->test_obj->toXML());
fclose($qti_file);
// get xml content
$ilBench->start("TestExport", "buildExportFile_getXML");
$this->test_obj->exportPagesXML($this->xml, $this->inst_id,
$this->export_dir."/".$this->subdir, $expLog);
$ilBench->stop("TestExport", "buildExportFile_getXML");
// dump xml document to screen (only for debugging reasons)
/*
echo "<PRE>";
echo htmlentities($this->xml->xmlDumpMem($format));
echo "</PRE>";
*/
// dump xml document to file
$ilBench->start("TestExport", "buildExportFile_dumpToFile");
$this->xml->xmlDumpFile($this->export_dir."/".$this->subdir."/".$this->filename
, false);
$ilBench->stop("TestExport", "buildExportFile_dumpToFile");
// add media objects which were added with tiny mce
$ilBench->start("QuestionpoolExport", "buildExportFile_saveAdditionalMobs");
$this->exportXHTMLMediaObjects($this->export_dir."/".$this->subdir);
$ilBench->stop("QuestionpoolExport", "buildExportFile_saveAdditionalMobs");
// zip the file
$ilBench->start("TestExport", "buildExportFile_zipFile");
ilUtil::zip($this->export_dir."/".$this->subdir,
$this->export_dir."/".$this->subdir.".zip");
$ilBench->stop("TestExport", "buildExportFile_zipFile");
// destroy writer object
$this->xml->_XmlWriter;
$expLog->write(date("[y-m-d H:i:s] ")."Finished Export");
$ilBench->stop("TestExport", "buildExportFile");
return $this->export_dir."/".$this->subdir.".zip";
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::buildExportResultFile ( )

build xml export file

Definition at line 123 of file class.ilTestExport.php.

References $data, $file, $filename, $ilBench, $log, exportToCSV(), exportToExcel(), getExtension(), and ilUtil\makeDir().

Referenced by buildExportFile().

{
global $ilBench;
global $log;
//get Log File
$expDir = $this->test_obj->getExportDirectory();
//$expLog = &$log;
$expLog = new ilLog($expDir, "export.log");
$expLog->delete();
$expLog->setLogFormat("");
$expLog->write(date("[y-m-d H:i:s] ")."Start Export Of Results");
// make_directories
$this->test_obj->createExportDirectory();
include_once "./Services/Utilities/classes/class.ilUtil.php";
ilUtil::makeDir($this->export_dir);
$data = $this->exportToCSV($deliver = FALSE);
$file = fopen($this->export_dir."/".$this->filename, "w");
fwrite($file, $data);
fclose($file);
$excelfile = $this->exportToExcel($deliver = FALSE);
@copy($excelfile, $this->export_dir . "/" . str_replace($this->getExtension(), "xls", $this->filename));
@unlink($excelfile);
// end
$expLog->write(date("[y-m-d H:i:s] ")."Finished Export of Results");
return $this->export_dir."/".$this->filename;
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::exportToCSV (   $deliver = TRUE,
  $filterby = "",
  $filtertext = "",
  $passedonly = FALSE 
)

Exports the evaluation data to the CSV file format.

Exports the evaluation data to the CSV file format

Parameters
string$filtertextFilter text for the user data
boolean$passedonlyTRUE if only passed user datasets should be exported, FALSE otherwise public

Definition at line 762 of file class.ilTestExport.php.

References $data, $ilLog, $pass, $separator, ilObjUser\_lookupFields(), aggregatedResultsToCSV(), ilUtil\deliverData(), ilUtil\excelTime(), exit, ilUtil\getASCIIFilename(), and SCORE_BEST_PASS.

Referenced by buildExportResultFile().

{
global $ilLog;
if (strcmp($this->mode, "aggregated") == 0) return $this->aggregatedResultsToCSV($deliver);
$rows = array();
$datarow = array();
$col = 1;
if ($this->test_obj->getAnonymity())
{
array_push($datarow, $this->lng->txt("counter"));
$col++;
}
else
{
array_push($datarow, $this->lng->txt("name"));
$col++;
array_push($datarow, $this->lng->txt("login"));
$col++;
}
$additionalFields = $this->test_obj->getEvaluationAdditionalFields();
if (count($additionalFields))
{
foreach ($additionalFields as $fieldname)
{
array_push($datarow, $this->lng->txt($fieldname));
$col++;
}
}
array_push($datarow, $this->lng->txt("tst_stat_result_resultspoints"));
$col++;
array_push($datarow, $this->lng->txt("maximum_points"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_resultsmarks"));
$col++;
if ($this->test_obj->ects_output)
{
array_push($datarow, $this->lng->txt("ects_grade"));
$col++;
}
array_push($datarow, $this->lng->txt("tst_stat_result_qworkedthrough"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_qmax"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_pworkedthrough"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_timeofwork"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_atimeofwork"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_firstvisit"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_lastvisit"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_mark_median"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_rank_participant"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_rank_median"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_total_participants"));
$col++;
array_push($datarow, $this->lng->txt("tst_stat_result_median"));
$col++;
array_push($datarow, $this->lng->txt("scored_pass"));
$col++;
array_push($datarow, $this->lng->txt("pass"));
$col++;
$data =& $this->test_obj->getCompleteEvaluationData(TRUE, $filterby, $filtertext);
$headerrow = $datarow;
$counter = 1;
foreach ($data->getParticipants() as $active_id => $userdata)
{
$datarow = $headerrow;
$remove = FALSE;
if ($passedonly)
{
if ($data->getParticipant($active_id)->getPassed() == FALSE)
{
$remove = TRUE;
}
}
if (!$remove)
{
$datarow2 = array();
if ($this->test_obj->getAnonymity())
{
array_push($datarow2, $counter);
}
else
{
array_push($datarow2, $data->getParticipant($active_id)->getName());
array_push($datarow2, $data->getParticipant($active_id)->getLogin());
}
if (count($additionalFields))
{
$userfields = ilObjUser::_lookupFields($userdata->getUserID());
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "gender") == 0)
{
array_push($datarow2, $this->lng->txt("gender_" . $userfields[$fieldname]));
}
else
{
array_push($datarow2, $userfields[$fieldname]);
}
}
}
array_push($datarow2, $data->getParticipant($active_id)->getReached());
array_push($datarow2, $data->getParticipant($active_id)->getMaxpoints());
array_push($datarow2, $data->getParticipant($active_id)->getMark());
if ($this->test_obj->ects_output)
{
array_push($datarow2, $data->getParticipant($active_id)->getECTSMark());
}
array_push($datarow2, $data->getParticipant($active_id)->getQuestionsWorkedThrough());
array_push($datarow2, $data->getParticipant($active_id)->getNumberOfQuestions());
array_push($datarow2, $data->getParticipant($active_id)->getQuestionsWorkedThroughInPercent() / 100.0);
$time = $data->getParticipant($active_id)->getTimeOfWork();
$time_seconds = $time;
$time_hours = floor($time_seconds/3600);
$time_seconds -= $time_hours * 3600;
$time_minutes = floor($time_seconds/60);
$time_seconds -= $time_minutes * 60;
array_push($datarow2, sprintf("%02d:%02d:%02d", $time_hours, $time_minutes, $time_seconds));
$time = $data->getParticipant($active_id)->getQuestionsWorkedThrough() ? $data->getParticipant($active_id)->getTimeOfWork() / $data->getParticipant($active_id)->getQuestionsWorkedThrough() : 0;
$time_seconds = $time;
$time_hours = floor($time_seconds/3600);
$time_seconds -= $time_hours * 3600;
$time_minutes = floor($time_seconds/60);
$time_seconds -= $time_minutes * 60;
array_push($datarow2, sprintf("%02d:%02d:%02d", $time_hours, $time_minutes, $time_seconds));
$fv = getdate($data->getParticipant($active_id)->getFirstVisit());
$firstvisit = ilUtil::excelTime(
$fv["year"],
$fv["mon"],
$fv["mday"],
$fv["hours"],
$fv["minutes"],
$fv["seconds"]
);
array_push($datarow2, $firstvisit);
$lv = getdate($data->getParticipant($active_id)->getLastVisit());
$lastvisit = ilUtil::excelTime(
$lv["year"],
$lv["mon"],
$lv["mday"],
$lv["hours"],
$lv["minutes"],
$lv["seconds"]
);
array_push($datarow2, $lastvisit);
$median = $data->getStatistics()->getStatistics()->median();
$pct = $data->getParticipant($active_id)->getMaxpoints() ? $median / $data->getParticipant($active_id)->getMaxpoints() * 100.0 : 0;
$mark = $this->test_obj->mark_schema->getMatchingMark($pct);
$mark_short_name = "";
if (is_object($mark))
{
$mark_short_name = $mark->getShortName();
}
array_push($datarow2, $mark_short_name);
array_push($datarow2, $data->getStatistics()->getStatistics()->rank($data->getParticipant($active_id)->getReached()));
array_push($datarow2, $data->getStatistics()->getStatistics()->rank_median());
array_push($datarow2, $data->getStatistics()->getStatistics()->count());
array_push($datarow2, $median);
if ($this->test_obj->getPassScoring() == SCORE_BEST_PASS)
{
array_push($datarow2, $data->getParticipant($active_id)->getBestPass() + 1);
}
else
{
array_push($datarow2, $data->getParticipant($active_id)->getLastPass() + 1);
}
for ($pass = 0; $pass <= $data->getParticipant($active_id)->getLastPass(); $pass++)
{
$finishdate = $this->test_obj->getPassFinishDate($active_id, $pass);
if ($finishdate > 0)
{
if ($pass > 0)
{
for ($i = 1; $i < $col-1; $i++)
{
array_push($datarow2, "");
array_push($datarow, "");
}
array_push($datarow, "");
}
array_push($datarow2, $pass+1);
if (is_object($data->getParticipant($active_id)) && is_array($data->getParticipant($active_id)->getQuestions($pass)))
{
foreach ($data->getParticipant($active_id)->getQuestions($pass) as $question)
{
$question_data = $data->getParticipant($active_id)->getPass($pass)->getAnsweredQuestionByQuestionId($question["id"]);
array_push($datarow2, $question_data["reached"]);
array_push($datarow, preg_replace("/<.*?>/", "", $data->getQuestionTitle($question["id"])));
}
}
if ($this->test_obj->isRandomTest() || $this->test_obj->getShuffleQuestions() || ($counter == 1 && $pass == 0))
{
array_push($rows, $datarow);
}
$datarow = array();
array_push($rows, $datarow2);
$datarow2 = array();
}
}
$counter++;
}
}
$csv = "";
$separator = ";";
foreach ($rows as $evalrow)
{
$csvrow =& $this->test_obj->processCSVRow($evalrow, TRUE, $separator);
$csv .= join($csvrow, $separator) . "\n";
}
if ($deliver)
{
ilUtil::deliverData($csv, ilUtil::getASCIIFilename($this->test_obj->getTitle() . ".csv"));
exit;
}
else
{
return $csv;
}
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::exportToExcel (   $deliver = TRUE,
  $filterby = "",
  $filtertext = "",
  $passedonly = FALSE 
)

Exports the evaluation data to the Microsoft Excel file format.

Parameters
string$filtertextFilter text for the user data
boolean$passedonlyTRUE if only passed user datasets should be exported, FALSE otherwise public

Definition at line 283 of file class.ilTestExport.php.

References $data, $ilLog, $pass, $row, $title, ilExcelUtils\_convert_text(), ilObjUser\_lookupFields(), aggregatedResultsToExcel(), ilUtil\deliverFile(), ilUtil\excelTime(), exit, ilUtil\getASCIIFilename(), ilUtil\ilTempnam(), and SCORE_BEST_PASS.

Referenced by buildExportResultFile().

{
global $ilLog;
if (strcmp($this->mode, "aggregated") == 0) return $this->aggregatedResultsToExcel($deliver);
include_once "./Services/Excel/classes/class.ilExcelWriterAdapter.php";
$excelfile = ilUtil::ilTempnam();
$adapter = new ilExcelWriterAdapter($excelfile, FALSE);
$testname = ilUtil::getASCIIFilename(preg_replace("/\s/", "_", $this->test_obj->getTitle())) . ".xls";
$workbook = $adapter->getWorkbook();
$workbook->setVersion(8); // Use Excel97/2000 Format
// Creating a worksheet
$format_bold =& $workbook->addFormat();
$format_bold->setBold();
$format_percent =& $workbook->addFormat();
$format_percent->setNumFormat("0.00%");
$format_datetime =& $workbook->addFormat();
$format_datetime->setNumFormat("DD/MM/YYYY hh:mm:ss");
$format_title =& $workbook->addFormat();
$format_title->setBold();
$format_title->setColor('black');
$format_title->setPattern(1);
$format_title->setFgColor('silver');
include_once "./Services/Excel/classes/class.ilExcelUtils.php";
$worksheet =& $workbook->addWorksheet(ilExcelUtils::_convert_text($this->lng->txt("tst_results")));
$additionalFields = $this->test_obj->getEvaluationAdditionalFields();
$row = 0;
$col = 0;
if ($this->test_obj->getAnonymity())
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("counter")), $format_title);
}
else
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("name")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("login")), $format_title);
if (count($additionalFields))
{
foreach ($additionalFields as $fieldname)
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt($fieldname)), $format_title);
}
}
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_resultspoints")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("maximum_points")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_resultsmarks")), $format_title);
if ($this->test_obj->ects_output)
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("ects_grade")), $format_title);
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_qworkedthrough")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_qmax")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_pworkedthrough")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_timeofwork")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_atimeofwork")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_firstvisit")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_lastvisit")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_mark_median")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_rank_participant")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_rank_median")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_total_participants")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("tst_stat_result_median")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("scored_pass")), $format_title);
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("pass")), $format_title);
include_once "./Services/Excel/classes/class.ilExcelUtils.php";
$counter = 1;
$data =& $this->test_obj->getCompleteEvaluationData(TRUE, $filterby, $filtertext);
$firstrowwritten = false;
foreach ($data->getParticipants() as $active_id => $userdata)
{
$remove = FALSE;
if ($passedonly)
{
if ($data->getParticipant($active_id)->getPassed() == FALSE)
{
$remove = TRUE;
}
}
if (!$remove)
{
$row++;
if ($this->test_obj->isRandomTest() || $this->test_obj->getShuffleQuestions())
{
$row++;
}
$col = 0;
if ($this->test_obj->getAnonymity())
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($counter));
}
else
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getName()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getLogin()));
if (count($additionalFields))
{
$userfields = ilObjUser::_lookupFields($userdata->getUserID());
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "gender") == 0)
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt("gender_" . $userfields[$fieldname])));
}
else
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($userfields[$fieldname]));
}
}
}
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getReached()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getMaxpoints()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getMark()));
if ($this->test_obj->ects_output)
{
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getECTSMark()));
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getQuestionsWorkedThrough()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getParticipant($active_id)->getNumberOfQuestions()));
$worksheet->write($row, $col++, $data->getParticipant($active_id)->getQuestionsWorkedThroughInPercent() / 100.0, $format_percent);
$time = $data->getParticipant($active_id)->getTimeOfWork();
$time_seconds = $time;
$time_hours = floor($time_seconds/3600);
$time_seconds -= $time_hours * 3600;
$time_minutes = floor($time_seconds/60);
$time_seconds -= $time_minutes * 60;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text(sprintf("%02d:%02d:%02d", $time_hours, $time_minutes, $time_seconds)));
$time = $data->getParticipant($active_id)->getQuestionsWorkedThrough() ? $data->getParticipant($active_id)->getTimeOfWork() / $data->getParticipant($active_id)->getQuestionsWorkedThrough() : 0;
$time_seconds = $time;
$time_hours = floor($time_seconds/3600);
$time_seconds -= $time_hours * 3600;
$time_minutes = floor($time_seconds/60);
$time_seconds -= $time_minutes * 60;
$worksheet->write($row, $col++, ilExcelUtils::_convert_text(sprintf("%02d:%02d:%02d", $time_hours, $time_minutes, $time_seconds)));
$fv = getdate($data->getParticipant($active_id)->getFirstVisit());
$firstvisit = ilUtil::excelTime(
$fv["year"],
$fv["mon"],
$fv["mday"],
$fv["hours"],
$fv["minutes"],
$fv["seconds"]
);
$worksheet->write($row, $col++, $firstvisit, $format_datetime);
$lv = getdate($data->getParticipant($active_id)->getLastVisit());
$lastvisit = ilUtil::excelTime(
$lv["year"],
$lv["mon"],
$lv["mday"],
$lv["hours"],
$lv["minutes"],
$lv["seconds"]
);
$worksheet->write($row, $col++, $lastvisit, $format_datetime);
$median = $data->getStatistics()->getStatistics()->median();
$pct = $data->getParticipant($active_id)->getMaxpoints() ? $median / $data->getParticipant($active_id)->getMaxpoints() * 100.0 : 0;
$mark = $this->test_obj->mark_schema->getMatchingMark($pct);
$mark_short_name = "";
if (is_object($mark))
{
$mark_short_name = $mark->getShortName();
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($mark_short_name));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getStatistics()->getStatistics()->rank($data->getParticipant($active_id)->getReached())));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getStatistics()->getStatistics()->rank_median()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($data->getStatistics()->getStatistics()->count()));
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($median));
if ($this->test_obj->getPassScoring() == SCORE_BEST_PASS)
{
$worksheet->write($row, $col++, $data->getParticipant($active_id)->getBestPass() + 1);
}
else
{
$worksheet->write($row, $col++, $data->getParticipant($active_id)->getLastPass() + 1);
}
$startcol = $col;
for ($pass = 0; $pass <= $data->getParticipant($active_id)->getLastPass(); $pass++)
{
$col = $startcol;
$finishdate = $this->test_obj->getPassFinishDate($active_id, $pass);
if ($finishdate > 0)
{
if ($pass > 0)
{
$row++;
if ($this->test_obj->isRandomTest() || $this->test_obj->getShuffleQuestions())
{
$row++;
}
}
$worksheet->write($row, $col++, ilExcelUtils::_convert_text($pass+1));
if (is_object($data->getParticipant($active_id)) && is_array($data->getParticipant($active_id)->getQuestions($pass)))
{
foreach ($data->getParticipant($active_id)->getQuestions($pass) as $question)
{
$question_data = $data->getParticipant($active_id)->getPass($pass)->getAnsweredQuestionByQuestionId($question["id"]);
$worksheet->write($row, $col, ilExcelUtils::_convert_text($question_data["reached"]));
if ($this->test_obj->isRandomTest() || $this->test_obj->getShuffleQuestions())
{
$worksheet->write($row-1, $col, ilExcelUtils::_convert_text(preg_replace("/<.*?>/", "", $data->getQuestionTitle($question["id"]))), $format_title);
}
else
{
if ($pass == 0 && !$firstrowwritten)
{
$worksheet->write(0, $col, ilExcelUtils::_convert_text(preg_replace("/<.*?>/", "", $data->getQuestionTitle($question["id"]))), $format_title);
}
}
$col++;
}
$firstrowwritten = true;
}
}
}
$counter++;
}
}
if ($this->test_obj->isSingleChoiceTest() && !$this->test_obj->isRandomTest())
{
// special tab for single choice tests
$titles =& $this->test_obj->getQuestionTitlesAndIndexes();
$positions = array();
$pos = 0;
$row = 0;
foreach ($titles as $id => $title)
{
$positions[$id] = $pos;
$pos++;
}
$usernames = array();
$participantcount = count($data->getParticipants());
$allusersheet = false;
$pages = 0;
$resultsheet =& $workbook->addWorksheet($this->lng->txt("eval_all_users"));
$col = 0;
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('name')), $format_title);
if (!$this->test_obj->getAnonymity())
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('login')), $format_title);
if (count($additionalFields))
{
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "matriculation") == 0)
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('matriculation')), $format_title);
}
}
}
}
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('test')), $format_title);
foreach ($titles as $title)
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($title), $format_title);
}
$row++;
foreach ($data->getParticipants() as $active_id => $userdata)
{
$username = (!is_null($userdata) && ilExcelUtils::_convert_text($userdata->getName())) ? ilExcelUtils::_convert_text($userdata->getName()) : "ID $active_id";
if (array_key_exists($username, $usernames))
{
$usernames[$username]++;
$username .= " ($i)";
}
else
{
$usernames[$username] = 1;
}
$col = 0;
$resultsheet->write($row, $col++, $username);
if (!$this->test_obj->getAnonymity())
{
$resultsheet->write($row, $col++, $userdata->getLogin());
if (count($additionalFields))
{
$userfields = ilObjUser::_lookupFields($userdata->getUserID());
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "matriculation") == 0)
{
if (strlen($userfields[$fieldname]))
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($userfields[$fieldname]));
}
else
{
$col++;
}
}
}
}
}
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->test_obj->getTitle()));
$pass = $userdata->getScoredPass();
if (is_object($userdata) && is_array($userdata->getQuestions($pass)))
{
foreach ($userdata->getQuestions($pass) as $question)
{
$objQuestion =& $this->test_obj->_instanciateQuestion($question["aid"]);
if (is_object($objQuestion))
{
$solution = $objQuestion->getSolutionValues($active_id, $pass);
$pos = $positions[$question["aid"]];
$selectedanswer = "x";
foreach ($objQuestion->getAnswers() as $id => $answer)
{
if (strlen($solution[0]["value1"]) && $id == $solution[0]["value1"])
{
$selectedanswer = $answer->getAnswertext();
}
}
$resultsheet->write($row, $col+$pos, ilExcelUtils::_convert_text($selectedanswer));
}
}
}
$row++;
}
if ($this->test_obj->isSingleChoiceTestWithoutShuffle())
{
// special tab for single choice tests without shuffle option
$pos = 0;
$row = 0;
$usernames = array();
$allusersheet = false;
$pages = 0;
$resultsheet =& $workbook->addWorksheet($this->lng->txt("eval_all_users") . " (2)");
$col = 0;
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('name')), $format_title);
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('login')), $format_title);
if (count($additionalFields))
{
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "matriculation") == 0)
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('matriculation')), $format_title);
}
}
}
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->lng->txt('test')), $format_title);
foreach ($titles as $title)
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($title), $format_title);
}
$row++;
foreach ($data->getParticipants() as $active_id => $userdata)
{
$username = (!is_null($userdata) && ilExcelUtils::_convert_text($userdata->getName())) ? ilExcelUtils::_convert_text($userdata->getName()) : "ID $active_id";
if (array_key_exists($username, $usernames))
{
$usernames[$username]++;
$username .= " ($i)";
}
else
{
$usernames[$username] = 1;
}
$col = 0;
$resultsheet->write($row, $col++, $username);
$resultsheet->write($row, $col++, $userdata->getLogin());
if (count($additionalFields))
{
$userfields = ilObjUser::_lookupFields($userdata->getUserID());
foreach ($additionalFields as $fieldname)
{
if (strcmp($fieldname, "matriculation") == 0)
{
if (strlen($userfields[$fieldname]))
{
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($userfields[$fieldname]));
}
else
{
$col++;
}
}
}
}
$resultsheet->write($row, $col++, ilExcelUtils::_convert_text($this->test_obj->getTitle()));
$pass = $userdata->getScoredPass();
if (is_object($userdata) && is_array($userdata->getQuestions($pass)))
{
foreach ($userdata->getQuestions($pass) as $question)
{
$objQuestion =& $this->test_obj->_instanciateQuestion($question["aid"]);
if (is_object($objQuestion))
{
$solution = $objQuestion->getSolutionValues($active_id, $pass);
$pos = $positions[$question["aid"]];
$selectedanswer = chr(65+$solution[0]["value1"]);
$resultsheet->write($row, $col+$pos, ilExcelUtils::_convert_text($selectedanswer));
}
}
}
$row++;
}
}
}
else
{
// test participant result export
$usernames = array();
$participantcount = count($data->getParticipants());
$allusersheet = false;
$pages = 0;
foreach ($data->getParticipants() as $active_id => $userdata)
{
$username = (!is_null($userdata) && ilExcelUtils::_convert_text($userdata->getName())) ? ilExcelUtils::_convert_text($userdata->getName()) : "ID $active_id";
if (array_key_exists($username, $usernames))
{
$usernames[$username]++;
$username .= " ($i)";
}
else
{
$usernames[$username] = 1;
}
if ($participantcount > 250) {
if (!$allusersheet || ($pages-1) < floor($row / 64000)) {
$resultsheet =& $workbook->addWorksheet($this->lng->txt("eval_all_users") . (($pages > 0) ? " (".($pages+1).")" : ""));
$allusersheet = true;
$row = 0;
$pages++;
}
} else {
$resultsheet =& $workbook->addWorksheet($username);
}
if (method_exists($resultsheet, "writeString"))
{
$pass = $userdata->getScoredPass();
$row = ($allusersheet) ? $row : 0;
$resultsheet->writeString($row, 0, ilExcelUtils::_convert_text(sprintf($this->lng->txt("tst_result_user_name_pass"), $pass+1, $userdata->getName())), $format_bold);
$row += 2;
if (is_object($userdata) && is_array($userdata->getQuestions($pass)))
{
foreach ($userdata->getQuestions($pass) as $question)
{
$question =& $this->test_obj->_instanciateQuestion($question["aid"]);
if (is_object($question))
{
$row = $question->setExportDetailsXLS($resultsheet, $row, $active_id, $pass, $format_title, $format_bold);
}
}
}
}
}
}
$workbook->close();
if ($deliver)
{
ilUtil::deliverFile($excelfile, $testname, "application/vnd.ms-excel", false, true);
exit;
}
else
{
return $excelfile;
}
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::exportXHTMLMediaObjects (   $a_export_dir)

Definition at line 1075 of file class.ilTestExport.php.

References $mobs, ilObjMediaObject\_exists(), and ilObjMediaObject\_getMobsOfObject().

Referenced by buildExportFileXML().

{
include_once("./Services/MediaObjects/classes/class.ilObjMediaObject.php");
$mobs = ilObjMediaObject::_getMobsOfObject("tst:html", $this->test_obj->getId());
foreach ($mobs as $mob)
{
if (ilObjMediaObject::_exists($mob))
{
$mob_obj =& new ilObjMediaObject($mob);
$mob_obj->exportFiles($a_export_dir);
unset($mob_obj);
}
}
foreach ($this->test_obj->questions as $question_id)
{
$mobs = ilObjMediaObject::_getMobsOfObject("qpl:html", $question_id);
foreach ($mobs as $mob)
{
if (ilObjMediaObject::_exists($mob))
{
$mob_obj =& new ilObjMediaObject($mob);
$mob_obj->exportFiles($a_export_dir);
unset($mob_obj);
}
}
}
}

+ Here is the call graph for this function:

+ Here is the caller graph for this function:

ilTestExport::getExtension ( )

Definition at line 86 of file class.ilTestExport.php.

Referenced by buildExportResultFile(), and ilTestExport().

{
switch ($this->mode) {
case "results":
return "csv"; break;
default:
return "xml"; break;
}
}

+ Here is the caller graph for this function:

ilTestExport::getInstId ( )

Definition at line 95 of file class.ilTestExport.php.

References $inst_id.

{
return $this->inst_id;
}
ilTestExport::ilTestExport ( &  $a_test_obj,
  $a_mode = "xml" 
)

Constructor public.

Definition at line 48 of file class.ilTestExport.php.

References $ilDB, $ilErr, $ilias, $lng, and getExtension().

{
global $ilErr, $ilDB, $ilias, $lng;
$this->test_obj =& $a_test_obj;
$this->err =& $ilErr;
$this->ilias =& $ilias;
$this->db =& $ilDB;
$this->mode = $a_mode;
$this->lng =& $lng;
$settings = $this->ilias->getAllSettings();
$this->inst_id = IL_INST_ID;
$date = time();
$this->export_dir = $this->test_obj->getExportDirectory();
switch($this->mode)
{
case "results":
$this->subdir = $date."__".$this->inst_id."__".
"test__results__".$this->test_obj->getId();
break;
case "aggregated":
$this->subdir = $date."__".$this->inst_id."__".
"test__aggregated__results__".$this->test_obj->getId();
break;
default:
$this->subdir = $date."__".$this->inst_id."__".
"test"."__".$this->test_obj->getId();
$this->filename = $this->subdir.".xml";
$this->qti_filename = $date."__".$this->inst_id."__".
"qti"."__".$this->test_obj->getId().".xml";
break;
}
$this->filename = $this->subdir.".".$this->getExtension();
}

+ Here is the call graph for this function:

Field Documentation

ilTestExport::$db

Definition at line 37 of file class.ilTestExport.php.

ilTestExport::$err

Definition at line 36 of file class.ilTestExport.php.

ilTestExport::$ilias

Definition at line 38 of file class.ilTestExport.php.

Referenced by ilTestExport().

ilTestExport::$inst_id

Definition at line 40 of file class.ilTestExport.php.

Referenced by getInstId().

ilTestExport::$lng
private

Definition at line 42 of file class.ilTestExport.php.

Referenced by ilTestExport().

ilTestExport::$mode

Definition at line 41 of file class.ilTestExport.php.

ilTestExport::$test_obj

Definition at line 39 of file class.ilTestExport.php.

The documentation for this class was generated from the following file: