redirect("admin/experiment_main.php");
}
}
if ($proceed) {
if (isset($_REQUEST['session_id']) && $_REQUEST['session_id']) {
$session_id = $_REQUEST['session_id'];
} else {
$session_id = '';
}
if (isset($_REQUEST['pstatus'])) {
$pstatus = $_REQUEST['pstatus'];
} else {
$pstatus = '';
}
if (isset($_REQUEST['focus']) && $_REQUEST['focus']) {
$focus = $_REQUEST['focus'];
} else {
$focus = '';
}
if (isset($_REQUEST['search_sort']) && $_REQUEST['search_sort']) {
$sort = $_REQUEST['search_sort'];
} else {
$sort = '';
}
if (!check_allow('experiment_restriction_override')) {
check_experiment_allowed($experiment_id, "admin/experiment_show.php?experiment_id=" . $experiment_id);
}
}
if ($proceed) {
pdfoutput__make_part_list($experiment_id, $session_id, $pstatus, $focus, $sort);
}
function experimentmail__send_registration_notice($line)
{
global $settings;
$reg = experiment__count_participate_at($line['experiment_id'], $line['session_id']);
$experimenters = db_string_to_id_array($line['experimenter_mail']);
foreach ($experimenters as $experimenter) {
$admin = orsee_db_load_array("admin", $experimenter, "admin_id");
if (isset($admin['admin_id'])) {
$tlang = $admin['language'] ? $admin['language'] : $settings['admin_standard_language'];
$lang = load_language($tlang);
$admin['session_name'] = session__build_name($line, $tlang);
$admin['experiment_name'] = $line['experiment_name'];
$admin['registered'] = $reg;
$admin['status'] = session__get_status($line, $tlang, $reg);
$admin['needed'] = $line['part_needed'];
$admin['reserve'] = $line['part_reserve'];
$subject = load_language_symbol('subject_for_registration_notice', $tlang);
$subject .= ' ' . $admin['experiment_name'] . ', ' . $admin['session_name'];
$recipient = $admin['email'];
$mailtext = load_mail("admin_registration_notice", $tlang) . "\n" . experimentmail__get_admin_footer($tlang, $admin) . "\n";
$message = process_mail_template($mailtext, $admin);
$now = time();
$list_name = lang('participant_list_filename') . ' ' . date("Y-m-d", $now);
$list_filename = str_replace(" ", "_", $list_name) . ".pdf";
$list_file = pdfoutput__make_part_list($line['experiment_id'], $line['session_id'], 'registered', 'lname,fname', true, $tlang);
$done = experimentmail__mail_attach($recipient, $settings['support_mail'], $subject, $message, $list_filename, $list_file);
}
}
// update session table : reg_notice_sent
$pars = array(':session_id' => $line['session_id']);
$query = "UPDATE " . table('sessions') . " SET reg_notice_sent='y' WHERE session_id= :session_id ";
$done2 = or_query($query, $pars);
return $done;
}
