function mostra_pareceres_emitidos()
{
global $dd;
$cep = new cep();
$caae = $this->protocol;
$sql = "select * from cep_protocolos \n\t\t\t\t\tinner join cep_parecer on cep_protocol = pr_protocol \n\t\t\t\t\twhere cep_protocol = '{$caae}' \n\t\t\t\t\tand pr_status = 'A'\n\t\t\t\t\t";
$rlt = db_query($sql);
$sx .= '<table class="tabela00 lt1" width="100%" border=0>';
$sx .= '<TR>
<TH>' . msg('file_tipo') . '
<TH>ID
<TH>' . msg('date') . '
<TH>' . msg('status') . '
<TH>' . msg('status') . '
<TH>' . msg('accompaniment') . '
<TH>' . msg('action') . '
';
while ($line = db_read($rlt)) {
$id = $line['id_pr'];
$rela = round($line['pr_accompaniment']);
$accompaniment = $cep->monitoring($rela);
$link = '<A HREF="#" onclick="newxy2(\'dictamen_pdf.php?dd1=' . $id . '&dd90=' . checkpost($id) . '\',800,600);">Print</A>';
$sx .= '<TR align="center">';
$sx .= '<TD class="border1">';
$sx .= msg('dictamen');
$sx .= '<TD class="border1">';
$sx .= strzero($line['id_pr'], 7);
$sx .= '<TD class="border1">';
$sx .= stodbr($line['pr_data']);
$sx .= '<TD class="border1">';
$sx .= $line['pr_status'];
$sx .= '<TD class="border1">';
$decision = msg('pm_' . trim($line['pr_situacao']));
$sx .= mst($decision);
$sx .= '<TD class="border1">';
$sx .= $accompaniment;
$sx .= '<TD class="border1">';
$sx .= $link;
}
$sx .= '</table>';
return $sx;
}
// Software. If not, see
// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt
/**
* Protocol
* @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 Protocol
*/
/* mark active page to cabmenu */
$active_page = 'research';
require "cab.php";
require "_class/_class_cep.php";
$cep = new cep();
require "_class/_class_cep_submit.php";
require $include . 'sisdoc_colunas.php';
require $include . 'sisdoc_data.php';
require "_class/_class_resume.php";
$rs = new resume();
$proj = new submit();
/* Ajusta protocolos perdidos */
$sql = "update " . $proj->tabela . " set doc_status = '@' where doc_status = '' ";
$rlt = db_query($sql);
/* Buscar projetos do pesquisador */
$proj->doc_autor_principal = $ss->user_codigo;
$pta = $proj->protocolos_todos($dd[1]);
/* Search project form */
echo '<h1>' . msg('project_investigador') . '</h1>';
echo $cep->form_search();
// Software. If not, see
// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt
/**
* Protocol
* @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 Protocol
*/
/* mark active page to cabmenu */
$active_page = 'research';
require "cab.php";
require "_class/_class_cep.php";
$cep = new cep();
require "_class/_class_cep_submit.php";
require $include . 'sisdoc_colunas.php';
require $include . 'sisdoc_data.php';
$proj = new submit();
/* Buscar projetos do pesquisador */
$proj->doc_autor_principal = $ss->user_codigo;
$pta = $proj->protocolos_todos($dd[1]);
$type = $dd[1];
/* project in submission */
echo '<BR>';
echo '<h1>' . msg('caption_status_' . $dd[1]) . '</h1>';
echo '<fieldset>';
$type = $dd[1];
switch ($type) {
case 'problem':
* @package Proethos
* @subpackage Protocol
*/
$breadcrumbs = array();
array_push($breadcrumbs, array('main.php', 'principal'));
array_push($breadcrumbs, array('', 'project'));
require "cab.php";
require $include . "sisdoc_email.php";
require $include . "sisdoc_data.php";
require $include . "sisdoc_autor.php";
require '_class/_class_ic.php';
require '_class/_class_oms.php';
require '_class/_class_cep_email.php';
$comu = new comunication();
require "_class/_class_cep.php";
$cep = new cep();
require '_class/_class_cep_comment.php';
require '_ged_config.php';
$comme = new cep_comment();
/* Project Identifier */
if (strlen($dd[0]) > 0) {
if (!(checkpost($dd[0]) == $dd[90])) {
echo 'erro de post';
exit;
}
$_SESSION['proto_cep'] = $dd[0];
redirecina(page());
} else {
$dd[0] = $_SESSION['proto_cep'];
if (round($dd[0]) <= 0) {
redirecina('main.php');
// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt
/**
* Protocol
* @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 Protocol
*/
require "cab.php";
/* Date Library */
require $include . 'sisdoc_data.php';
/* CEP Class */
require "_class/_class_cep.php";
$cep = new cep();
$ok1 = ($perfil->valid('#ADM') or $perfil->valid('#MAS') or $perfil->valid('#MEM') or $perfil->valid('#SCR') or $perfil->valid('#COO'));
$ok2 = ($perfil->valid('#ADC') and $dd[1] == 'Z');
if ($ok1 or $ok2) {
/* Protocolos de pesquisa */
$sx = $cep->protocolos_avaliacao($dd[1], 'PRO');
if (strlen($sx) > 0) {
echo '<H2>' . msg('protocolos') . '</h2>';
echo '<H4>' . msg('cep_status_' . $dd[1]) . '</h4>';
echo $sx;
echo '<BR>';
}
/* Monitoreo */
$sx = $cep->protocolos_avaliacao($dd[1], 'AME');
if (strlen($sx) > 0) {
echo '<h2>' . msg('monitoreo_protocolos') . '</h2>';
// 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 $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];
$nome = trim($line['pais_nome']);
$pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L');
/* Tipo do Estudo */
$nome = trim($line['cep_study_type']);
if (strlen($nome) > 0) {
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(35, 6, utf8_decode(msg('study_type')), T, T, 'R');
$pdf->SetFont('Arial', 'B', 11);
$pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L');
}
/* pr_accompaniment */
$nome = trim($line['pr_situacao']);
if ($nome == 'APR') {
$rela = round($line['pr_accompaniment']);
/* cria objeto */
$cep = new cep();
$nome = $cep->monitoring($rela);
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(35, 6, utf8_decode(msg('accompaniment')), T, T, 'R');
$pdf->SetFont('Arial', 'B', 11);
$pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L');
}
/* Objetivo do estudo */
$nome = trim($line['cep_goal']);
if (strlen($nome) > 0) {
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(35, 6, utf8_decode(msg('primary goal')), T, T, 'R');
$pdf->SetFont('Arial', 'B', 11);
$pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L');
}
/* Data do parecer */
* @version v0.13.46
* @package ProEthos-Admin
* @subpackage protocols
*/
require "cab.php";
require "_class/_class_cep.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 . '_class_form.php';
$form = new form();
require $include . 'sisdoc_data.php';
$cl = new cep();
$cp = $cl->cep_manual();
$tabela = $cl->tabela;
$http_edit = page();
$http_redirect = '';
/** Comandos de Edicao */
$tela = $form->editar($cp, $tabela);
/** Caso o registro seja validado */
if ($form->saved > 0) {
echo 'Salvo';
$cl->updatex();
redirecina('admin_protocols.php');
} else {
echo $tela;
}
echo '</div>';
array_push($breadcrumbs, array('', 'project'));
require "cab.php";
require $include . '_class_form.php';
$form = new form();
require "form_css.php";
require $include . "sisdoc_email.php";
require $include . "sisdoc_data.php";
require $include . "sisdoc_debug.php";
//require($include."sisdoc_autor.php");
require '_class/_class_oms.php';
require '_class/_class_position.php';
require '_class/_class_ic.php';
require '_class/_class_cep_email.php';
require '_class/_class_cep_comment.php';
require "_class/_class_cep.php";
$cep = new cep();
$ic = new ic();
$comu = new comunication();
require '_ged_config.php';
$comme = new cep_comment();
/* Project Identifier */
if (strlen($dd[0]) > 0) {
if (!(checkpost($dd[0]) == $dd[90])) {
echo 'erro de post';
exit;
}
$_SESSION['proto_cep'] = $dd[0];
redirecina(page());
} else {
$dd[0] = $_SESSION['proto_cep'];
if (round($dd[0]) <= 0) {
//
// 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 "cab.php";
require "_class/_class_cep_submit.php";
require "_class/_class_team.php";
require $include . 'sisdoc_data.php';
require $include . 'sisdoc_email.php';
require '_class/_class_ic.php';
$ic = new ic();
$proj = new submit();
$proj->doc_autor_principal = $ss->user_codigo;
require "_class/_class_ged.php";
require "_class/_class_cep.php";
$cep = new cep();
/****/
if (strlen($dd[91]) > 0) {
$_SESSION['proj_page'] = $dd[91];
redirecina('submit.php?time' . date("dmYhis"));
}
$pag_id = round($_SESSION['proj_id']);
$pag_page = round($_SESSION['proj_page']);
//if ($pag_id == 0) { $pag_page = 1; }
//if ($pag_page == 0) { $pag_page = 1; }
$pag_id = $_SESSION['proj_id'];
$dd[0] = $pag_id;
$protocolo = strzero($dd[0], 7);
echo '<H2>' . msg('submission_end_title') . '</h2>';
echo '<BR><BR>';
/* Checa diretorio de submissão do pdf */
//
// 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
/**
* XML OMS
* @author Rene Faustino Gabriel Junior (Analista-Desenvolvedor)
* @copyright Copyright (c) 2013 - sisDOC.com.br
* @access public
* @version v.0.13.46
* @package Proethos
* @subpackage XML
*/
require "db.php";
header("Content-Type:text/xml");
require "_class/_class_cep.php";
$cep = new cep();
$id = round($dd[0]);
$dx = $dd[90];
if (checkpost($id) == $dx) {
$cep->le($id);
require "_class/_class_oms.php";
$oms = new oms();
echo $oms->xml($cep);
} else {
echo 'post error';
}
* @package ProEthos-Admin
* @subpackage protocols
*/
require "cab.php";
require '_class/_class_cep.php';
/* Admin Common */
$ok = ($perfil->valid('#ADM') or $perfil->valid('#SCR') or $perfil->valid('#COO'));
if ($ok == 0) {
redirecina('main.php');
}
$tp = new message();
//$tp->language_set('pt_BR');
global $acao, $dd, $cp, $tabela;
require $include . 'sisdoc_colunas.php';
require $include . 'sisdoc_debug.php';
$clx = new cep();
$tabela = $clx->tabela;
$label = msg("protocols");
$http_edit = troca(page(), '.php', '_ed.php');
$http_ver = 'protocol_detalhe.php';
$http = page();
$editar = True;
$http_redirect = page();
//$http_ver = 'cliente_ver.php';
$clx->row();
$busca = true;
$offset = 20;
//$pre_where = " e_mailing = '".$cl->mail_codigo."' ";
echo '<h1>' . msg('cep_protocol') . '</h1>';
echo '<fieldset><legend>' . msg('protocol') . '</legend>';
echo '<TABLE width="100%" align="center"><TR><TD>';
// 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
/**
* Protocol
* @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 Protocol
*/
require "cab.php";
/* Date library */
require $include . 'sisdoc_data.php';
/* CEP Class */
require "_class/_class_cep.php";
$cep = new cep();
echo '<H2>' . msg('protocolos') . '</h2>';
echo '<div id="result" class="border1 pad5">';
echo $cep->protocolos_search($dd[50]);
echo '</div>';
echo '</div>';
echo $hd->foot();
?>
<script>
</script>
* @author Rene F. Gabriel Junior <*****@*****.**> * @author Rene Faustino Gabriel Junior (Analista-Desenvolvedor) * @copyright © Pan American Health Organization, 2013. All rights reserved. * @access public * @version v0.13.46 * @package ProEthos * @subpackage Committe */ /* mark active page to cabmenu */ $active_page = 'committee'; require "cab.php"; require $include . 'sisdoc_menus.php'; require "_class/_class_resume.php"; require "_class/_class_cep.php"; require $include . 'sisdoc_debug.php'; $cep = new cep(); $rs = new resume(); echo $rs->resume_cep(); echo $cep->form_search(); //echo $cep->form_search(); require "committee_secretary.php"; require "committee_reports.php"; echo '</div>'; ?> <script> </script> <?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify
* Sumissão de protocolo de pesquisa
* @author Rene Faustino Gabriel Junior (Analista-Desenvolvedor)
* @copyright © Pan American Health Organization, 2013. All rights reserved.
* @access public
* @version v0.12.22
* @package Class
* @subpackage UC0001 - Sumissao de protocolo de pesquisa
*/
echo '<H1>' . msg('amendment_' . $doc_tipo) . '</h1>';
require 'submit_00_field.php';
if (strlen($acao) > 0) {
require 'submit_save.php';
}
echo $s;
require "_class/_class_cep.php";
$cep = new cep();
// data CEP
$cep_recrutamento = $cep->get_cep_recrutamento($proto_cep);
$cp = $cep->cp_monitoreo();
/* Chave ID do register_shutdown_function(function)*/
$dd[0] = $proto_cep;
$form = new form();
require "form_css.php";
$tela = $form->editar($cp, 'cep_protocolos');
if ($form->saved > 0) {
$cep->protocolo = strzero($proto_cep, 6);
$log = $cep->cep_historic_append("CHG", msg("recruiting_" . $dd[2]) . ', ' . msg("date_reclutamiento") . ":" . stodbr($dd[1]));
redirecina('submit_end_monitoreo_008.php');
} else {
echo $tela;
}
