2
0
mirror of https://github.com/ACSPRI/queXS synced 2024-04-02 12:12:16 +00:00

Opt out of web when opting out of CATI

This commit is contained in:
Adam Zammit
2017-05-11 10:41:30 +10:00
parent ca63e77654
commit c31f080581

View File

@@ -2301,6 +2301,22 @@ function end_case($operator_id)
$o = $db->Execute($sql); $o = $db->Execute($sql);
//if this is a refusal outcome - set Limesurvey as opt-out
$sql = "SELECT lime_sid
FROM questionnaire
WHERE questionnaire_id = '$questionnaire_id'";
$lime_sid = $db->GetOne($sql);
$sql = "UPDATE ".LIME_PREFIX."tokens_$lime_sid as t, `case` as c, `outcome` as o
SET t.emailstatus = 'OptOut'
WHERE t.token = c.token
AND c.case_id = '$case_id'
AND o.outcome_id = '$outcome'
AND o.outcome_type_id = 3";
$db->Execute($sql);
$return = true; $return = true;
} }
else else