webif/var/mongoose/html/sched/folder.jim
hummypkg 2bbf69f820 schedule restructure
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@876 2a923420-c742-0410-a762-8d5b09965624
2012-03-31 21:16:31 +00:00

29 lines
439 B
Plaintext
Executable File

#!/mod/bin/jimsh
package require cgi
source /mod/var/mongoose/lib/setup
require rsv.class system.class
puts "Content-Type: text/html"
puts ""
cgi_input
#cgi_dump
set slot [cgi_get sid 0]
set table [cgi_get table TBL_RESERVATION]
set folder [cgi_get name -]
if {$folder eq "-"} {
puts "Error - no folder."
exit
}
set event [rsv slot $table $slot]
$event clear_ulslot
$event set_folder $folder
$event insert
system restartpending