function fntProcessaDadosAnamnese()
{
if ($_SESSION['caso'] > 0) {
$codcaso = $_SESSION['caso'];
$id = stripslashes(urldecode($_POST['txtID']));
$qp = stripslashes(urldecode($_POST['txtQP']));
$hda = stripslashes(urldecode($_POST['txtHDA']));
$hmp = stripslashes(urldecode($_POST['txtHMP']));
$hf = stripslashes(urldecode($_POST['txtHF']));
$pps = stripslashes(urldecode($_POST['txtPPS']));
$rs = stripslashes(urldecode($_POST['txtRS']));
//$ef = $_POST['txtEF'];
$a = new Anamnese();
if (trim($id) != "") {
$a->setIdentificacao($id);
}
if (trim($qp) != "") {
$a->setQueixapri($qp);
}
if (trim($hda) != "") {
$a->setHistatual($hda);
}
if (trim($hmp) != "") {
$a->setHistpregressa($hmp);
}
if (trim($hf) != "") {
$a->setHistfamiliar($hf);
}
if (trim($pps) != "") {
$a->setPerfilpsicosocial($pps);
}
if (trim($rs) != "") {
$a->setRevsistemas($rs);
}
//if (trim($ef) != "") { $a->setExamefisico($ef); }
$ret = "";
$a->setCodcaso($codcaso);
if ($a->VerificaCodigo() == false) {
$ret = $a->Insere();
Log::RegistraLog('Inseriu a anamnese do caso ' . $codcaso . ')');
} else {
$ret = $a->Atualiza();
Log::RegistraLog('Atualizou a anamnese do caso ' . $codcaso . ')');
}
if ($ret == true) {
echo "OK";
} else {
Log::RegistraLog('ERRO. Acusado erro ao executar ultima operaçao. ANAMNESE. Descrição: ' . $a->getErro());
echo $a->getErro();
}
} else {
$msg = base64_encode("@lng[Nenhum caso clínico vinculado]");
header("Location:vwcaso.php?m=" . $msg);
}
}