aquí está el código.
$rutadeacceso = "admin.php";
include($rutadeacceso);
$basededatos = "facturas";
if ($resultadoconnect != 0)
{
$resultadoselectdb = @mysql_select_db("$basededatos", $vinculo);
if ($resultadoselectdb != 0)
{
$sql = "SELECT identificacion FROM dic2003";
$resultadoquery = @mysql_query($sql);
if ($fila = @mysql_fetch_array($resultadoquery))
{
echo "<p align='center'><font size='5' face='Verdana, Arial, Helvetica, sans-serif'><b>Asistencia en Salud Integral A.S.I. S.A. - NIT 807.003.790-1</b></p>";
echo "<p align='center'><font size='4' face='Verdana, Arial, Helvetica, sans-serif'><b>Relación de Procedimientos - Mes de Enero de 2004</b></p>";
$totalrelacion = 0;
$con = 0;
do
{
$identificacion = $fila[identificacion];
$sql2 = "SELECT * FROM procedimientos WHERE identificacion = '$identificacion' AND (fecha BETWEEN '2004-01-01' AND '2004-01-31')";
$resultadoquery2 = @mysql_query($sql2);
if ($fila2 = @mysql_fetch_array($resultadoquery2))
{
echo "<table border='1'>";
echo "<tr><td><font size='3' face='Verdana, Arial, Helvetica, sans-serif'><b>$identificacion</b></font></td></tr>";
echo "<tr><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Fecha</b></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Orden de Servicio</b></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Código de Procedimiento</b></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Nombre de Procedimiento</b></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Cantidad</b></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>Valor</b></font></td></tr>";
$valortotal = 0;
$con = $con + 1;
do
{
$valortotal = $valortotal + $fila2[valor];
$totalrelacion = $totalrelacion + $fila2[valor];
$valorf = number_format($fila2[valor], 0, ",", ".");
echo "<tr><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$fila2[fecha]</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$fila2[ordenservicio]</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$fila2[codprocedimiento]</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$fila2[nomprocedimiento]</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$fila2[cantidad]</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>$$valorf</font></td></tr>";
}
while ($fila2 = @mysql_fetch_array($resultadoquery2));
@mysql_free_result($resultadoquery2);
$valortotalf = number_format($valortotal, 0, ",", ".");
echo "<tr><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'></font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'></font></td><td align='right'><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>Total:</font></td><td><font size='1' face='Verdana, Arial, Helvetica, sans-serif'><b>$$valortotalf</b></font></td></tr>";
echo "</table>";
echo $con;
echo "<br>";
echo $totalrelacion;
echo "<br>";
}
else
{
//nada
}
}
while ($fila = @mysql_fetch_array($resultadoquery));
@mysql_free_result($resultadoquery);
echo "<p><font size='1' face='Verdana, Arial, Helvetica, sans-serif'>Total registros: $con</p>";
echo "<hr></hr><br>";
$totalrelacionf = number_format($totalrelacion, 0, ",", ".");
echo "<p align='right'><font size='4' face='Verdana, Arial, Helvetica, sans-serif'><b>Total relación: $$totalrelacionf</b></p>";
echo "<br>";
}
else
{
echo "<p align='center'><h1>No se encontraron registros en la tabla IDENTIFICACIONES.</h1></p>";
}
}
else
{
echo "<p align='center'><h1>Error!. Falló la selección de la base de datos.</h1></p>";
}
}
else
{
echo "<p align='center'><h1>Error!. Falló la conexión a la base de datos.</h1></p>";
}
?>