* @version v0.13.46
* @package ProEthos-Admin
* @subpackage Dictamen Model
*/
require "cab.php";
/* Admin Common */
$ok = ($perfil->valid('#ADM') or $perfil->valid('#SCR') or $perfil->valid('#COO'));
if ($ok == 0) {
redirecina('main.php');
}
global $acao, $dd, $cp, $tabela;
require $include . 'sisdoc_colunas.php';
require $include . 'sisdoc_debug.php';
/* Dados da Classe */
require '_class/_class_dictamen.php';
$clx = new dictamen();
$cp = $clx->cp_modelo();
/* N�o alterar - dados comuns */
$label = msg($tabela);
$http_edit = 'admin_parecer_modelo_ed.php';
//$http_ver = 'pibic_bolsa_tipo_detalhe.php';
$editar = True;
$http_redirect = 'admin_parecer_modelo.php';
$clx->row_modelo();
$busca = true;
$offset = 20;
//$pre_where = " e_mailing = '".$cl->mail_codigo."' ";
if ($order == 0) {
$order = $cdf[3] . ' ,' . $cdf[2];
}
echo '<TABLE width="' . $tab_max . '" align="center"><TR><TD>';
function create_pdf($caae, $save = 0)
{
global $include, $ged;
$ged->dir('document');
$ged->dir('document/' . date("Y"));
$ged->dir('document/' . date("Y") . '/' . date("m"));
$this->filemane = 'document/' . date("Y") . '/' . date("m") . '/' . $caae . substr(md5(date("YmdHis") . $caae), 5, 5) . '_dictamen.pdf';
$destino = $this->filemane;
$dic = new dictamen();
$dic->le_parecer($caae);
require "dictamen_pdf_projeto.php";
$sx = '<A HREF="dictamen_pdf.php?dd1=' . $caae . '" target="new">';
echo $sx;
}
require 'cab.php';
/* Admin Common */
$ok = ($perfil->valid('#ADM') or $perfil->valid('#SCR') or $perfil->valid('#COO'));
if ($ok == 0) {
redirecina('main.php');
}
require '_class/_class_dictamen.php';
$ln = new message();
global $acao, $dd, $cp, $tabela;
require $include . 'sisdoc_colunas.php';
require $include . '_class_form.php';
require $include . 'sisdoc_data.php';
require $include . 'sisdoc_debug.php';
$form = new form();
require "form_css.php";
$cl = new dictamen();
$cp = $cl->cp_modelo();
$http_edit = 'admin_parecer_modelo_ed.php';
$http_redirect = '';
$tit = msg("titulo");
/** Comandos de Edicao */
echo '<CENTER><font class=lt5>' . msg('titulo') . '</font></CENTER>';
echo '<table width="100%"><TR><TD>';
$tela = $form->editar($cp, $tabela);
/** Caso o registro seja validado */
if ($form->saved > 0) {
echo "SALVO";
$cl->updatex();
redirecina('admin_parecer_modelo.php');
} else {
echo $tela;
// 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
require "db.php";
require $include . 'sisdoc_debug.php';
global $messa;
require '_class/_class_ged.php';
$ged = new ged();
require '_class/_class_cep.php';
$cep = new cep();
require '_class/_class_dictamen.php';
$dict = new dictamen();
/* Mensagens do sistema */
require "_class/_class_message.php";
$edit_mode = round($_SESSION['editmode']);
$file = 'messages/msg_' . $LANG . '.php';
$LANG = $lg->language_read();
if (file_exists($file)) {
require $file;
} else {
echo 'message not found ' . $file;
}
if (strlen($acao) > 0) {
$ok = $dict->dictamen_save($dd);
$proto = $dd[1];
$caae = $dd[1];
$cep->caae = $caae;
//echo $LANG;
/* Enable UPload File to the Perfis */
$fechado = 0;
switch ($cep->status) {
case 'P':
$fechado = 1;
break;
}
if ($perfil->valid('#SCR#MAS#COO#ADM') and $fechado == 0) {
echo $ged->upload_botton_with_type($protocolo);
}
echo '</table>';
/* Dictamen */
if ($cep->status == 'D') {
require "_class/_class_dictamen.php";
$dict = new dictamen();
$dict->protocol = $cep->protocolo;
echo $dict->mostra_pareceres_emitidos();
}
echo '<BR>';
if ($perfil->valid('#ADM') or $perfil->valid('#MAS') or $perfil->valid('#SCR')) {
/* Comunication with investigator */
$email1 = trim($cep->line['us_email']);
$email2 = trim($cep->line['us_email_alt']);
$postnew = $comu->post_new_message($email1, $email2);
echo '<table width="100%" border=0 class="table_normal" >';
echo '<TR class="hd"><TD>' . msg('messages_with_investigator');
echo '</table>';
/***************************************************************************************/
echo '<div id="mail">';
echo '<fieldset><legend>' . msg('messages_with_investigator') . '</legend>';
// 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.
//
// 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
require "db.php";
require "_class/_class_dictamen.php";
$dic = new dictamen();
require "_class/_class_cep.php";
$cep = new cep();
$id = $dd[1];
$ps = $dd[90];
if (checkpost($id) != $ps) {
echo 'Post Error!';
exit;
}
$dic->le_parecer_id($dd[1]);
/* Mensagens do sistema */
require "_class/_class_message.php";
$file = 'messages/msg_' . $LANG . '.php';
$LANG = $lg->language_read();
if (file_exists($file)) {
require $file;
