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
Files
11df5b93b52068d31def1098de9a99b7f9ea7279
CATI_Tool/email.php

263 lines
8.0 KiB
PHP
Raw Blame History

<?php
/**
* Popup screen to manage calling and hanging up and assigning outcomes to calls
*
*
* 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@acspri.org.au>
* @copyright Australian Consortium for Social and Political Research Incorporated (ACSPRI) 2013
* @package queXS
* @subpackage user
* @link http://www.acspri.org.au/ queXS was writen for ACSPRI
* @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");
/**
* Operator functions
*/
include("functions/functions.operator.php");
/**
* Input functions
*/
include("functions/functions.input.php");
/**
* LimeSurvey functions
*/
include("functions/functions.limesurvey.php");
global $db;
$operator_id = get_operator_id();
$msg = "";
if (isset($_POST['firstname']))
{
//validate email address
if (validate_email($_POST['email']))
{
$case_id = get_case_id($operator_id);
$lime_sid = get_lime_sid($case_id);
$token = get_token($case_id);
$email = $db->qstr($_POST['email']);
$firstname = $db->qstr($_POST['firstname']);
$lastname = $db->qstr($_POST['lastname']);
//update the limesurvey database email details
$sql = "UPDATE " . LIME_PREFIX ."tokens_{$lime_sid}
SET email = $email, firstname = $firstname, lastname = $lastname, emailstatus = 'OK'
WHERE token = '$token'";
$db->Execute($sql);
//Send email
include_once("include/limesurvey/classes/phpmailer/class.phpmailer.php");
$fieldsarray = array();
$fieldsarray["{EMAIL}"]=$_POST['email'];
$fieldsarray["{FIRSTNAME}"]=$_POST['firstname'];
$fieldsarray["{LASTNAME}"]=$_POST['lastname'];
$fieldsarray["{TOKEN}"]=$token;
$fieldsarray["{LANGUAGE}"]=DEFAULT_LOCALE;
$fieldsarray["{SID}"]=$fieldsarray["{SURVEYID}"]=$lime_sid;
//$fieldsarray["{SURVEYNAME}"]=$thissurvey["surveyls_title"];
$sql = "SELECT s.var,s.val
FROM `sample_var` as s, `case` as c
WHERE c.case_id = $case_id
AND s.sample_id = c.sample_id";
$attributes = $db->GetAssoc($sql);
//Assign sample variables
foreach ($attributes as $attributefield=>$val)
{
$fieldsarray['{SAMPLE:'.strtoupper($attributefield).'}']=$val;
}
$fieldsarray["{OPTOUTURL}"]=LIME_URL . "optout.php?lang=".trim(DEFAULT_LOCALE)."&sid=$lime_sid&token={$token}";
$fieldsarray["{SURVEYURL}"]=LIME_URL . "index.php?lang=".trim(DEFAULT_LOCALE)."&sid=$lime_sid&token={$token}";
$barebone_link=$fieldsarray["{SURVEYURL}"];
$customheaders = array( '1' => "X-surveyid: ".$lime_sid, '2' => "X-tokenid: ".$fieldsarray["{TOKEN}"]);
$sql = "SELECT surveyls_email_invite_subj, surveyls_email_invite
FROM `lime_surveys_languagesettings`
WHERE `surveyls_survey_id` = $lime_sid
order by surveyls_language LIKE '" . DEFAULT_LOCALE . "' DESC";
$econtent = $db->GetRow($sql);
$modsubject = $econtent['surveyls_email_invite_subj'];
$modmessage = $econtent['surveyls_email_invite'];
foreach ( $fieldsarray as $key => $value )
{
$modsubject=str_replace($key, $value, $modsubject);
}
foreach ( $fieldsarray as $key => $value )
{
$modmessage=str_replace($key, $value, $modmessage);
}
$modsubject = str_replace("@@SURVEYURL@@", $barebone_link, $modsubject);
$modmessage = str_replace("@@SURVEYURL@@", $barebone_link, $modmessage);
$mail = new PHPMailer;
$sql = "SELECT stg_value
FROM " . LIME_PREFIX . "settings_global
WHERE stg_name LIKE 'siteadminemail'";
$fromemail = $db->GetOne($sql);
$sql = "SELECT stg_value
FROM " . LIME_PREFIX . "settings_global
WHERE stg_name LIKE 'siteadminname'";
$fromname = $db->GetOne($sql);
$mail->SetFrom($fromemail,$fromname);
$mail->AddAddress($_POST['email']);
foreach ($customheaders as $key=>$val)
{
$mail->AddCustomHeader($val);
}
$mail->AddCustomHeader("X-Surveymailer: queXS Emailer (quexs.sourceforge.net)");
$mail->IsHTML(true);
$mail->Body = $modmessage;
$mail->AltBody = trim(strip_tags(html_entity_decode($modmessage,ENT_QUOTES,'UTF-8')));
$mail->Subject = $modsubject;
if ($mail->Send())
{
// Put date into sent
$today = date("Y-m-d H:i:s");
$sql = "UPDATE ". LIME_PREFIX . "tokens_{$lime_sid}
SET sent='$today'
WHERE token='$token'";
$db->Execute($sql);
//Add a note that sent
$sql = "INSERT INTO `case_note` (case_id,operator_id,note,datetime)
VALUES ($case_id,$operator_id,'" . T_("Self completion invitation sent via email to") . ": " . $_POST['email'] . "',NOW())";
$db->Execute($sql);
if (isset($_POST['submith']))
{
end_call($operator_id,41); //end with outcome sent
if (is_voip_enabled($operator_id))
{
include("functions/functions.voip.php");
$v = new voip();
$v->connect(VOIP_SERVER);
$v->hangup(get_extension($operator_id));
}
//disable recording
$newtext = T_("Start REC");
$js = "js/window.js";
if (browser_ie()) $js = "js/window_ie6.js";
xhtml_head(T_("Email"),true,array("css/call.css"),array($js),"onload='toggleRec(\"$newtext\",\"record.php?start=start\",\"offline\"); openParentObject(\"main-content\",\"" . get_respondentselection_url($operator_id) . "\"); parent.closePopup();'");
}
else if (isset($_POST['submit']))
{
/*
$call_id = get_call($operator_id);
$sql = "UPDATE `call` as c
SET c.outcome_id = 41
WHERE c.call_id = $call_id";
$db->Execute($sql);
*/
xhtml_head(T_("Email"),true,array("css/call.css"),array($js),"onload='parent.closePopup();'");
}
xhtml_foot();
die();
}
else
{
$msg = T_("The email did not send");
}
}
else
{
$msg = T_("The email address is not valid");
}
}
$case_id = get_case_id($operator_id);
$js = "js/window.js";
if (browser_ie()) $js = "js/window_ie6.js";
xhtml_head(T_("Email"),true,array("css/call.css"),array($js));
$sql = "SELECT sv1.val as firstname, sv2.val as lastname, sv3.val as email
FROM `case` as c
LEFT JOIN sample_var as sv1 on (sv1.sample_id = c.sample_id AND sv1.type = 6)
LEFT JOIN sample_var as sv2 on (sv2.sample_id = c.sample_id AND sv2.type = 7)
LEFT JOIN sample_var as sv3 on (sv3.sample_id = c.sample_id AND sv3.type = 8)
WHERE c.case_id = $case_id";
$rs = $db->GetRow($sql);
print "<div class='status'>" . T_("Email respondent for self completion") . "</div>";
if (!empty($msg)) print "<p>$msg</p>";
print "<form action='?' method='post'>";
print "<div><label for='firstname'>" . T_("First name") . "</label><input type='text' value='{$rs['firstname']}' name='firstname' id='firstname'/></div>";
print "<div><label for='lastname'>" . T_("Last name") . "</label><input type='text' value='{$rs['lastname']}' name='lastname' id='lastname'/></div>";
print "<div><label for='email'>" . T_("Email") . "</label><input type='text' value='{$rs['email']}' name='email' id='email'/></div>";
print "<div><input type='submit' value='" . T_("Send invitation") . "' name='submit' id='submit'/></div>";
print "<div><input type='submit' value='" . T_("Send invitation and Hang up") . "' name='submith' id='submith'/></div></form>";
xhtml_foot();
?>
Reference in New Issue View Git Blame Copy Permalink