// restricts commercial use of the Software.
//
// ProEthos 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 ProEthos License for more details.
//
// You should have received a copy of the ProEthos License along with the ProEthos
// Software. If not, see
// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt
/**
* Menssages
* @author Rene Faustino Gabriel Junior (Analista-Desenvolvedor)
* @copyright © Pan American Health Organization, 2013. All rights reserved.
* @access public
* @version v.0.13.46
* @package Proethos
* @subpackage Menssages
*/
require 'cab.php';
$ln = new message();
if (is_dir('messages')) {
} else {
mkdir('messages');
}
echo $ln->language_page_create();
echo '<h2>';
echo msg('message_create_with_success');
echo '</h2>';
echo $ln->mensagem_email();
echo '</DIV>';
echo $hd->foot();
$tabela = '';
///********************** SALVAR **/
if (strlen($acao) > 0) {
for ($r = 0; $r < count($cps); $r++) {
if (round($cps[$r][0]) > 0) {
$sql = "update " . $cl->tabela . " set msg_content='" . $dd[$r + 10] . "' ";
$sql .= " where id_msg = " . $cps[$r][0];
$rlt = db_query($sql);
}
if (round($cpi[$r][0]) > 0) {
$sql = "update " . $cl->tabela . " set msg_content='" . $dd[$r + 40] . "' ";
$sql .= " where id_msg = " . $cpi[$r][0];
$rlt = db_query($sql);
}
}
echo $cl->language_page_create();
echo '
<script>
close();
</script>
';
exit;
}
$idm = $cl->idioma();
?>
<form method="post" action="<?php
// This file is part of the ProEthos Software.
//
// Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify
// ProEthos under the terms of the ProEthos License as published by PAHO, which
// restricts commercial use of the Software.
