2 // vim: set binary noeol et sw=4 sts=4 :
5 // Lucarella, Schein, Arena
7 // Creado: Leandro Lucarella (lun may 2 15:36:09 ART 2005)
13 $args = func_get_args();
15 call_user_func_array('printf', $args);
19 * Listador genérico de ítems. Usa las variables de GET lista_from.
21 function listar($item, $link = '', $caption = null, $summary = null, $cant = 15)
23 if (!$summary) $summary = 'Listado de ' . get_class($item) . 's';
24 printfl('<table border="1" summary="%s">', $summary);
25 if ($caption) printfl(' <caption>%s</caption>', $caption);
28 foreach ($item->getHeaderArray() as $header)
29 printfl(' <th>%s</th>', $header);
33 $total = $item->getTotal();
34 $from = intval(@$_GET["lista_from"]);
35 $c = min($total - $from, $cant);
37 while ($item->next() and $c--)
40 foreach ($item->asArray() as $i) printfl(' <td>%s</td>', $i);
45 printfl('<table summary="Paginador" border="0"><tr>');
46 $pags = ceil($total / $cant);
47 if ($pags == 1) return; // Si tengo una sóla página, para qué el paginador?
48 for ($i = 0; $i < $pags; ++$i)
50 printfl('<td><a href="%s?lista_from=%d">%s</a></td>', $link, $i * $cant, $i + 1);
52 printfl('</tr></table>');