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;
}
$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 */
$nome = $line['pr_data_emissao'];