$diag = 1;
$control = 0;
$tipoll = 0;
$tipolt = 0;
$tipold = 0;
$tipoli = 0;
$tipolc = 0;
$mono = 0;
$pqt = 0;
$oe = 0;
$st = 0;
if (is_null($estudioBac->idContacto) && $estudioBac->idDiagnostico == 0) {
// SOSPECHOSOS
$nombre = $help->getNamePaciente($estudioBac->idPaciente);
$edad = $help->getEdadPaciente($estudioBac->idPaciente);
$sex = $help->getSexoPaciente($estudioBac->idPaciente);
$arrUbic = $help->getArrDomicilioMunicipioEstado($estudioBac->idPaciente);
$domicilio = $arrUbic["domicilio"];
$municipio = $arrUbic["municipio"];
$estado = $arrUbic["estado"];
$localidad = $arrUbic["localidad"];
$arrUnid = $help->getArrDatosUnidadTratante($estudioBac->idPaciente);
$unidad_sal = $arrUnid["nombre"];
$insitucion = $arrUnid["institucion"];
$localidad_sol = $arrUnid["localidad"];
$municipio_sol = $arrUnid["municipio"];
$estado_sol = $arrUnid["estado"];
$tiempo = 'No confirmado';
$antecedentes = '';
if ($sex == "Masculino") {
$sex = 1;
$iniOtr = '';
$terMon = '';
$terPQT = '';
$terOtr = '';
$fechaSol = formatFechaObj($estudioHis->fechaSolicitud, 'd-m-Y');
$fechaRec = formatFechaObj($estudioHis->fechaRecepcion, 'd-m-Y');
$lesTomMue = $estudioHis->lesionTomoMuestra;
$regTomMue = $estudioHis->regionTomoMuestra;
$fecTomMue = formatFechaObj($estudioHis->fechaTomaMuestra, 'd-m-Y');
$perSolEst = $estudioHis->personaSolicitudEstudio;
if (is_null($estudioHis->idContacto) && $estudioHis->idDiagnostico == 0) {
// SOSPECHOSOS
$sospechoso = new Sospechoso($estudioHis->idPaciente);
$nombre = $help->getNamePaciente($estudioHis->idPaciente);
$expediente = $help->getClavePaciente($estudioHis->idPaciente);
$sexo = $help->getSexoPaciente($estudioHis->idPaciente);
$edad = $help->getEdadPaciente($estudioHis->idPaciente);
$arrUbic = $help->getArrDomicilioMunicipioEstado($estudioHis->idPaciente);
$domicilio = $arrUbic["domicilio"];
$municipio = $arrUbic["municipio"];
$estado = $arrUbic["estado"];
$localidad = $arrUbic["localidad"];
$tiempo = "No Confirmado";
$antecedentes = "";
$noLesiones = $sospechoso->idCatNumeroLesiones;
$descripcionComp = $sospechoso->descripcionTopografica;
$fechaUltBac = $help->getUltimaBaciloscopia($estudioHis->idEstudioHis);
$observaciones = "";
if ($sospechoso->idCatTopografia == $idCatTopLoc) {
$topLoc = 'X';
}
