$datosCabecera = array();
$datosCabecera[2] = $datosPaciente[0][0];
$datosCabecera[3] = $datosPaciente[0][1];
$datosCabecera[4] = $datosPaciente[0][2];
$datosCabecera[5] = $datosPaciente[0][3];
$datosCabecera[6] = $datosPaciente[0][4];
$datosCabecera[7] = $datosPaciente[0][6];
$datosCabecera[8] = $datosPaciente[0][5];
$datosCabecera[9] = $datosPaciente[0][7];
$datosCabecera[10] = $datosPaciente[0][8];
$datosCabecera[11] = $datosPaciente[0][9];
$datosCabecera[12] = $datosPaciente[0][10];
$datosCabecera[13] = $datosPaciente[0][11];
/* ===================================================================================================== */
/* ======================================= Datos de Detalle ============================================ */
$o_ActionReporte = new ActionReporte();
$oLActoMedico = new LActoMedico();
$listaAtenciones = $o_ActionReporte->listaAtencionesXDia($idPrograma);
//$listaAtenciones[$i][0]--> idPrigramacion
$antecedentes = $o_ActionReporte->rptAntecedentesPRograma($idPrograma);
//serecupera los antecedentes de golpe
$historiaOdontograma = $oLActoMedico->listadoHistoriaDiente($idPrograma);
$simbolosImagen = $oLActoMedico->listaImagenesOdontograma($idPrograma);
$nroPlaca = $oLActoMedico->lstListarNumeroIFExistePlaca($idPrograma);
$arrayHC = array();
foreach ($listaAtenciones as $i => $value) {
$datosMed = $oLActoMedico->atencionMedico($listaAtenciones[$i][0]);
$motivoConsulta = $o_ActionReporte->rptMotivoConsulta($listaAtenciones[$i][0]);
$triaje = $o_ActionReporte->rptTriaje($listaAtenciones[$i][0]);
//------------------------------------------------------------------------------------
$examenesMedicos = $o_ActionReporte->rptExamenesMedicos($listaAtenciones[$i][0]);
require_once "ActionCronograma.php";
$oActionCronograma = new ActionCronograma();
$datos['idAmbienteslogicos'] = $parametros["p2"];
$datos['cidSedeEmpresa'] = $parametros["p3"];
// $datos['opcionBusqueda'] = $parametros["p4"];
// $datos['codigoPersonalSalud'] = $parametros["p5"];
// $datos['codigoservicio'] = $parametros["p6"];
$resultado = $oActionCronograma->cargarComboAmbienteFisicoReprogramacionMedicoNuevo($datos);
break;
case 'vistaReportePaquetePersona':
require_once '../../cvista/reporte/vistaReportePaquetePersona.php';
break;
case 'getBuscarPersonasReporte':
header("Content-type: text/xml");
require_once "ActionReporte.php";
$o_ActionReporte = new ActionReporte();
$resultado = $o_ActionReporte->getBuscarPersonasReporte(base64_decode($parametros["p2"]), $parametros["p3"], $parametros["p4"], $parametros["p5"], $parametros["p6"]);
break;
case 'pupapAsignacionMedico':
header("Content-type: text/xml");
require_once "ActionCita.php";
$o_ActionCita = new ActionCita();
$datos = array();
$datos["hCadenaCodigoProgramacionNombre"] = $parametros["p2"];
$datos["hCadenaCodigoProgramacion"] = $parametros["p3"];
$resultado = $o_ActionCita->ApupapAsignacionMedico($datos);
break;
case 'crearTablaAsignacionMedicoPacientes':
header("Content-type: text/xml");
require_once "ActionCita.php";
$o_ActionCita = new ActionCita();
function detalleLaboratorioExamenes($IdResult)
{
$o_ActionReporte = new ActionReporte();
$datosExamen = $o_ActionReporte->aDatosPuntoControlPaciente($IdResult);
$datosGrupo = $o_ActionReporte->agrupodeDatos($IdResult);
$datosExamenUni = $o_ActionReporte->adatosExamenUni($IdResult);
$cadenaPeche = '';
foreach ($datosGrupo as $key => $value1) {
$cadenaPeche .= '<br><b>GRUPO Nro. ' . ($key + 1) . ' ' . $value1[0] . '</b><br><br>';
$cadenaPeche .= '<table border="1" CellPadding="0" cellspacing="0" width="650" align="center">
<tr bgcolor="#aaffff" color="white">
<td width="100" align="center"><B><font size="1">ITEM</font></B></td>
<td width="50" align="center"><B><font size="1">RESULT.</font></B></td>
<td width="60" align="center"><B><font size="1">UNIDAD</font></B></td>
<td width="300" align="center"><B><font size="1">RANGO</font></B></td>
</tr>
</table>';
$cadenaPeche .= '
<table border="0" CellPadding="0" cellspacing="0" width="650" align="center">
<tr>
<td width="100" align="center" bgcolor="white"></td>
<td width="50" align="center" bgcolor="white"></td>
<td width="80" align="center" bgcolor="white"></td>
<td width="80" align="center" bgcolor="#ccffff"><font size="1">Edad</font></td>
<td width="80" align="center" bgcolor="#ccffff"><font size="1">Sexo</font></td>
<td width="80" align="center" bgcolor="#ccffff"><font size="1">Rango</font></td>
<td width="80" align="center" bgcolor="#ccffff"><font size="1">Significado</font></td>
</tr>
</table>';
foreach ($datosExamenUni as $key => $value2) {
if ($value1[1] == $value2[2]) {
$rangos = ' < R < ';
$edad = ' < Edad < ';
$cadenaPeche .= '
<table border="1" CellPadding="0" cellspacing="0" width="650" align="center">
<tr>
<td width="120" align="center"><font size="1">' . $value2[0] . '</font></td>
<td width="60" align="center"><font size="1">';
switch ($value2[4]) {
case '1':
$imprimirResultado = $value2[6];
break;
case '2':
$imprimirResultado = $value2[8];
break;
case '4':
$imprimirResultado = $value2[7];
break;
case '5':
$imprimirResultado = $value2[9];
break;
case '6':
$imprimirResultado = $value2[11];
break;
}
$cadenaPeche .= $imprimirResultado . '</font></td>
<td width="70" align="center"><font size="1">' . $value2[3] . '</font></td>
<td width="370" align="center"><font size="1"></font>';
foreach ($datosExamen as $key => $value) {
if ($value2[0] == $value[3]) {
$cadenaPeche .= '<table><tr> <td width="100" align="center"><font size="1">';
if ($value[16] == 1) {
$edades = $value[18] . $edad . $value[19];
}
$cadenaPeche .= $edades . '</font></td>
<td width="100" align="center"><font size="1">';
if ($value[15] == 1) {
$sexoes = $value[17];
}
$cadenaPeche .= $sexoes . '</font></td>
<td width="100" align="center"><font size="1">';
if ($value[20] == null && $value[21] == null) {
} else {
$rangosre = $value[20] . $rangos . $value[21];
}
$cadenaPeche .= $rangosre . '</font></td>
<td width="100" align="center"><font size="1">' . $value[22] . '</font></td>
</tr></table>';
}
}
$cadenaPeche .= '</td>
</tr>
</table>';
}
}
}
return $cadenaPeche;
}
