function Main()
{
    try {
        $obj = new ReflectionClass("Comuns");
        $tabela = $_POST['t'];
        $tabela = $obj->getConstant($tabela);
        $registro = base64_decode($_POST['r']);
        $sql = "SELECT Ativo FROM " . $tabela . " WHERE Codigo = :pcod;";
        $cnn = Conexao2::getInstance();
        $q = $cnn->prepare($sql);
        $q->bindParam(":pcod", $registro, PDO::PARAM_INT);
        $q->execute();
        $rs = $q->fetch(PDO::FETCH_OBJ);
        if ($rs->Ativo == 1) {
            $status = 0;
        } else {
            $status = 1;
        }
        $q->closeCursor();
        $sql = "UPDATE " . $tabela . " SET Ativo = :pnovo WHERE Codigo = :pcod;";
        $q = $cnn->prepare($sql);
        $q->bindParam(":pnovo", $status, PDO::PARAM_INT);
        $q->bindParam(":pcod", $registro, PDO::PARAM_INT);
        $q->execute();
        echo $status;
    } catch (PDOException $ex) {
        echo $ex->getMessage();
    }
}
示例#2
0
 public static function DetalhaLog($idacesso)
 {
     $u = unserialize($_SESSION['usu']);
     $sql = "select  acoes.CodAcesso, acessos.CodUsuario, usuario.NomeCompleto, acoes.Acao, acoes.DataHora ";
     $sql .= "\t\t,case when acessos.Host is null then '' else acessos.Host end AS Host ";
     $sql .= "from mesusuariologacoes acoes ";
     $sql .= "inner join mesacessousuario acessos ";
     $sql .= "\t\ton acessos.numacesso = acoes.codacesso ";
     $sql .= "inner join mesusuario usuario ";
     $sql .= "\t\ton usuario.codigo = acessos.codusuario ";
     $sql .= "where CodAcesso = :pCodAcesso ";
     $sql .= "order by DataHora desc";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodAcesso", $idacesso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->rowCount() > 0) {
         $ret = Comuns::TopoTabelaListagem("Ações realizadas", "actrealizadas", array("Usuário", "Ação", "Data/Hora", "Host"));
         while ($linha = $cmd->fetch(PDO::FETCH_OBJ)) {
             $ret .= '<tr>';
             $ret .= '  <td>' . $linha->NomeCompleto . '</td>';
             $ret .= '  <td>' . $linha->Acao . '</td>';
             $ret .= '  <td>' . date('d/m/Y H:i:s', strtotime($linha->DataHora)) . '</td>';
             $ret .= '  <td>' . $linha->Host . '</td>';
             $ret .= '</tr>';
         }
         $ret .= '</tbody></table>';
     } else {
         $ret = "Falha ao recuperar detalhes";
     }
     $cmd->closeCursor();
     return $ret;
 }
示例#3
0
function Main()
{
    if (isset($_SESSION['caso']) && $_SESSION['caso'] > 0) {
        $cnn = Conexao2::getInstance();
        $erro = false;
        $deserro = "";
        $caso = $_SESSION['caso'];
        foreach ($_POST as $campo => $valor) {
            if ($campo != "selFeedback" && $campo != "etapa") {
                $campo = split("_", $campo);
                $secao = $campo[0];
                $config = $campo[1];
                $sqlConsulta = "SELECT 1 as Tem FROM mescasoconfigs ";
                $sqlConsulta .= "WHERE CodCaso = :pCodCaso AND Secao = :pSecao and Configuracao = :pConfig;";
                $cmdConsulta = $cnn->prepare($sqlConsulta);
                $cmdConsulta->bindParam(":pCodCaso", $caso, PDO::PARAM_INT);
                $cmdConsulta->bindParam(":pSecao", $secao, PDO::PARAM_STR);
                $cmdConsulta->bindParam(":pConfig", $config, PDO::PARAM_STR);
                $cmdConsulta->execute();
                if ($cmdConsulta->rowCount() > 0) {
                    $sqlComando = "UPDATE mescasoconfigs SET Valor = :pValor ";
                    $sqlComando .= "WHERE CodCaso = :pCodCaso AND Secao = :pSecao AND Configuracao = :pConfig ";
                } else {
                    $sqlComando = "INSERT INTO mescasoconfigs(CodCaso, Secao, Configuracao, Valor) ";
                    $sqlComando .= "VALUES(:pCodCaso, :pSecao, :pConfig, :pValor);";
                }
                $cmdComando = $cnn->prepare($sqlComando);
                $cmdComando->bindParam(":pCodCaso", $caso, PDO::PARAM_INT);
                $cmdComando->bindParam(":pSecao", $secao, PDO::PARAM_STR);
                $cmdComando->bindParam(":pConfig", $config, PDO::PARAM_STR);
                $cmdComando->bindParam(":pValor", $valor, PDO::PARAM_STR);
                $cmdComando->execute();
                if ($cmdComando->errorCode() != Comuns::QUERY_OK) {
                    $msg = $cmdComando->errorInfo();
                    $erro = true;
                    $deserro .= "Erro " . $msg[2];
                }
            } else {
                $sql = "UPDATE mescaso SET DaResposta = :pResposta WHERE Codigo = :pCodCaso;";
                $cmd = $cnn->prepare($sql);
                $cmd->bindParam(":pResposta", $valor, PDO::PARAM_INT);
                $cmd->bindParam(":pCodCaso", $caso, PDO::PARAM_INT);
                $cmd->execute();
                if ($cmd->errorCode() != Comuns::QUERY_OK) {
                    $msg = $cmd->errorInfo();
                    $erro = true;
                    $deserro .= "Erro " . $msg[2];
                }
            }
        }
        if ($erro == false) {
            echo "OK";
        } else {
            echo $deserro;
        }
    } else {
        echo Comuns::Idioma("@lng[Erro ao locallizar o caso clínico]");
    }
}
示例#4
0
 public static function getInstance()
 {
     if (!isset(self::$instance)) {
         self::$instance = new PDO("mysql:host=localhost;dbname=mestrado", "root", "root");
         self::$instance->exec("set names utf8");
     }
     return self::$instance;
 }
示例#5
0
 private function CarregaExtensoes()
 {
     $sql = "";
     $sql .= "";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->execute();
 }
示例#6
0
 public function AtualizaUsuario($codigo, $nome)
 {
     try {
         $sql = "UPDATE mesUsuario SET NomeCompleto = '" . $nome . "' WHERE Codigo = " . $codigo . ";";
         $cnn = Conexao2::getInstance();
         $q = $cnn->prepare($sql);
         $q->execute();
         return true;
     } catch (PDOException $ex) {
         return false;
     }
 }
示例#7
0
 public static function RetornaSelect($sel = 0)
 {
     $sql = "SELECT Codigo, Descricao ";
     $sql .= "FROM mestipovalorreferencia";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->execute();
     while ($tipo = $cmd->fetch(PDO::FETCH_OBJ)) {
         $opts .= '<option value="' . $tipo->Codigo . '"' . ($tipo->Codigo == $sel ? ' selected' : '') . '>' . $tipo->Descricao . '</option>';
     }
     return $opts;
 }
示例#8
0
function Main()
{
    if ($_SESSION['caso'] || $_SESSION['casores']) {
        $img = $_GET['img'];
        $caminho = "";
        if ($img != "") {
            $img = base64_decode($img);
            $codcaso = $_SESSION['caso'] ? $_SESSION['caso'] : ($_SESSION['casores'] ? $_SESSION['casores'] : null);
            $cnn = Conexao2::getInstance();
            $sql = "SELECT url FROM mesmidia WHERE CodMidia = :pCodMidia AND CodCaso = :pCodCaso;";
            $cmd = $cnn->prepare($sql);
            $cmd->bindParam(":pCodMidia", $img, PDO::PARAM_INT);
            $cmd->bindParam(":pCodCaso", $codcaso, PDO::PARAM_INT);
            $cmd->execute();
            if ($cmd->errorCode() == Comuns::QUERY_OK) {
                if ($cmd->rowCount() > 0) {
                    $caminho = $cmd->fetchColumn();
                }
            } else {
                $msg = $cmd->errorInfo();
                echo $msg[2];
            }
            if ($caminho != "") {
                @($imagem = imagecreatefromjpeg($caminho));
                if ($imagem != false) {
                    header('Content-Type: image/jpeg; charset=iso-8859-1');
                    imagejpeg($image = $imagem, $filename = null, $quality = 100);
                } else {
                    @($imagem = imagecreatefrompng($caminho));
                    if ($imagem != false) {
                        header('Content-Type: image/png; charset=iso-8859-1');
                        imagepng($image = $imagem, $filename = null, $quality = 0);
                    } else {
                        @($imagem = imagecreatefromgif($caminho));
                        if ($imagem != false) {
                            header('Content-Type: image/gif; charset=iso-8859-1');
                            imagegif($image = $imagem, $filename = null);
                        } else {
                            echo "@lng[Não foi possível carregar a imagem]";
                        }
                    }
                }
            } else {
                echo "@lng[Caminho não encontrado]";
            }
        } else {
            echo "@lng[Informe uma imagem]";
        }
    } else {
        echo "@lng[Caso não encontrado]";
    }
}
示例#9
0
function Main()
{
    $html = "";
    if ($_GET['id']) {
        $idioma = $_GET['id'];
        $sql = "select e.Codigo, e.Expressao, t.Expressao as Traducao ";
        $sql .= "from sisexpressoes e left outer join sistraducoes t on t.CodExpressao = e.Codigo and t.CodIdioma = :pCodIdioma ";
        $sql .= "order by e.Expressao";
        $cnn = Conexao2::getInstance();
        $cmd = $cnn->prepare($sql);
        $cmd->bindParam(":pCodIdioma", $idioma, PDO::PARAM_INT);
        $cmd->execute();
        $total = 0;
        $feito = 0;
        if ($cmd->errorCode() == Comuns::QUERY_OK) {
            $html = '<table class="listadados">';
            $html .= '<tr class="head"><th>@lng[Expressão]</th><th>@lng[Tradução]</th></tr>';
            while ($expressao = $cmd->fetch(PDO::FETCH_OBJ)) {
                $html .= '<tr>';
                $html .= '  <td><label>' . $expressao->Expressao . '</label></td>';
                $html .= '  <td>';
                $html .= '    <input type="text" name="exp_' . $expressao->Codigo . '" id="exp_' . $expressao->Codigo . '" value="' . ($expressao->Traducao == null ? '' : $expressao->Traducao) . '" class="campo campomedio" onblur="javascript:fntGravaTraducao(' . $expressao->Codigo . ');" /></td>';
                $html .= '    <input type="hidden" name="h_exp_' . $expressao->Codigo . '" id="h_exp_' . $expressao->Codigo . '" value="' . ($expressao->Traducao == null ? '' : $expressao->Traducao) . '" />';
                $html .= '  </td>';
                $html .= '</tr>';
                $total++;
                $feito += $expressao->Traducao == null ? 0 : 1;
            }
            $html .= '</table>';
            $html = '<div class="info-percentual">@lng[Percentual traduzido:] ' . $feito / $total * 100 . '%</div>' . $html;
        } else {
            $msg = $cmd->errorInfo();
            $html = $msg[2];
        }
    }
    $usu = unserialize($_SESSION['usu']);
    $tpl = file_get_contents("tpl/frm-idiomas.html");
    $idiomas = null;
    Comuns::ArrayObj("select Codigo, Nome from sisidiomas order by Nome", $idiomas);
    $cmbIdiomas = new ComboBox("selIdioma", $idiomas, "Codigo", "Nome", "0", "@lng[Selecione]");
    $cmbIdiomas->cssClass("campo");
    $cmbIdiomas->setSelectedValue($_GET['id'] ? $_GET['id'] : "0");
    $cmbIdiomas->Eventos(array("onchange" => "fntBuscaTraducoes()"));
    $botoes = Botao::BotaoNovo("fntAddExpressao();", "@lng[Adicionar expressão]");
    $botoes .= Botao::BotaoPesquisar("fntBuscaTraducoes();", "@lng[Buscar traduções]");
    $tpl = str_replace("<!--telatopo-->", Comuns::GeraTopoPagina($usu), $tpl);
    $tpl = str_replace("<!--itens-toolbar-->", $botoes, $tpl);
    $tpl = str_replace("<!--selIdioma-->", $cmbIdiomas->RenderHTML(), $tpl);
    $tpl = str_replace("<!--expressoes-->", $html, $tpl);
    header('Content-Type: text/html; charset=iso-8859-1');
    echo Comuns::Idioma($tpl);
}
示例#10
0
function AlteraSenha($strNova)
{
    $sql = "SELECT Codigo FROM mesusuario ";
    $sql .= "WHERE NomeCompleto = :pNome AND Email = :pEmail";
    $cnn = Conexao2::getInstance();
    $cmd = $cnn->prepare($sql);
    $cmd->bindParam(":pNome", $_POST['txtNome'], PDO::PARAM_STR);
    $cmd->bindParam(":pEmail", $_POST['txtEmail'], PDO::PARAM_STR);
    $cmd->execute();
    if ($cmd->errorCode() == Comuns::QUERY_OK) {
        if ($cmd->rowCount() > 0) {
            $intCodUsu = $cmd->fetchColumn(0);
            $strNome = $_POST['txtNome'];
            $strEmail = $_POST['txtEmail'];
            $u = new Usuario();
            $u->Carrega($intCodUsu);
            if ($u->getCodigo() !== null) {
                if ($u->AlteraSenha(md5($strNova), $_POST['txtResposta'])) {
                    $mens = "@lng[Prezado] " . $strNome . "<br />";
                    $mens .= "@lng[Você esta recebendo este e-mail porque solicitou que fosse gerada uma nova senha no sistema SIACC.] ";
                    $mens .= "@lng[Segue abaixo a nova senha gerada pelo sistema. É altamente recomendavel que você a altere. Se não foi você que] ";
                    $mens .= "@lng[solicitou esta alteração recomendamos que altere imediatamente sua senha.]<br /><br />";
                    $mens .= "@lng[Nova senha gerada:] " . $strNova . "<br /><br />";
                    $mens .= "@lng[Clique aqui para acessar o SIACC ou digite a seguinte URL no seu navegador:] http://siacc.regisls.net<br /><br />";
                    $mens .= "@lng[Qualquer dúvida, entre em contato com a equipe do SIACC.]";
                    $mail = new Email();
                    $mail->setAssunto("[SIACC] @lng[Nova senha gerada]");
                    $mail->setRemetente("Regis Leandro Sebastiani <*****@*****.**>");
                    $mail->setDestinatario($strNome . "<" . $strEmail . ">");
                    $mail->setMensagem($mens);
                    $mail->Enviar();
                    return 1;
                } else {
                    //Log::RegistraLog("Alterar Senha: Erro ao alterar senha pelo site. " . $u->getErro(), true);
                    echo $u->getErro();
                    return -3;
                }
            } else {
                //Log::RegistraLog("Alterar Senha: Erro ao alterar senha pelo site. Não foi carregado usuário", true);
                echo "Codigo é null";
                return -2;
            }
        } else {
            return -1;
        }
    } else {
        $msg = $cmd->errorInfo();
        echo $msg[2];
        return -4;
    }
}
示例#11
0
function fntBuscaPagina()
{
    $u = unserialize($_SESSION['usu']);
    $g = $_POST['selPerfil'];
    if ($u->TemGrupo($g)) {
        $sql = "select PaginaInicial from mesgrupousuario where Codigo = :pCodigo";
        $cnn = Conexao2::getInstance();
        $cmd = $cnn->prepare($sql);
        $cmd->bindParam(":pCodigo", $g, PDO::PARAM_INT);
        $cmd->execute();
        return $cmd->fetchColumn();
    } else {
        return null;
    }
}
示例#12
0
function Coleta($url)
{
    echo $url;
    $dir = dir($url);
    while ($item = $dir->read()) {
        if ($item != "." && $item != "..") {
            $file_name = $url . "\\" . $item;
            if (is_file($file_name)) {
                $content = file_get_contents($file_name);
                $array = preg_match_all('/@lng\\[.*?\\]/', $content, $matches);
                $sqlValida = "select 1 from sisexpressoes where Expressao = :pExpressao;";
                $sqlIns = "insert into sisexpressoes(Codigo, Expressao, Grupo) ";
                $sqlIns += "select ifnull(max(Codigo), 0) + 1 as Proximo, :pExpressao, :pGrupo from sisexpressoes;";
                $cnn = Conexao2::getInstance();
                foreach ($matches as $match) {
                    foreach ($match as $expressao) {
                        $valor = substr($expressao, 5, -1);
                        $cmd = $cnn->prepare($sqlValida);
                        $cmd->bindParam(":pExpressao", $valor, PDO::PARAM_STR);
                        $cmd->execute();
                        if ($cmd->errorCode() == Comuns::QUERY_OK) {
                            if ($cmd->rowCount() == 0) {
                                $grupo = "GENERICO";
                                $cmd->closeCursor();
                                $cmd = $cnn->prepare($sqlIns);
                                $cmd->bindParam(":pExpressao", $valor, PDO::PARAM_STR);
                                $cmd->bindParam(":pGrupo", $grupo, PDO::PARAM_STR);
                                $cmd->execute();
                                echo "SUCESSO: Expressão " . $valor . " gravada com sucesso<br />";
                            }
                        } else {
                            $msg = $cmd->errorInfo();
                            $msg_erro = $msg[2];
                            echo "ERRO: " . $msg_erro;
                        }
                        $cmd->closeCursor();
                    }
                }
            } else {
                if (is_dir($file_name)) {
                    echo "Dir: " . $item . "<br />";
                    Coleta($file_name);
                }
            }
        }
    }
}
示例#13
0
function Main()
{
    $termo = "%" . $_GET['term'] . "%";
    $sql = "select Codigo, NomeCompleto, NomeUsuario, Email from mesusuario where NomeCompleto like :pNome";
    $cnn = Conexao2::getInstance();
    $cmd = $cnn->prepare($sql);
    $cmd->bindParam(":pNome", $termo, PDO::PARAM_STR);
    $cmd->execute();
    $rs = $cmd->fetchAll(PDO::FETCH_OBJ);
    $itens = array();
    foreach ($rs as $linha) {
        $itens[] = array("id" => $linha->Codigo, "usuario" => utf8_encode($linha->NomeUsuario), "value" => utf8_encode($linha->NomeCompleto));
    }
    $json = json_encode($itens);
    //header('Content-type: application/json; charset=UTF-8');
    echo $json;
}
示例#14
0
function Main()
{
    $perguntas = $_POST['perg'];
    if ($perguntas != "") {
        $perguntas = split(";", $perguntas);
    }
    $agrup = $_SESSION['agruperg'];
    $sqldel = "DELETE FROM mesperguntaagrupamentos WHERE CodAgrupador = :pCodAgrupador;";
    $cnn = Conexao2::getInstance();
    $cmd = $cnn->prepare($sqldel);
    $cmd->bindParam(":pCodAgrupador", $agrup, PDO::PARAM_INT);
    $cmd->execute();
    if ($cmd->errorCode() == Comuns::QUERY_OK) {
        $cmd->closeCursor();
        if (is_array($perguntas)) {
            $sqlins = "INSERT INTO mesperguntaagrupamentos(CodAgrupador, CodPergunta) ";
            $sqlins .= "VALUES(:pCodAgrupador, :pCodPergunta);";
            foreach ($perguntas as $pergunta) {
                $codperg = base64_decode($pergunta);
                $cmd = $cnn->prepare($sqlins);
                $cmd->bindParam(":pCodAgrupador", $agrup, PDO::PARAM_INT);
                $cmd->bindParam(":pCodPergunta", $codperg, PDO::PARAM_INT);
                $cmd->execute();
                if ($cmd->errorCode() != Comuns::QUERY_OK) {
                    $msg = $cmd->errorInfo();
                    echo $msg[2];
                    return;
                }
                $cmd->closeCursor();
            }
            echo "OK";
        } else {
            echo "OK";
        }
    } else {
        $msg = $cmd->errorInfo();
        echo $msg[2];
    }
}
示例#15
0
 public function DesvincularMidiaExame($codcaso, $numBateria, $codMidia)
 {
     $sql = "DELETE FROM mescasoexamesmidia ";
     $sql .= "WHERE CodCaso = :pCodCaso AND NumBateria = :pNumBateria AND CodMidia = :pCodMidia;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $codcaso, PDO::PARAM_INT);
     $cmd->bindParam(":pNumBateria", $numBateria, PDO::PARAM_INT);
     $cmd->bindParam(":pCodMidia", $codMidia, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         /*
         $sql  = "UPDATE mescasoconteudo SET NaoExibeNaMontagem = 0 ";
         $sql .= "WHERE CodCaso = :pCodCaso AND CodConteudo = :pCodConteudo;";
         
         $cmd->closeCursor();
         
         $cmd = $cnn->prepare($sql);
         $cmd->bindParam(":pCodCaso", $codcaso, PDO::PARAM_INT);
         $cmd->bindParam(":pCodConteudo", $codConteudo, PDO::PARAM_INT);
         
         $cmd->execute();
         
         if ($cmd->errorCode() == Comuns::QUERY_OK)
         {
         */
         return true;
         /*
         }
         else
         {
         	$msg = $cmd->errorInfo();
         	$this->msg_erro = "O conteúdo foi desvinculado mas o seguinte erro ocorreu: " . $msg[2] . ". Linha 1679";
         	return false;
         }
         */
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2] . ". Linha 1686";
         return false;
     }
 }
示例#16
0
 public function ListaPedidosAprovacao()
 {
     $sql = "select Codigo, NomeCompleto, NomeUsuario, Email, DtCadastro FROM mesusuario WHERE Situacao = 0;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $sqlcombo = "select Codigo, Descricao from mesgrupousuario;";
     if ($cmd->execute()) {
         if ($cmd->rowCount() > 0) {
             $ret = Comuns::TopoTabelaListagem("Novos cadastros pendentes de aprovação", "CadPendentes", array('Nome', 'Usuário', 'E-mail', 'Data Cad.', 'Ações'));
             $ret .= '    <tr>';
             $ret .= '      <td>' . $linha["NomeCompleto"] . '</td>';
             $ret .= '      <td>' . $linha["NomeUsuario"] . '</td>';
             $ret .= '      <td>' . $linha["Email"] . '</td>';
             $ret .= '      <td>';
             //$combo = new ComboBox()
             $ret .= '      </td>';
             $ret .= '    </tr>';
         } else {
             $msg = $cmd->errorInfo();
             $this->msg_erro = $msg[2];
             return false;
         }
     } else {
         throw new Exception($cmd->errorInfo(), 1013);
     }
 }
示例#17
0
 public static function RetornaNivel($p_codigo)
 {
     $sql = "SELECT Codigo, Descricao FROM mesnivelpergunta WHERE Codigo = :pCodigo;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodigo", $p_codigo, PDO::PARAM_INT);
     $cmd->execute();
     $rs = $cmd->fetch(PDO::FETCH_OBJ);
     $nivel = new NivelPergunta();
     $nivel->setCodigo($rs->Codigo);
     $nivel->setDescricao($rs->Descricao);
     return $nivel;
 }
示例#18
0
 public function getNHipoteses()
 {
     $sql = "select case when count(codhipotese) is null then 0 else count(codhipotese) end as Hipoteses ";
     $sql .= "from mescasohipotdiagn where CodCaso = :pCodCaso";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         $ret = $cmd->fetchColumn();
         return $ret;
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#19
0
<?php

include_once 'cls/conexao.class.php';
echo "Iniciando publicação dos scripts de banco";
$sql = "ALTER TABLE mescaso ";
$sql .= "ADD Etnia INT NULL COMMENT 'Etnia do paciente', ";
$sql .= "ADD NomePaciente VARCHAR(50) NULL COMMENT 'Iniciais do nome do paciente', ";
$sql .= "ADD ImgPaciente INT NULL COMMENT 'Imagem a ser usada (homem, mulher, criança, etc)'; ";
$cnn = Conexao2::getInstance();
$cmd = $cnn->prepare($sql);
$cmd->execute();
if ($cmd->errorCode() == Comuns::QUERY_OK) {
    echo "<br />Iniciando publicação do segundo script";
    $cmd->closeCursor();
    $sql = "INSERT INTO mescasomontagemconfigs(Nome, Descricao, Grupo, Prefixo) ";
    $sql .= "VALUES('Resposta imediata','Permite ao aluno consultar a resposta imediatamente',24792,'chk');";
    $cmd = $cnn->prepare($sql);
    $cmd->execute();
    if ($cmd->errorCode() == Comuns::QUERY_OK) {
        echo "<br />Publicação dos scripts concluída com sucesso";
    } else {
        $msg = $cmd->errorInfo();
        echo "Erro na publicação do segundo script: " . $msg[2];
    }
} else {
    $msg = $cmd->errorInfo();
    echo "Erro na publicação do primeiro script: " . $msg[2];
}
示例#20
0
 public function RetornaAlternativasDaPergunta($intCodPergunta)
 {
     $sql = "SELECT ";
     $sql .= "\t Codigo as CodPergunta ";
     $sql .= "\t,Sequencia ";
     $sql .= "\t,case when CodTipo = 1 then concat('<img src=\"', Imagem, '\" alt=\"', TextoAlternativa, '\"', '\" title=\"', TextoAlternativa, '\" class=\"thumb-resp\" />') else TextoAlternativa end as Alternativa ";
     $sql .= "\t,Correto ";
     $sql .= "\t,Explicacao ";
     $sql .= "\t,CodBinario as ValorOpt ";
     $sql .= "FROM vwperguntasalternativas ";
     $sql .= "WHERE Codigo = :pCodPergunta ";
     $sql .= "ORDER BY Sequencia;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodPergunta", $intCodPergunta, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         if ($cmd->rowCount() > 0) {
             return $cmd->fetchAll(PDO::FETCH_OBJ);
         } else {
             $this->msg_erro = "@lng[Nenhum item encontrado]";
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#21
0
function fntConstroiWhere($codTPL, $filtros)
{
    $where = "";
    $sql = "select Tabela, AliasTabela, Campo, HTMLEncode, NomeCampoTela, TipoFiltro from mestemplatesfiltros where CodTemplate = :pCodTpl;";
    $cnn = Conexao2::getInstance();
    $cmd = $cnn->prepare($sql);
    $cmd->bindParam(":pCodTpl", $codTPL, PDO::PARAM_INT);
    $cmd->execute();
    if ($cmd->errorCode() == Comuns::QUERY_OK) {
        if ($cmd->rowCount() > 0) {
            while ($filtro = $cmd->fetch(PDO::FETCH_OBJ)) {
                if ($filtros[$filtro->NomeCampoTela] != "") {
                    $where .= " AND " . ($filtro->AliasTabela == null ? $filtro->Tabela : $filtro->AliasTabela) . "." . $filtro->Campo . " " . ($filtro->TipoFiltro == "TEXTO" ? "LIKE '%" . ($filtro->HTMLEncode == 0 ? $filtros[$filtro->NomeCampoTela] : htmlentities($filtros[$filtro->NomeCampoTela], ENT_COMPAT, "ISO-8859-1")) . "%'" : " = '" . ($filtro->HTMLEncode == 0 ? $filtros[$filtro->NomeCampoTela] : htmlentities($filtros[$filtro->NomeCampoTela], ENT_COMPAT, "ISO-8859-1")) . "'");
                }
            }
        }
    }
    return $where;
}
示例#22
0
 public function ExisteChave()
 {
     $sql = "SELECT Agrupador FROM mestipoexamevalref ";
     $sql .= "WHERE CodExame = :pCodExame AND CodComponente = :pCodComponente AND Agrupador = :pAgrupador;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodExame", $this->codexame, PDO::PARAM_INT);
     $cmd->bindParam(":pCodComponente", $this->codcomponente, PDO::PARAM_INT);
     $cmd->bindParam(":pAgrupador", $this->agrupador, PDO::PARAM_STR);
     $cmd->execute();
     if ($cmd->rowCount() > 0) {
         return true;
     } else {
         return false;
     }
 }
示例#23
0
 public static function ConsultaNomeComponente($codexame, $codcompo)
 {
     $sql = "SELECT Descricao ";
     $sql .= "FROM mestipoexamecomponente ";
     $sql .= "WHERE CodExame = :pCodExame AND Codigo = :pCodCompo;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodExame", $codexame, PDO::PARAM_INT);
     $cmd->bindParam(":pCodCompo", $codcompo, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         $rs = $cmd->fetch(PDO::FETCH_OBJ);
         return $rs->Descricao;
     } else {
         $erro = $cmd->errorInfo();
         return $erro[2];
     }
 }
示例#24
0
 public function ListaRecordSet()
 {
     $sql = "select CodObjetivo, Descricao ";
     $sql .= "from mescasoobjetivos where CodCaso = :pCodCaso;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         if ($cmd->rowCount() > 0) {
             return $cmd->fetchAll(PDO::FETCH_OBJ);
         } else {
             $this->msg_erro = "@lng[Nenhum objetivo cadastrado]";
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#25
0
 public function CarregaPorURL()
 {
     $sql = "SELECT CodCaso, CodMidia, Descricao, Complemento, CodTipo, DtCadastro, url, Largura, Altura, Origem ";
     $sql .= "FROM mesmidia WHERE url = :purl AND CodCaso = :pCodCaso;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cmd->bindParam(":purl", $this->url, PDO::PARAM_STR);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         if ($cmd->rowCount() > 0) {
             $midia = $cmd->fetch(PDO::FETCH_OBJ);
             $this->codmidia = $midia->CodMidia;
             $this->codtipo = $midia->CodTipo;
             $this->descricao = $midia->Descricao;
             $this->complemento = $midia->Complemento;
             $this->largura = $midia->Largura;
             $this->altura = $midia->Altura;
             $this->origem = $midia->Origem;
         } else {
             $this->msg_erro = "@lng[Nenhum registro encontrado]";
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#26
0
 public function ListaAgrupamentosCaso($codcaso)
 {
     $sql = "select ac.CodCaso, ac.CodAgrupamento, a.Texto, ";
     $sql .= "\t\t(select count(pa.CodPergunta) ";
     $sql .= "        from mesperguntaagrupamentos pa ";
     $sql .= "        where pa.CodAgrupador = ac.CodAgrupamento) as Perguntas ";
     $sql .= "from mescasoagrupamentos ac ";
     $sql .= "inner join mesperguntaagrupador a on a.Codigo = ac.CodAgrupamento ";
     $sql .= "where ac.CodCaso = :pCodCaso;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $codcaso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         if ($cmd->rowCount() > 0) {
             return $cmd->fetchAll(PDO::FETCH_OBJ);
         } else {
             $this->msg_erro = "@lng[Nenhum registro encontrado]";
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#27
0
 public function VerificaCodigo()
 {
     $sql = "SELECT CodCaso FROM mescasoanamnese WHERE CodCaso = :pCodCaso;";
     $cnn = Conexao2::getInstance();
     $cmd = $cnn->prepare($sql);
     $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->rowCount() > 0) {
         return true;
     } else {
         return false;
     }
 }
示例#28
0
 public function Carrega($codunico)
 {
     $sql = "select CodPergunta, Sequencia, Texto, Imagem, Correto, Explicacao, ExibirExplicacao, TipoConsequencia, ValorConsequencia, CodUnico, Origem ";
     $sql .= "from mesalternativa ";
     $sql .= "where CodUnico = :coduni;";
     $cnn = Conexao2::getInstance();
     $q = $cnn->prepare($sql);
     $q->bindParam(":coduni", $codunico, PDO::PARAM_INT);
     $q->execute();
     if ($q->rowCount() > 0) {
         $alt = $q->fetch(PDO::FETCH_OBJ);
         $this->sequencia = $alt->Sequencia;
         $this->codunico = $alt->CodUnico;
         $this->texto = $alt->Texto;
         $this->imagem = $alt->Imagem;
         $this->correto = $alt->Correto;
         $this->exibirexplicacao = $alt->ExibirExplicacao;
         $this->explicacao = $alt->Explicacao;
         $this->tipoconsequencia = $alt->TipoConsequencia;
         $this->valorconsequencia = $alt->ValorConsequencia;
         $this->origem = $alt->Origem;
     }
 }
示例#29
0
 public function TemMidia($CodEtapa)
 {
     $sql = "SELECT midia.CodTipo, tipom.Descricao, COUNT(fis.CodMidia) as Midias ";
     $sql .= "FROM mescasoexamefisicomidias fis ";
     $sql .= "INNER JOIN mesmidia midia ON midia.CodCaso = fis.CodCaso AND midia.CodMidia = fis.CodMidia ";
     $sql .= "INNER JOIN mestipomidia tipom ON tipom.CodTipo = midia.CodTipo ";
     $sql .= "WHERE fis.CodCaso = :pCodCaso AND fis.EtapaExame = :pEtapaExame ";
     $sql .= "GROUP BY midia.CodTipo, tipom.Descricao ";
     $cnn = Conexao2::getInstance();
     $cnn->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cnn->bindParam(":pEtapaExame", $CodEtapa, PDO::PARAM_INT);
     $cmd = $cnn->prepare($sql);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         if ($cmd->rowCount()) {
             return $cmd->fetchAll(PDO::FETCH_OBJ);
         } else {
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         return false;
     }
 }
示例#30
0
 public function LimpaResolucao()
 {
     $sql1 = "delete from mesresolucaoresposta where CodResolucao in(select CodResolucao from mesresolucao where CodCaso = :pCodCaso);";
     $sql2 = "delete from mesresolucaovisconteudo where CodResolucao in(select CodResolucao from mesresolucao where CodCaso = :pCodCaso)";
     $sql3 = "delete from mesresolucaoacesso where CodResolucao in(select CodResolucao from mesresolucao where CodCaso = :pCodCaso);";
     $sql4 = "delete from mesresolucao where CodCaso = :pCodCaso";
     $cnn = Conexao2::getInstance();
     $cnn->beginTransaction();
     $cmd = $cnn->prepare($sql1);
     //$cmd->bindParam(":pCodUsuario", $this->codusuario, PDO::PARAM_INT);
     $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
     $cmd->execute();
     if ($cmd->errorCode() == Comuns::QUERY_OK) {
         $cmd->closeCursor();
         $cmd = $cnn->prepare($sql2);
         //$cmd->bindParam(":pCodUsuario", $this->codusuario, PDO::PARAM_INT);
         $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
         $cmd->execute();
         if ($cmd->errorCode() == Comuns::QUERY_OK) {
             $cmd->closeCursor();
             $cmd = $cnn->prepare($sql3);
             //$cmd->bindParam(":pCodUsuario", $this->codusuario, PDO::PARAM_INT);
             $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
             $cmd->execute();
             if ($cmd->errorCode() == Comuns::QUERY_OK) {
                 $cmd->closeCursor();
                 $cmd = $cnn->prepare($sql4);
                 //$cmd->bindParam(":pCodUsuario", $this->codusuario, PDO::PARAM_INT);
                 $cmd->bindParam(":pCodCaso", $this->codcaso, PDO::PARAM_INT);
                 $cmd->execute();
                 if ($cmd->errorCode() == Comuns::QUERY_OK) {
                     $cnn->commit();
                     return true;
                 } else {
                     $msg = $cmd->errorInfo();
                     $this->msg_erro = $msg[2];
                     $cnn->rollback();
                     return false;
                 }
             } else {
                 $msg = $cmd->errorInfo();
                 $this->msg_erro = $msg[2];
                 $cnn->rollback();
                 return false;
             }
         } else {
             $msg = $cmd->errorInfo();
             $this->msg_erro = $msg[2];
             $cnn->rollback();
             return false;
         }
     } else {
         $msg = $cmd->errorInfo();
         $this->msg_erro = $msg[2];
         $cnn->rollback();
         return false;
     }
 }