<?

require_once 'DB.php';
require_once '../sistema/local_lib/GrupoSecciones.php';

$db =& DB::connect('mysql://intranet:intranet@bal747f/intranet');

if (DB::isError($db)) {
    var_dump($db);
    exit;
}

$grupo =& new GrupoSecciones;

$grupo->grupo = 3;
$err =& $grupo->cargar($db);
if (PEAR::isError($err)) {
    var_dump($err);
} else {
    var_dump($grupo);
}

echo "\n\n\nAlta:\n";

// Alta.
$grupo->grupo = 0;
$grupo->secciones = array(1, 4, 6, 8);
$err = $grupo->guardar($db);
if (PEAR::isError($err)) {
    var_dump($err);
} else {
    var_dump($err);
}

?>