* @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");
/**
* Return if an client has already been assigned to this questionnaire
*
* @param int $client Client id
* @param int $questionnaire_id Questionnaire id
* @return int 1 if assigned otherwise 0
*
*/
function vq($client_id,$questionnaire_id)
{
global $db;
$sql = "SELECT client_id,questionnaire_id
FROM client_questionnaire
WHERE client_id = '$client_id' and questionnaire_id = '$questionnaire_id'";
$vq = $db->Execute($sql);
return $vq->RecordCount();
}
/**
* Assign an client to a questionnaire
*
* @param int $client_id Client id
* @param int $questionnaire_id Questionnaire id
*
*/
function vqi($client_id,$questionnaire_id)
{
global $db;
$sql = "INSERT INTO
client_questionnaire (client_id,questionnaire_id)
VALUES('$client_id','$questionnaire_id')";
$db->Execute($sql);
}
/**
* Unassign an client from a questionnaire
*
* @param int $client_id Client id
* @param int $questionnaire_id Questionnaire id
*
*/
function vqd($client_id,$questionnaire_id)
{
global $db;
$sql = "DELETE FROM
client_questionnaire
WHERE client_id = '$client_id' and questionnaire_id = '$questionnaire_id'";
$db->Execute($sql);
}
if (isset($_POST['submit']))
{
$db->StartTrans();
$sql = "DELETE
FROM client_questionnaire
WHERE 1";
$db->Execute($sql);
foreach ($_POST as $g => $v)
{
$a = explode("_",$g);
if ($a[0] == "cb")
vqi($a[2],$a[1]);
}
$db->CompleteTrans();
}
$sql = "SELECT questionnaire_id,description
FROM questionnaire
ORDER by questionnaire_id ASC";
$questionnaires = $db->GetAll($sql);
$sql = "SELECT client_id,firstname as description
FROM client
ORDER by client_id ASC";
$clients = $db->GetAll($sql);
xhtml_head(T_("Assign clients to questionnaires"),false,array("../css/table.css"));
?>