Talenttic_survey/CATI_Tool
2
0
Fork 0
mirror of https://github.com/ACSPRI/queXS synced 2024-04-02 12:12:16 +00:00
Code Issues Releases Activity

Opt out of web when opting out of CATI

Browse Source
This commit is contained in:
Adam Zammit
2017-05-11 12:20:48 +10:00
parent 4b5044d59a
commit bfc6af3d7c
2 changed files with 47 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
functions/functions.limesurvey.php
View File

@@ -185,6 +185,37 @@ function lime_send_email($case_id,$email,$firstname,$lastname)
return $ret;
}
function lime_set_token_properties($case_id,$params = array('emailstatus' => 'OptOut'))
{
global $db;
global $limeRPC;
global $limeKey;
$sql = "SELECT c.token,c.questionnaire_id
FROM `case` as c
WHERE c.case_id = '$case_id'";
$rs = $db->GetRow($sql);
$token = $rs['token'];
$qid = $rs['questionnaire_id'];
$lime_id = limerpc_init_qid($qid);
$ret = false;
if ($lime_id !== false) {
$q = $limeRPC->set_participant_properties($limeKey,$lime_id,array('token' => $token),$params);
if (!isset($q['status'])) {
$ret = true;
}
}
limerpc_close();
return $ret;
}
/** Get completed responses as an array based on the case_id
*/

17
functions/functions.operator.php
View File

@@ -2287,7 +2287,22 @@ function end_case($operator_id)
SET current_operator_id = NULL, current_call_id = NULL, sortorder = NULL, current_outcome_id = '$outcome', last_call_id = '$lastcall'
WHERE case_id = '$case_id'";
$o = $db->Execute($sql);
$o = $db->Execute($sql);
//if this is a refusal outcome - set the Limesurvey token table to opt-out
//this will avoid sending email invitations once refused on the phone
$sql = "SELECT count(*)
FROM outcome
WHERE outcome_type_id = 3
AND outcome_id = $outcome";
$isrefusal = $db->GetOne($sql);
if ($isrefusal > 0) {
include_once(dirname(__FILE__).'/functions.limesurvey.php');
lime_set_token_properties($case_id,array('emailstatus' => 'OptOut'));
}
$return = true;
}