function showCleanRes()
{
/* update last page */
$_SESSION['LASTPAGE'] = substr($_SESSION['LASTPAGE'], 0, strripos($_SESSION['LASTPAGE'], "res"));
$clean = loadvar("clean");
$from = loadvar("from");
$to = loadvar("to");
$datatypes = loadvar("datatype");
global $db;
$content = "";
$displaySysAdmin = new DisplaySysAdmin();
if ($clean != "" && $datatypes != "") {
foreach ($clean as $cl) {
$tsquery = "";
if ($from != "") {
$tsquery .= " and ts > '" . $from . "'";
}
if ($to != "") {
$tsquery .= " and ts < '" . $to . "'";
}
$tables = array();
if (inArray(SURVEY_EXECUTION_MODE_NORMAL, $datatypes)) {
$tables[] = Config::dbSurvey();
}
if (inArray(SURVEY_EXECUTION_MODE_TEST, $datatypes)) {
$tables[] = Config::dbSurvey() . "_test";
}
foreach ($tables as $table) {
$query = "delete from " . $table . "_actions where suid=" . $cl . " and systemtype=" . USCIC_SURVEY . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_data where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_datarecords where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_screendumps where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_logs where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_observations where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_states where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_times where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_paradata where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_loopdata where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_consolidated_times where suid=" . $cl . $tsquery;
$db->executeQuery($query);
$query = "delete from " . $table . "_processed_paradata where suid=" . $cl . $tsquery;
$db->executeQuery($query);
}
}
$content = $displaySysAdmin->displaySuccess(Language::messageToolsCleanOk());
} else {
if ($clean == "") {
$content = $displaySysAdmin->displayWarning(Language::messageToolsCleanSelectSurvey());
} else {
if ($datatypes == "") {
$content = $displaySysAdmin->displayWarning(Language::messageToolsCleanSelectDataType());
}
}
}
return $displaySysAdmin->showClean($content);
}
