<?

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

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

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

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

// Alta.
echo "\n\n\nAlta:\n";
$sistema->sistema = 0;
if (PEAR::isError($err = $sistema->guardar($db))) {
    var_dump($err);
} else {
    var_dump($sistema);
}

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

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

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

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

?>