mirror of
https://github.com/ACSPRI/queXS
synced 2024-04-02 12:12:16 +00:00
ae5c2f8431
Changed id's of self completion outcomes to allow for a few custom ones to not effect Added email validation and token getting functions Optout function of limesurvey to set outcome to refused and add a case note for clarity Need to do: Complete email function to actually send an email invitation
116 lines
3.3 KiB
PHP
116 lines
3.3 KiB
PHP
<?php
|
|
/*
|
|
* LimeSurvey
|
|
* Copyright (C) 2007 The LimeSurvey Project Team / Carsten Schmitz
|
|
* All rights reserved.
|
|
* License: GNU/GPL License v2 or later, see LICENSE.php
|
|
* LimeSurvey is free software. This version may have been modified pursuant
|
|
* to the GNU General Public License, and as distributed it includes or
|
|
* is derivative of works licensed under the GNU General Public License or
|
|
* other free or open source software licenses.
|
|
* See COPYRIGHT.php for copyright notices and details.
|
|
*
|
|
* $Id: optout.php 11664 2011-12-16 05:19:42Z tmswhite $
|
|
*/
|
|
|
|
// Security Checked: POST, GET, SESSION, REQUEST, returnglobal, DB
|
|
|
|
require_once(dirname(__FILE__).'/classes/core/startup.php'); // Since this file can be directly run
|
|
require_once(dirname(__FILE__).'/config-defaults.php');
|
|
require_once(dirname(__FILE__).'/common.php');
|
|
require_once($rootdir.'/classes/core/language.php');
|
|
|
|
$surveyid=returnglobal('sid');
|
|
$postlang=returnglobal('lang');
|
|
$token=returnglobal('token');
|
|
|
|
//Check that there is a SID
|
|
if (!isset($surveyid))
|
|
{
|
|
//You must have an SID to use this
|
|
include "index.php";
|
|
exit;
|
|
}
|
|
|
|
// Get passed language from form, so that we dont loose this!
|
|
if (!isset($postlang) || $postlang == "")
|
|
{
|
|
$baselang = GetBaseLanguageFromSurveyID($surveyid);
|
|
$clang = new limesurvey_lang($baselang);
|
|
} else {
|
|
$clang = new limesurvey_lang($postlang);
|
|
$baselang = $postlang;
|
|
}
|
|
$thissurvey=getSurveyInfo($surveyid,$baselang);
|
|
|
|
$html='<div id="wrapper"><p id="optoutmessage">';
|
|
if ($thissurvey==false || !tableExists("tokens_{$surveyid}")){
|
|
$html .= $clang->gT('This survey does not seem to exist.');
|
|
}
|
|
else
|
|
{
|
|
$usquery = "SELECT emailstatus from ".db_table_name("tokens_{$surveyid}")." where token=".db_quoteall($token,true);
|
|
$usresult = $connect->GetOne($usquery);
|
|
|
|
if ($usresult==false)
|
|
{
|
|
$html .= $clang->gT('You are not a participant in this survey.');
|
|
}
|
|
elseif ($usresult=='OK')
|
|
{
|
|
$usquery = "Update ".db_table_name("tokens_{$surveyid}")." set emailstatus='OptOut', usesleft=0 where token=".db_quoteall($token,true);
|
|
$usresult = $connect->Execute($usquery);
|
|
|
|
//queXS addition
|
|
|
|
//Set to Hard Refusal, respondent
|
|
$sql = "UPDATE `case`
|
|
SET current_outcome_id = 9
|
|
WHERE token = '$token'";
|
|
|
|
$connect->Execute($sql);
|
|
|
|
$sql = "SELECT case_id
|
|
FROM `case`
|
|
WHERE token = '$token'";
|
|
|
|
$case_id = $connect->GetOne($sql);
|
|
|
|
|
|
//Add a case note to clarify (need to translate this string)
|
|
$sql = "INSERT INTO `case_note` (case_id,operator_id,note,datetime)
|
|
VALUES ($case_id,1,'Self completion refused via opt out function',NOW())";
|
|
|
|
$connect->Execute($sql);
|
|
|
|
$html .= $clang->gT('You have been successfully removed from this survey.');
|
|
}
|
|
else
|
|
{
|
|
$html .= $clang->gT('You have been already removed from this survey.');
|
|
}
|
|
}
|
|
$html .= '</p></div>';
|
|
|
|
//PRINT COMPLETED PAGE
|
|
if (!$thissurvey['templatedir'])
|
|
{
|
|
$thistpl=sGetTemplatePath($defaulttemplate);
|
|
}
|
|
else
|
|
{
|
|
$thistpl=sGetTemplatePath($thissurvey['templatedir']);
|
|
}
|
|
|
|
sendcacheheaders();
|
|
doHeader();
|
|
|
|
echo templatereplace(file_get_contents("$thistpl/startpage.pstpl"));
|
|
echo templatereplace(file_get_contents("$thistpl/survey.pstpl"));
|
|
echo $html;
|
|
echo templatereplace(file_get_contents("$thistpl/endpage.pstpl"));
|
|
|
|
doFooter();
|
|
|
|
// Closing PHP tag is intentially left out (yes, it's fine!)
|