fetch_row($rs_fuente))
{
$data=$io_sql->obtener_datos($rs_fuente);
$io_dsfuente->data=$data;
$totrow=$io_dsfuente->getRowCount("codtipmodpre");
print "
";
print "";
print "| Código | ";
print "Denominación | ";
print "Prefijo | ";
print "
";
for ($z=1;$z<=$totrow;$z++)
{
print "";
$ls_codtipmodpre= $data["codtipmodpre"][$z];
$ls_dentipmodpre= $data["dentipmodpre"][$z];
$ls_pretipmodpre= $data["pretipmodpre"][$z];
$ls_contipmodpre= $data["contipmodpre"][$z];
$ls_pretipmodpre2= str_pad(rtrim($ls_pretipmodpre), 3,0);
print "| ".$ls_codtipmodpre." | ";
print "".$ls_dentipmodpre." | ";
print "".$ls_pretipmodpre." | ";
print "
";
}
print "
";
}
else
{
?>
free_result($rs_fuente);
$io_sql->close();
?>