*/
include "../functions/functions.input.php";
/**
* Limesurvey functions
*/
include "../functions/functions.limesurvey.php";
/**
* Operator functions
*/
include "../functions/functions.operator.php";
global $db;
if (isset($_POST['submitdelete'])) {
foreach ($_POST as $key => $val) {
if (substr($key, 0, 7) == "select_") {
$tmp = bigintval(substr($key, 7));
open_row_quota($tmp);
}
}
}
if (isset($_POST['submitexport'])) {
$csv = array();
foreach ($_POST as $key => $val) {
if (substr($key, 0, 7) == "select_") {
$tmp = bigintval(substr($key, 7));
$sql = "SELECT description,completions,autoprioritise\r\n FROM questionnaire_sample_quota_row\r\n WHERE questionnaire_sample_quota_row_id = {$tmp}";
$rs = $db->GetRow($sql);
$sql = "SELECT lime_sgqa,comparison,value\r\n FROM qsqr_question\r\n WHERE questionnaire_sample_quota_row_id = {$tmp}";
$q2 = $db->GetAll($sql);
$sql = "SELECT exclude_var_id, exclude_var as samplerecord,comparison,exclude_val as value\r\n FROM qsqr_sample\r\n WHERE questionnaire_sample_quota_row_id = {$tmp}";
$q3 = $db->GetAll($sql);
$ta = array($rs['description'], $rs['completions'], $rs['autoprioritise']);
$sample_import_id = bigintval($_GET['sample_import_id']);
}
display_sample_chooser($questionnaire_id, $sample_import_id, false, "form-inline form-group clearfix", "form-control");
if ($sample_import_id) {
if (isset($_GET['rowquota'])) {
$qsq = bigintval($_GET['rowquota']);
$qr = 0;
if (isset($_GET['close'])) {
$qr = 1;
}
$sql = "UPDATE questionnaire_sample_quota_row\r\n\t\t\t\tSET quota_reached = {$qr}\r\n\t\t\t\tWHERE questionnaire_sample_quota_row_id = '{$qsq}'";
$db->Execute($sql);
if ($qr == 1) {
close_row_quota($qsq);
} else {
open_row_quota($qsq, false);
}
}
//Display report of quotas
$report = array();
//Rows to display: Strata Status Quota Sample Sample Used Sample Remaining Completes % Complete
//a. (Standard quota) Monitor outcomes of questions in completed questionnaires, and exclude selected sample records when completion limit is reached
//b. (Replicate quota) Exclude selected sample records (where no qsqr_question rows)
$sql = "SELECT qsq.questionnaire_sample_quota_row_id,completions,quota_reached,lime_sid,qsq.description,current_completions, priority, autoprioritise\r\n FROM questionnaire_sample_quota_row as qsq, questionnaire as q\r\n WHERE qsq.questionnaire_id = '{$questionnaire_id}'\r\n\t\t\tAND qsq.sample_import_id = '{$sample_import_id}'\r\n AND q.questionnaire_id = '{$questionnaire_id}'";
$r = $db->GetAll($sql);
foreach ($r as $v) {
$completions = $v['current_completions'];
$priority = $v['priority'];
$autoprioritise = $v['autoprioritise'];
$checked = "";
if ($autoprioritise) {
