#!/mod/bin/jimsh package require cgi source /mod/webif/lib/setup require rsv.class system.class httpheader set slot [cgi_get slot 0] set table [cgi_get table TBL_RESERVATION] set event [rsv slot $table $slot] if {$table eq "pending"} { $event remove_pending exit } $event clear_ulslot $event set_delete $event insert system restartpending