<?

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

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

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

// Carga.
echo "Carga id 1:\n";
$servicio = new Servicio(1);
if (PEAR::isError($err = $servicio->cargar($db))) {
    var_dump($err);
} else {
    var_dump($servicio);
}

// Obtengo hijos.
echo "\n\n\nObtengo Hijos:\n";
if (PEAR::isError($err = $servicio->cargarHijos($db))) {
    var_dump($err);
} else {
    var_dump($servicio->getHijos());
}

// Alta.
echo "\n\n\nAlta:\n";
$servicio->servicio  = 0;
$servicio->padre     = 1;
if (PEAR::isError($err = $servicio->guardar($db))) {
    var_dump($err);
}
$err = $servicio->cargarHijos($db);
echo "Carga hijos: "; var_dump($err);
var_dump($servicio);

// Nuevo ID.
$id_nuevo = $servicio->servicio;

// Modificación.
echo "\n\n\nModificación:\n";
$servicio->nombre = 'Me cambiaron';
if (PEAR::isError($err = $servicio->guardar($db))) {
    var_dump($err);
} else {
    var_dump($servicio);
}

// Verifica.
echo "\n\n\nVerifica:\n";
$servicio->servicio = 1;
if (PEAR::isError($err = $servicio->cargar($db))) {
    var_dump($err);
} elseif (PEAR::isError($err = $servicio->cargarHijos($db))) {
    var_dump($err);
} else {
    var_dump($servicio);
}

// Borra.
echo "\n\n\nBorra servicio $id_nuevo:\n";
$servicio->servicio = $id_nuevo;
$err = $servicio->borrar($db);
var_dump($err);

// Verifica obteniendo hijos.
echo "\n\n\nVerifica Hijos:\n";
$servicio->servicio = 1;
if (PEAR::isError($err = $servicio->cargarHijos($db))) {
    var_dump($err);
} else {
    var_dump($servicio->getHijos());
}

?>