<?php

include "local.php";
$sf = new scaffold("pedidos_ventanas");
$sf->fromObject($r);
$sf->insert();
print_arr(errorobject::errorlist());
echo "ok";
$sf = new scaffold("pedidos");
$sf->open($r->pedido_id);
$p = new aworkspage();
if ($r->fecha_entrega_prevista_day) {
    $sfe = new scaffold("pedidos_eventos");
    $sfe->fromObject($r);
    $sfe->estado_viejo = $sf->estado;
    $d = new date();
    $d->day = $r->fecha_entrega_prevista_day;
    $d->month = $r->fecha_entrega_prevista_month;
    $d->year = $r->fecha_entrega_prevista_year;
    $d->parse();
    $sfe->fecha_entrega_prevista = $d->timestamp;
    $sfe->fecha = time();
    $sfe->idpedido = $r->pedido_id;
    $sfe->insert();
    if (!errorobject::hasErrors()) {
        $sf->estado = $sfe->estado_nuevo;
        $sf->fecha_entrega_prevista = $sfe->fecha_entrega_prevista;
        if ($sfe->estado_nuevo == 8) {
            $sf->fecha_entrega = time();
        }
        $sf->update();
        header("location:pedido.php?pedido_id=" . $r->pedido_id);
    } else {
        $p->addWidget(new infobox("Error", "Error en el formulario, compruebe los datos", false));
    }
}
error_reporting(E_ALL);
$p->addWidget(html::write("<h1>A&ntilde;adir evento a pedido <b>" . $sf->referencia . "</b> de <b>" . $sf->cliente . "</b> </h1>"));
$b = new Box("Datos del Evento");