echo '<FORM action="' . thisdoc() . '" method="post">
<INPUT type=hidden name="experiment_id" value="' . $experiment_id . '">
<INPUT type=hidden name="id" value="' . $experiment_mail['lang_id'] . '">
<TABLE class="or_formtable" style="width: 80%;">';
foreach ($inv_langs as $inv_lang) {
// split in subject and text
$subject = str_replace(strstr($experiment_mail[$inv_lang], "\n"), "", $experiment_mail[$inv_lang]);
$body = substr($experiment_mail[$inv_lang], strpos($experiment_mail[$inv_lang], "\n") + 1, strlen($experiment_mail[$inv_lang]));
// set defaults if not existent
if (!$subject) {
$subject = load_language_symbol('email_session_reminder_subject', $inv_lang);
}
if (!$body) {
//$body=load_mail('default_invitation_'.$experiment['experiment_type'],$inv_lang);
$body = load_mail('public_session_reminder', $inv_lang);
}
if (count($inv_langs) > 1) {
echo '<TR><TD colspan=2>
<TABLE width="100%" border=0 class="or_panel_title"><TR>
<TD style="background: ' . $color['panel_title_background'] . '; color: ' . $color['panel_title_textcolor'] . '">
' . $inv_lang . ':
</TD>
</TR></TABLE>
</TD></TR>';
}
echo '
<TR>
<TD>' . lang('subject') . ':</TD>
<TD><INPUT type=text name="' . $inv_lang . '_subject" size=30 maxlength=80 value="' . stripslashes($subject) . '"></TD>
</TR>
function experimentmail__send_participant_statistics()
{
global $lang, $settings;
$now = time();
$from = $settings['support_mail'];
$headers = "From: " . $from . "\r\n";
// remember the current language for later reset
$old_lang = lang('lang');
// preload details with current language
$maillang = $old_lang;
$statistics = stats__get_textstats_for_email();
$subject = load_language_symbol('subject_pool_statistics', $maillang) . ' ' . ortime__format($now, 'hide_time:true');
// get experimenters who want to receive the statistics
$query = "SELECT *\n FROM " . table('admin') . "\n WHERE get_statistics_mail='y'\n AND disabled='n'\n ORDER BY language";
$result = or_query($query);
$i = 0;
$rec_count = pdo_num_rows($result);
while ($admin = pdo_fetch_assoc($result)) {
if ($admin['language'] != $maillang) {
$maillang = $admin['language'];
$lang = load_language($maillang);
$statistics = stats__get_textstats_for_email();
$subject = load_language_symbol('subject_pool_statistics', $maillang) . ' ' . ortime__format($now, 'hide_time:true', $maillang);
}
$mailtext = load_mail("admin_participant_statistics_mailtext", $maillang) . "\n\n" . $statistics . "\n" . experimentmail__get_admin_footer($maillang, $admin) . "\n";
$message = process_mail_template($mailtext, $admin);
$done = experimentmail__mail($admin['email'], $subject, $message, $headers);
if ($done) {
$i++;
}
}
// reset language
if ($maillang != $old_lang) {
$lang = load_language($old_lang);
}
return "statistics sent to " . $i . " out of " . $rec_count . " administrators\n";
}
// form
echo '<FORM action="' . thisdoc() . '" method="post">
<INPUT type=hidden name="experiment_id" value="' . $experiment_id . '">
<INPUT type=hidden name="id" value="' . $experiment_mail['lang_id'] . '">
<TABLE class="or_formtable" style="width: 80%;">';
foreach ($inv_langs as $inv_lang) {
// split in subject and text
$subject = str_replace(strstr($experiment_mail[$inv_lang], "\n"), "", $experiment_mail[$inv_lang]);
$body = substr($experiment_mail[$inv_lang], strpos($experiment_mail[$inv_lang], "\n") + 1, strlen($experiment_mail[$inv_lang]));
// set defaults if not existent
if (!$subject) {
$subject = load_language_symbol('def_expmail_subject', $inv_lang);
}
if (!$body) {
$body = load_mail('default_invitation_' . $experiment['experiment_type'], $inv_lang);
}
if (count($inv_langs) > 1) {
echo '<TR><TD colspan=2>
<TABLE width="100%" border=0 class="or_panel_title"><TR>
<TD style="background: ' . $color['panel_title_background'] . '; color: ' . $color['panel_title_textcolor'] . '">
' . $inv_lang . ':
</TD>
</TR></TABLE>
</TD></TR>';
}
echo '
<TR>
<TD>
' . lang('subject') . ':
</TD>
// form
echo '<FORM action="' . thisdoc() . '" method="post">
<INPUT type=hidden name="experiment_id" value="' . $experiment_id . '">
<INPUT type=hidden name="id" value="' . $experiment_mail['lang_id'] . '">
<TABLE class="or_formtable" style="width: 80%;">';
foreach ($inv_langs as $inv_lang) {
// split in subject and text
$subject = str_replace(strstr($experiment_mail[$inv_lang], "\n"), "", $experiment_mail[$inv_lang]);
$body = substr($experiment_mail[$inv_lang], strpos($experiment_mail[$inv_lang], "\n") + 1, strlen($experiment_mail[$inv_lang]));
// set defaults if not existent
if (!$subject) {
$subject = load_language_symbol('enrolment_email_subject', $inv_lang);
}
if (!$body) {
$body = load_mail('public_experiment_registration', $inv_lang);
}
if (count($inv_langs) > 1) {
echo '<TR><TD colspan=2>
<TABLE width="100%" border=0 class="or_panel_title"><TR>
<TD style="background: ' . $color['panel_title_background'] . '; color: ' . $color['panel_title_textcolor'] . '">
' . $inv_lang . ':
</TD>
</TR></TABLE>
</TD></TR>';
}
echo '
<TR>
<TD>' . lang('subject') . ':</TD>
<TD><INPUT type="text" name="' . $inv_lang . '_subject" size=30 maxlength=80 value="' . stripslashes($subject) . '"></TD>
</TR>
