#!/mod/bin/jimsh

package require cgi
source /mod/webif/lib/setup
require rsv.class system.class

httpheader

set slots [cgi_get slot 0]
set table [cgi_get table TBL_RESERVATION]

if {$table eq "pending"} exit

foreach slot [split $slots ","] {
	set event [rsv slot $table $slot]

	$event clear_ulslot
	$event set_refresh
	$event insert
}

system restartpending

