4 require_once '../sistema/local_lib/GrupoSecciones.php';
6 $db = DB::connect('mysql://intranet:intranet@bal747f/intranet');
8 if (DB::isError($db)) {
16 $grupo = new GrupoSecciones(1);
17 $err = $grupo->cargar($db);
18 if (PEAR::isError($err)) {
25 echo "\n\n\nObtengo Hijos:\n";
26 $err = $grupo->cargarHijos($db);
27 if (PEAR::isError($err)) {
30 var_dump($grupo->getHijos());
37 $grupo->secciones = array(1, 4, 6, 8);
38 $err = $grupo->guardar($db);
39 if (PEAR::isError($err)) {
42 $err = $grupo->cargarHijos($db);
43 echo "Carga hijos: "; var_dump($err);
47 $id_nuevo = $grupo->grupo;
50 echo "\n\n\nModificación:\n";
51 $grupo->secciones = array(2, 3, 5, 11);
52 $grupo->nombre = 'Me cambiaron';
53 $err = $grupo->guardar($db);
54 if (PEAR::isError($err)) {
61 echo "\n\n\nVerifica:\n";
63 $err = $grupo->cargar($db);
64 if (PEAR::isError($err)) {
71 echo "\n\n\nBorra grupo $id_nuevo:\n";
72 $grupo->grupo = $id_nuevo;
73 $err = $grupo->borrar($db);
76 // Verifica obteniendo hijos.
77 echo "\n\n\nVerifica Hijos:\n";
79 $err = $grupo->cargarHijos($db);
80 if (PEAR::isError($err)) {
83 var_dump($grupo->getHijos());