* @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"); /** * Authentication */ require ("auth-interviewer.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['email']) && ((isset($_POST['firstname']) && !empty($_POST['firstname'])) || (isset($_POST['lastname']) && !empty($_POST['lastname'])))) { //validate email address if (validate_email($_POST['email'])) { $case_id = get_case_id($operator_id); $lime_sid = get_lime_sid($case_id); $ca = get_call_attempt($operator_id); $token = get_token($case_id); $email = $db->qstr($_POST['email']); $firstname = $db->qstr($_POST['firstname']); $lastname = $db->qstr($_POST['lastname']); //set in Limesurvey //set_participant_properties($sSessionKey, $lime_sid, array['token' => $token], array['email' => $email, 'firstname' => $firstname, 'lastname' => $lastname, 'emailstatus' => 'OK']); if (0) //if mail sent - disable temporarily TODO: update properties in limesurvey { // Put call attempt id in to sent in Limesurvey $sql = "UPDATE ". LIME_PREFIX . "tokens_{$lime_sid} SET sent='$ca' 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,'" . TQ_("Self completion invitation sent via email to") . ": " . $_POST['email'] . "',CONVERT_TZ(NOW(),'System','UTC'))"; $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"); if (isset($_GET['interface2'])) { if (browser_ie()) $js = "js/window_ie6_interface2.js"; else $js = "js/window_interface2.js";} else { if (browser_ie()) $js = "js/window_ie6.js"; else $js = "js/window.js"; } if (isset($_GET['interface2'])) { xhtml_head(T_("Invitation Email"),true,array("css/call.css"),array($js),"onload='openParent(\"endcase=endcase\");'"); } else { xhtml_head(T_("Invitation 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'])) { xhtml_head(T_("Invitation Email"),true,array("css/call.css"),false,"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); if (isset($_GET['interface2'])) { if (browser_ie()) $js = "js/window_ie6_interface2.js"; else $js = "js/window_interface2.js"; } else { if (browser_ie()) $js = "js/window_ie6.js"; else $js = "js/window.js"; } xhtml_head(T_("Invitation Email"),true,array("include/bootstrap/css/bootstrap.min.css"),array($js)); $sql = "SELECT q.self_complete FROM questionnaire as q, `case` as c WHERE c.case_id = $case_id AND c.questionnaire_id = q.questionnaire_id"; $sc = $db->GetOne($sql); if ($sc == 1) { $sql = "SELECT (SELECT sv.val from sample_var as sv, `sample_import_var_restrict` as sivr WHERE sivr.var_id = sv.var_id AND sv.sample_id = c.sample_id AND sivr.type =6) as firstname, (SELECT sv.val from sample_var as sv, `sample_import_var_restrict` as sivr WHERE sivr.var_id = sv.var_id AND sv.sample_id = c.sample_id AND sivr.type =7) as lastname, (SELECT sv.val from sample_var as sv, `sample_import_var_restrict` as sivr WHERE sivr.var_id = sv.var_id AND sv.sample_id = c.sample_id AND sivr.type =8) as email FROM `case` as c WHERE c.case_id = $case_id"; $rs = $db->GetRow($sql); print "

" . T_("Email respondent for self completion") . "

"; if (!empty($msg)) print "

$msg

"; print "
"; print "
"; print "
"; print "
"; if (!isset($_GET['interface2'])) { print "
"; } print "
"; } else { print "

" . T_("Self completion email not available for this questionnaire") . "

"; } xhtml_foot(); ?>