Exemplo n.º 1
0
    $arrUbic = $help->getArrDomicilioMunicipioEstado($diagnostico->idPaciente);
    $domicilio = "* " . $arrUbic["domicilio"];
    $municipio = "* " . $arrUbic["municipio"];
    $estado = "* " . $arrUbic["estado"];
}
$claveLesp = $estudioHis->folioLaboratorio;
$fechaRec = formatFechaObj($estudioHis->fechaRecepcion, 'd-m-Y');
$fechaRea = formatFechaObj($estudioHis->fechaTomaMuestra, 'd-m-Y');
$personaR = $estudioHis->personaSolicitudEstudio;
$estudioSoliciatdo = "Histopatologia";
$tipoMuestra = $estudioHis->lesionTomoMuestra;
$macro = $estudioHis->hisDescMacro;
$micro = $estudioHis->hisDescMicro;
$resul = $estudioHis->hisResultado . " " . $arrHis[$estudioHis->idCatHisto];
$supervisor = $help->getSupervisorLab($estudioHis->idCatSupervisorLab);
$analista = $help->getAnalistaLab($estudioHis->idCatAnalistaLab);
$connectionBD = closeConexion();
////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pdf = new TCPDF("P", PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
$pdf->SetPrintHeader(false);
$pdf->SetPrintFooter(false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->setHeaderFont(array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
$pdf->setFooterFont(array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
$pdf->SetMargins(10, 10, 10, true);
// set the margins
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);