mirror of
https://github.com/ACSPRI/queXS
synced 2024-04-02 12:12:16 +00:00
Merging the Limesurvey 1.91+ branch of queXS in to the trunk
This commit is contained in:
@@ -193,15 +193,23 @@ display_questionnaire_chooser($questionnaire_id);
|
||||
|
||||
if ($questionnaire_id)
|
||||
{
|
||||
print "<p><a href='?data&questionnaire_id=$questionnaire_id'>". T_("Download all data for this questionnaire") . "</a></p>";
|
||||
$sql = "SELECT lime_sid
|
||||
FROM questionnaire
|
||||
WHERE questionnaire_id = $questionnaire_id";
|
||||
|
||||
$ls = $db->GetRow($sql);
|
||||
$lsid = $ls['lime_sid'];
|
||||
|
||||
print "<p><a href='" . LIME_URL . "admin/admin.php?action=exportresults&sid=$lsid'>". T_("Download data for this questionnaire via Limesurvey") . "</a></p>";
|
||||
|
||||
print "<h3>" . T_("Please select a sample") . "</h3>";
|
||||
$sample_import_id = false;
|
||||
if (isset($_GET['sample_import_id'])) $sample_import_id = bigintval($_GET['sample_import_id']);
|
||||
display_sample_chooser($questionnaire_id,$sample_import_id);
|
||||
|
||||
if ($sample_import_id)
|
||||
{
|
||||
print "<p><a href='?data&questionnaire_id=$questionnaire_id&sample_import_id=$sample_import_id'>" . T_("Download data for this sample") . "</a></p>";
|
||||
print "<p><a href='" .LIME_URL . "admin/admin.php?action=exportresults&sid=$lsid&quexsfilterinc=$questionnaire_id:$sample_import_id'>" . T_("Download data for this sample via Limesurvey") . "</a></p>";
|
||||
//get sample vars
|
||||
$sql = "SELECT sv.var as value, sv.var as description
|
||||
FROM `sample_var` as sv
|
||||
|
||||
@@ -49,9 +49,10 @@ xhtml_head(T_("Administrative Tools"),true,array("../css/table.css","../css/admi
|
||||
print "<div id='menu'><ul class='navmenu'>";
|
||||
|
||||
print "<li><h3>" . T_("Questionnaire creation and management") . "</h3>";
|
||||
print "<ul><li><a href=\"?page=new.php\">" . T_("Create a new questionnaire") . "</a></li>";
|
||||
print "<ul><li><a href='?page=" . LIME_URL ."admin/admin.php?action=newsurvey'>" . T_("Create an instrument in Limesurvey") . "</a></li>";
|
||||
print "<li><a href=\"?page=new.php\">" . T_("Create a new questionnaire") . "</a></li>";
|
||||
print "<li><a href=\"?page=questionnairelist.php\">" . T_("Questionnaire management") . "</a></li>";
|
||||
print "<li><a href=\"?page=" . LIME_URL . "admin/admin.php\">" . T_("Administer questionnaires with Limesurvey") . "</a></li></ul></li>";
|
||||
print "<li><a href=\"?page=" . LIME_URL . "admin/admin.php\">" . T_("Administer instruments with Limesurvey") . "</a></li></ul></li>";
|
||||
|
||||
print "<li><h3>" . T_("Sample/List management") . "</h3><ul>";
|
||||
print "<li><a href=\"?page=import.php\">" . T_("Import a sample file (in CSV form)") . "</a></li>";
|
||||
|
||||
@@ -82,25 +82,11 @@ if (isset($_POST['import_file']))
|
||||
$rs_answeringmachine = $db->qstr(html_entity_decode($_POST['rs_answeringmachine'],get_magic_quotes_gpc()));
|
||||
$info = $db->qstr(html_entity_decode($_POST['info'],get_magic_quotes_gpc()));
|
||||
|
||||
if ($_POST['select'] == "new")
|
||||
{
|
||||
//create one from scratch
|
||||
include_once("../functions/functions.limesurvey.php");
|
||||
$lime_sid = create_limesurvey_questionnaire($name);
|
||||
}
|
||||
else
|
||||
{
|
||||
//use existing lime instrument
|
||||
$lime_sid = bigintval($_POST['select']);
|
||||
}
|
||||
//use existing lime instrument
|
||||
$lime_sid = bigintval($_POST['select']);
|
||||
|
||||
if ($_POST['selectrs'] == "new")
|
||||
{
|
||||
//create one from scratch
|
||||
include_once("../functions/functions.limesurvey.php");
|
||||
$lime_rs_sid = create_limesurvey_questionnaire($db->qstr(T_("Respondent Selection for ") . $_POST['description']),false);
|
||||
}
|
||||
else if (is_numeric($_POST['selectrs']))
|
||||
|
||||
if (is_numeric($_POST['selectrs']))
|
||||
{
|
||||
$lime_rs_sid = bigintval($_POST['selectrs']);
|
||||
}
|
||||
@@ -114,7 +100,6 @@ if (isset($_POST['import_file']))
|
||||
{
|
||||
$qid = $db->Insert_ID();
|
||||
print "<p>" . T_("Successfully inserted") . " $name " . T_("as questionnaire") . " $qid, " . T_("linked to") . " $lime_sid</p>";
|
||||
print "<p>" . T_("You must now edit and activate the questionnaire") . "</p>";
|
||||
}else
|
||||
{
|
||||
print "<p>" . T_("Error: Failed to insert questionnaire") . "</p>";
|
||||
@@ -129,7 +114,7 @@ if (isset($_POST['import_file']))
|
||||
<form enctype="multipart/form-data" action="" method="post">
|
||||
<p><input type="hidden" name="MAX_FILE_SIZE" value="1000000000" /></p>
|
||||
<p><? echo T_("Name for questionnaire:"); ?> <input type="text" name="description"/></p>
|
||||
<p><? echo T_("Select creation type:"); ?> <select name="select"><option value="new"><? echo T_("Create new questionnaire in Limesurvey"); ?></option><?
|
||||
<p><? echo T_("Select limesurvey instrument:");
|
||||
$sql = "SELECT s.sid as sid, sl.surveyls_title AS title
|
||||
FROM " . LIME_PREFIX . "surveys AS s
|
||||
LEFT JOIN " . LIME_PREFIX . "surveys_languagesettings AS sl ON ( s.sid = sl.surveyls_survey_id
|
||||
@@ -140,14 +125,20 @@ $surveys = $db->GetAll($sql);
|
||||
|
||||
if (!empty($surveys))
|
||||
{
|
||||
print "<select name='select'>";
|
||||
foreach($surveys as $s)
|
||||
{
|
||||
print "<option value=\"{$s['sid']}\">" . T_("Existing questionnaire:") . " {$s['title']}</option>";
|
||||
print "<option value=\"{$s['sid']}\">" . T_("Existing instrument:") . " {$s['title']}</option>";
|
||||
}
|
||||
print "</select>";
|
||||
}
|
||||
?></select></p>
|
||||
else
|
||||
{
|
||||
print "<a href='" . LIME_URL ."admin/admin.php?action=newsurvey'>" . T_("Create an instrument in Limesurvey") ."</a>";
|
||||
}
|
||||
?></p>
|
||||
<p><? echo T_("Respondent selection type:"); ?>
|
||||
<select name="selectrs" onchange="if(this.value=='old') show(this,'rstext'); else hide(this,'rstext');"><option value="none"><? echo T_("No respondent selection (go straight to questionnaire)"); ?></option><option value="old"><? echo T_("Use basic respondent selection text (below)"); ?></option><option value="new"><? echo T_("Create new respondent selection questionnaire in Limesurvey"); ?></option>
|
||||
<select name="selectrs" onchange="if(this.value=='old') show(this,'rstext'); else hide(this,'rstext');"><option value="none"><? echo T_("No respondent selection (go straight to questionnaire)"); ?></option><option value="old"><? echo T_("Use basic respondent selection text (below)"); ?></option>
|
||||
<?
|
||||
$sql = "SELECT s.sid as sid, sl.surveyls_title AS title
|
||||
FROM " . LIME_PREFIX . "surveys AS s
|
||||
@@ -161,7 +152,7 @@ if (!empty($surveys))
|
||||
{
|
||||
foreach($surveys as $s)
|
||||
{
|
||||
print "<option value=\"{$s['sid']}\">" . T_("Existing questionnaire:") . " {$s['title']}</option>";
|
||||
print "<option value=\"{$s['sid']}\">" . T_("Existing instrument:") . " {$s['title']}</option>";
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
@@ -71,6 +71,7 @@ xhtml_head(T_("Operator Performance"),true,array("../css/table.css"),array("../j
|
||||
//xhtml_table($rs,array("firstName","completions","totalcalls","time","callt","CPH","CALLSPH","effectiveness"),array(T_("Operator"),T_("Completions"),T_("Calls"),T_("Total time"),T_("Call time"),T_("Completions p/h"),T_("Calls p/h"),T_("Effectiveness")));
|
||||
|
||||
$questionnaire_id = false;
|
||||
print "<h3>" . T_("Please select a questionnaire") . "</h3>";
|
||||
if (isset($_GET['questionnaire_id'])) $questionnaire_id = bigintval($_GET['questionnaire_id']);
|
||||
display_questionnaire_chooser($questionnaire_id);
|
||||
|
||||
@@ -92,6 +93,8 @@ if ($questionnaire_id)
|
||||
ORDER BY s.start ASC";
|
||||
|
||||
$rs = $db->GetAll($sql);
|
||||
|
||||
print "<h3>" . T_("Please select a shift") . "</h3>";
|
||||
|
||||
display_chooser($rs,"shift_id","shift_id",true,"questionnaire_id=$questionnaire_id");
|
||||
|
||||
|
||||
@@ -158,7 +158,7 @@ if (isset($_GET['modify']))
|
||||
|
||||
echo "<h1>" . $rs['description'] . "</h1>";
|
||||
echo "<p><a href='?'>" . T_("Go back") . "</a></p>";
|
||||
echo "<p><a href='" . LIME_URL . "admin/admin.php?sid={$rs['lime_sid']}'>" . T_("Edit questionnaire in Limesurvey") . "</a></p>";
|
||||
echo "<p><a href='" . LIME_URL . "admin/admin.php?sid={$rs['lime_sid']}'>" . T_("Edit instrument in Limesurvey") . "</a></p>";
|
||||
?>
|
||||
<form action="?modify=<? echo $questionnaire_id; ?>" method="post">
|
||||
<p><? echo T_("Name for questionnaire:"); ?> <input type="text" name="description" value="<? echo $rs['description']; ?>"/></p>
|
||||
|
||||
@@ -66,6 +66,7 @@ $sql = "SELECT ca1 AS callattempts, COUNT( ca1 ) AS sample
|
||||
|
||||
xhtml_table($db->GetAll($sql),array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
|
||||
print "<h2>" . T_("Please select a questionnaire") . "</h2>";
|
||||
$questionnaire_id = false;
|
||||
if (isset($_GET['questionnaire_id'])) $questionnaire_id = bigintval($_GET['questionnaire_id']);
|
||||
display_questionnaire_chooser($questionnaire_id);
|
||||
@@ -79,52 +80,66 @@ if ($questionnaire_id)
|
||||
GROUP BY call_attempt.case_id) AS t1
|
||||
GROUP BY ca1";
|
||||
|
||||
print "<h2>" . T_("This project") . "</h2>";
|
||||
xhtml_table($db->GetAll($sql),array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
$cal = $db->GetAll($sql);
|
||||
|
||||
$sample_import_id = false;
|
||||
if (isset($_GET['sample_import_id'])) $sample_import_id = bigintval($_GET['sample_import_id']);
|
||||
display_sample_chooser($questionnaire_id,$sample_import_id);
|
||||
|
||||
if ($sample_import_id)
|
||||
if (!empty($cal))
|
||||
{
|
||||
$sql = "SELECT ca1 AS callattempts, COUNT( ca1 ) AS sample
|
||||
FROM ( SELECT count( call_attempt.call_attempt_id ) AS ca1
|
||||
FROM call_attempt
|
||||
JOIN `case` ON (`case`.case_id = call_attempt.case_id AND `case`.questionnaire_id = '$questionnaire_id')
|
||||
JOIN sample ON (sample.sample_id = `case`.sample_id AND sample.import_id = '$sample_import_id')
|
||||
GROUP BY call_attempt.case_id) AS t1
|
||||
GROUP BY ca1";
|
||||
|
||||
print "<h2>" . T_("This sample") . "</h2>";
|
||||
xhtml_table($db->GetAll($sql),array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
xhtml_table($cal,array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
|
||||
print "<h2>" . T_("Please select a sample") . "</h2>";
|
||||
$sample_import_id = false;
|
||||
if (isset($_GET['sample_import_id'])) $sample_import_id = bigintval($_GET['sample_import_id']);
|
||||
display_sample_chooser($questionnaire_id,$sample_import_id);
|
||||
|
||||
$questionnaire_sample_quota_row_id = false;
|
||||
if (isset($_GET['questionnaire_sample_quota_row_id'])) $questionnaire_sample_quota_row_id = bigintval($_GET['questionnaire_sample_quota_row_id']);
|
||||
display_quota_chooser($questionnaire_id,$sample_import_id,$questionnaire_sample_quota_row_id);
|
||||
|
||||
if ($questionnaire_sample_quota_row_id)
|
||||
if ($sample_import_id)
|
||||
{
|
||||
$sql = "SELECT ca1 AS callattempts, COUNT( ca1 ) AS sample
|
||||
FROM ( SELECT count( call_attempt.call_attempt_id ) AS ca1
|
||||
FROM call_attempt
|
||||
JOIN `case` ON (`case`.case_id = call_attempt.case_id AND `case`.questionnaire_id = '$questionnaire_id')
|
||||
JOIN sample ON (sample.sample_id = `case`.sample_id AND sample.import_id = '$sample_import_id')
|
||||
JOIN questionnaire_sample_quota_row as q ON (q.questionnaire_sample_quota_row_id = '$questionnaire_sample_quota_row_id')
|
||||
JOIN sample_var ON (sample_var.sample_id = `case`.sample_id AND sample_var.var LIKE q.exclude_var AND sample_var.val LIKE q.exclude_val)
|
||||
GROUP BY call_attempt.case_id) AS t1
|
||||
GROUP BY ca1";
|
||||
|
||||
print "<h2>" . T_("This quota") . "</h2>";
|
||||
xhtml_table($db->GetAll($sql),array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
$cal = $db->GetAll($sql);
|
||||
|
||||
if (!empty($cal))
|
||||
{
|
||||
xhtml_table($cal,array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
|
||||
$questionnaire_sample_quota_row_id = false;
|
||||
if (isset($_GET['questionnaire_sample_quota_row_id'])) $questionnaire_sample_quota_row_id = bigintval($_GET['questionnaire_sample_quota_row_id']);
|
||||
print "<h2>" . T_("Please select a quota") . "</h2>";
|
||||
display_quota_chooser($questionnaire_id,$sample_import_id,$questionnaire_sample_quota_row_id);
|
||||
|
||||
if ($questionnaire_sample_quota_row_id)
|
||||
{
|
||||
$sql = "SELECT ca1 AS callattempts, COUNT( ca1 ) AS sample
|
||||
FROM ( SELECT count( call_attempt.call_attempt_id ) AS ca1
|
||||
FROM call_attempt
|
||||
JOIN `case` ON (`case`.case_id = call_attempt.case_id AND `case`.questionnaire_id = '$questionnaire_id')
|
||||
JOIN sample ON (sample.sample_id = `case`.sample_id AND sample.import_id = '$sample_import_id')
|
||||
JOIN questionnaire_sample_quota_row as q ON (q.questionnaire_sample_quota_row_id = '$questionnaire_sample_quota_row_id')
|
||||
JOIN sample_var ON (sample_var.sample_id = `case`.sample_id AND sample_var.var LIKE q.exclude_var AND sample_var.val LIKE q.exclude_val)
|
||||
GROUP BY call_attempt.case_id) AS t1
|
||||
GROUP BY ca1";
|
||||
|
||||
$cal = $db->GetAll($sql);
|
||||
if (empty($cal))
|
||||
print "<p>" . T_("No calls for this quota") . "</p>";
|
||||
else
|
||||
xhtml_table($cal,array("sample","callattempts"),array(T_("Number of cases"),T_("Call attempts made")),"tclass",false,array("sample"));
|
||||
}
|
||||
}
|
||||
else
|
||||
print "<p>" . T_("No calls for this sample") . "</p>";
|
||||
}
|
||||
}
|
||||
else
|
||||
print "<p>" . T_("No calls for this questionnaire") . "</p>";
|
||||
}
|
||||
|
||||
xhtml_foot();
|
||||
|
||||
|
||||
|
||||
?>
|
||||
|
||||
|
||||
Reference in New Issue
Block a user