mirror of
https://github.com/ACSPRI/queXS
synced 2024-04-02 12:12:16 +00:00
247 lines
9.7 KiB
PHP
247 lines
9.7 KiB
PHP
<?php
|
|
/**
|
|
* Assign sample(s) to a questionnaire
|
|
*
|
|
*
|
|
* This file is part of queXS
|
|
*
|
|
* queXS is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* queXS is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with queXS; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*
|
|
*
|
|
* @author Adam Zammit <adam.zammit@deakin.edu.au>
|
|
* @copyright Deakin University 2007,2008
|
|
* @package queXS
|
|
* @subpackage admin
|
|
* @link http://www.deakin.edu.au/dcarf/ queXS was writen for DCARF - Deakin Computer Assisted Research Facility
|
|
* @license http://opensource.org/licenses/gpl-2.0.php The GNU General Public License (GPL) Version 2
|
|
*
|
|
*
|
|
*/
|
|
|
|
/**
|
|
* Configuration file
|
|
*/
|
|
include("../config.inc.php");
|
|
|
|
/**
|
|
* Database file
|
|
*/
|
|
include ("../db.inc.php");
|
|
|
|
/**
|
|
* XHTML functions
|
|
*/
|
|
include("../functions/functions.xhtml.php");
|
|
|
|
/**
|
|
* Display functions
|
|
*/
|
|
include("../functions/functions.display.php");
|
|
|
|
/**
|
|
* Input functions
|
|
*/
|
|
include("../functions/functions.input.php");
|
|
|
|
global $db;
|
|
|
|
|
|
if (isset($_GET['questionnaire_id']) && isset($_GET['sample']) && isset($_GET['call_max']) && isset($_GET['call_attempt_max']))
|
|
{
|
|
//need to add sample to questionnaire
|
|
|
|
$questionnaire_id = bigintval($_GET['questionnaire_id']);
|
|
$sid = bigintval($_GET['sample']);
|
|
$cm = bigintval($_GET['call_max']);
|
|
$cam = bigintval($_GET['call_attempt_max']);
|
|
$am = bigintval($_GET['answering_machine_messages']);
|
|
$selecttype = 0;
|
|
if (isset($_GET['selecttype'])) $selecttype = 1;
|
|
$an = 0;
|
|
if (isset($_GET['allownew'])) $an = 1;
|
|
|
|
$sql = "INSERT INTO questionnaire_sample(questionnaire_id,sample_import_id,call_max,call_attempt_max,random_select,answering_machine_messages,allow_new)
|
|
VALUES('$questionnaire_id','$sid','$cm','$cam','$selecttype','$am', '$an')";
|
|
|
|
$db->Execute($sql);
|
|
|
|
}
|
|
|
|
if (isset($_POST['edit']))
|
|
{
|
|
//need to add sample to questionnaire
|
|
|
|
$questionnaire_id = bigintval($_POST['questionnaire_id']);
|
|
$sid = bigintval($_POST['sample_import_id']);
|
|
$cm = bigintval($_POST['call_max']);
|
|
$cam = bigintval($_POST['call_attempt_max']);
|
|
$am = bigintval($_POST['answering_machine_messages']);
|
|
$selecttype = 0;
|
|
if (isset($_POST['selecttype'])) $selecttype = 1;
|
|
$an = 0;
|
|
if (isset($_POST['allownew'])) $an = 1;
|
|
|
|
|
|
|
|
$sql = "UPDATE questionnaire_sample
|
|
SET call_max = '$cm',
|
|
call_attempt_max = '$cam',
|
|
random_select = '$selecttype',
|
|
answering_machine_messages = '$am',
|
|
allow_new = '$an'
|
|
WHERE questionnaire_id = '$questionnaire_id'
|
|
AND sample_import_id = '$sid'";
|
|
|
|
$db->Execute($sql);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (isset($_GET['questionnaire_id']) && isset($_GET['rsid']))
|
|
{
|
|
$questionnaire_id = bigintval($_GET['questionnaire_id']);
|
|
$sid = bigintval($_GET['rsid']);
|
|
|
|
if (isset($_GET['edit']))
|
|
{
|
|
xhtml_head(T_("Assign Sample: Select sample to assign"),true,array("../css/table.css"),array("../js/window.js"));
|
|
|
|
$sql = "SELECT si.description as description,
|
|
qr.description as qdescription,
|
|
q.call_max,
|
|
q.call_attempt_max,
|
|
q.random_select,
|
|
q.answering_machine_messages,
|
|
q.allow_new
|
|
FROM questionnaire_sample as q, sample_import as si, questionnaire as qr
|
|
WHERE q.sample_import_id = si.sample_import_id
|
|
AND q.questionnaire_id = '$questionnaire_id'
|
|
AND si.sample_import_id = '$sid'
|
|
AND qr.questionnaire_id = q.questionnaire_id";
|
|
|
|
$qs = $db->GetRow($sql);
|
|
|
|
print "<h1>" . T_("Edit sample details") . "<h1>";
|
|
print "<h2>" . T_("Questionnaire") . ": " . $qs['qdescription'] . "</h2>";
|
|
print "<h2>" . T_("Sample") . ": " . $qs['description'] . "</h2>";
|
|
|
|
print "<p><a href='?questionnaire_id=$questionnaire_id'>" . T_("Go back") . "</a></p>";
|
|
|
|
$allownew = $selected ="";
|
|
if ($qs['random_select'] == 1)
|
|
$selected = "checked=\"checked\"";
|
|
if ($qs['allow_new'] == 1)
|
|
$allownew = "checked=\"checked\"";
|
|
|
|
?>
|
|
<form action="?questionnaire_id=<?php echo $questionnaire_id;?>" method="post">
|
|
<label for="call_max"><?php echo T_("Max calls (0 for unlimited)"); ?></label><input type="text" name="call_max" id="call_max" value="<?php echo $qs['call_max'];?>"/><br/>
|
|
<label for="call_attempt_max"><?php echo T_("Max call attempts (0 for unlimited)"); ?></label><input type="text" name="call_attempt_max" id="call_attempt_max" value="<?php echo $qs['call_attempt_max'];?>"/> <br/>
|
|
<label for="answering_machine_messages"><?php echo T_("Number of answering machine messages to leave per case (0 for never)"); ?></label><input type="text" name="answering_machine_messages" id="answering_machine_messages" value="<?php echo $qs['answering_machine_messages'];?>"/> <br/>
|
|
<label for="selecttype"><?php echo T_("Select from sample randomly? (otherwise sequentially)"); ?></label><input type="checkbox" id = "selecttype" name="selecttype" <?php echo $selected;?> /> <br/>
|
|
<label for="allownew"><?php echo T_("Allow new numbers to be drawn?"); ?></label><input type="checkbox" id = "allownew" name="allownew" <?php echo $allownew;?> /> <br/>
|
|
<input type="hidden" name="questionnaire_id" value="<?php print($questionnaire_id); ?>"/>
|
|
<input type="hidden" name="sample_import_id" value="<?php print($sid); ?>"/>
|
|
<input type="submit" name="edit" value="<?php echo T_("Edit"); ?>"/></p>
|
|
</form>
|
|
<?php
|
|
xhtml_foot();
|
|
die();
|
|
}
|
|
else
|
|
{
|
|
//need to remove rsid from questionnaire
|
|
$sql = "DELETE FROM questionnaire_sample
|
|
WHERE questionnaire_id = '$questionnaire_id'
|
|
AND sample_import_id = '$sid'";
|
|
|
|
$db->Execute($sql);
|
|
}
|
|
}
|
|
|
|
|
|
$questionnaire_id = false;
|
|
if (isset($_GET['questionnaire_id'])) $questionnaire_id = bigintval($_GET['questionnaire_id']);
|
|
|
|
xhtml_head(T_("Assign Sample: Select sample to assign"),true,array("../css/table.css"),array("../js/window.js"));
|
|
print "<h1>" . T_("Select a questionnaire from the list below") . "</h1>";
|
|
display_questionnaire_chooser($questionnaire_id);
|
|
|
|
|
|
if ($questionnaire_id != false)
|
|
{
|
|
print "<h1>" . T_("Samples selected for this questionnaire") . "</h1>";
|
|
|
|
$sql = "SELECT si.description as description,
|
|
CASE WHEN q.call_max = 0 THEN '" . TQ_("Unlimited") . "' ELSE q.call_max END as call_max,
|
|
CASE WHEN q.call_attempt_max = 0 THEN '" . TQ_("Unlimited") . "' ELSE q.call_attempt_max END AS call_attempt_max,
|
|
CASE WHEN q.random_select = 0 THEN '" . TQ_("Sequential") . "' ELSE '". TQ_("Random") . "' END as random_select,
|
|
CASE WHEN q.answering_machine_messages = 0 THEN '" . TQ_("Never") . "' ELSE q.answering_machine_messages END as answering_machine_messages,
|
|
CASE WHEN q.allow_new = 0 THEN '" . TQ_("No") . "' ELSE '".TQ_("Yes")."' END as allow_new,
|
|
CONCAT('<a href=\"?edit=edit&questionnaire_id=$questionnaire_id&rsid=', si.sample_import_id ,'\">" . TQ_("Edit") ."</a>') as edit,
|
|
CONCAT('<a href=\"?questionnaire_id=$questionnaire_id&rsid=', si.sample_import_id ,'\">" . TQ_("Click to unassign") ."</a>') as unassign
|
|
FROM questionnaire_sample as q, sample_import as si
|
|
WHERE q.sample_import_id = si.sample_import_id
|
|
AND q.questionnaire_id = '$questionnaire_id'";
|
|
|
|
$qs = $db->GetAll($sql);
|
|
|
|
if (!empty($qs))
|
|
xhtml_table($qs,array("description","call_max","call_attempt_max","answering_machine_messages","random_select","allow_new","edit","unassign"),array(T_("Sample"), T_("Max calls"), T_("Max call attempts"), T_("Answering machine messages"), T_("Selection type"), T_("Allow new numbers to be drawn?"), T_("Edit"), T_("Unassign sample") ));
|
|
else
|
|
print "<p>" . T_("No samples selected for this questionnaire") . "</p>";
|
|
|
|
$sql = "SELECT si.sample_import_id,si.description
|
|
FROM sample_import as si
|
|
LEFT JOIN questionnaire_sample as q ON (q.questionnaire_id = '$questionnaire_id' AND q.sample_import_id = si.sample_import_id)
|
|
WHERE q.questionnaire_id is NULL
|
|
AND si.enabled = 1";
|
|
|
|
$qs = $db->GetAll($sql);
|
|
|
|
if (!empty($qs))
|
|
{
|
|
|
|
|
|
print "<h1>" . T_("Add a sample to this questionnaire:") . "</h1>";
|
|
?>
|
|
<form action="" method="get">
|
|
<p><label for="sample"><?php echo T_("Select sample:"); ?></label><select name="sample" id="sample">
|
|
<?php
|
|
|
|
foreach($qs as $q)
|
|
{
|
|
print "<option value=\"{$q['sample_import_id']}\">{$q['description']}</option>";
|
|
}
|
|
|
|
?>
|
|
</select><br/>
|
|
<label for="call_max"><?php echo T_("Max calls (0 for unlimited)"); ?></label><input type="text" name="call_max" id="call_max" value="0"/><br/>
|
|
<label for="call_attempt_max"><?php echo T_("Max call attempts (0 for unlimited)"); ?></label><input type="text" name="call_attempt_max" id="call_attempt_max" value="0"/> <br/>
|
|
<label for="answering_machine_messages"><?php echo T_("Number of answering machine messages to leave per case (0 for never)"); ?></label><input type="text" name="answering_machine_messages" id="answering_machine_messages" value="1"/> <br/>
|
|
<label for="selecttype"><?php echo T_("Select from sample randomly? (otherwise sequentially)"); ?></label><input type="checkbox" id = "selecttype" name="selecttype" /> <br/>
|
|
<label for="allownew"><?php echo T_("Allow new numbers to be drawn?"); ?></label><input type="checkbox" id = "allownew" name="allownew" checked="checked" /> <br/>
|
|
<input type="hidden" name="questionnaire_id" value="<?php print($questionnaire_id); ?>"/>
|
|
<input type="submit" name="add_sample" value="<?php echo T_("Add sample");?>"/></p>
|
|
</form>
|
|
<?php
|
|
}
|
|
}
|
|
xhtml_foot();
|
|
|
|
|
|
?>
|