Edit Shopping Basket.

load_response load_cookies load_file basketcfg.txt if {[catch {set updatevar $response(update)}] == 0 } { foreach responseitem [array names response] { foreach catalogitem [array names item] { if {$responseitem == $catalogitem} { html [neo_make_cookie $responseitem $response($responseitem) -days 1] set cookies($responseitem) $response($responseitem) } } } } else { foreach responseitem [array names response] { foreach catalogitem [array names item] { if {$responseitem == $catalogitem} { if {[catch {set quantity [eval expr $cookies($responseitem) + \ $response($responseitem)]} notthere] != 0 } { html [neo_make_cookie $responseitem $response($responseitem) -days 1] set cookies($responseitem) $response($responseitem) } else { html [neo_make_cookie $responseitem $quantity -days 1] set cookies($responseitem) $quantity } } } } } Edit Shopping Basket.

Edit Shopping Basket

html [backlink "Go Back" " "]

Please enter the correct quantities into the form. To remove an item from your order, change the quantity to 0.

html "

\n \n \n \n \n \n" set subtotal 0 foreach catalogitem $itemorder { html " \n \n \n " } html "" html "
Description Price Amt.
[lindex $item($catalogitem) 1] [lindex $item($catalogitem) 2] $[format "%.2f" [lindex $item($catalogitem) 0]] " if {[catch {set quantity $cookies($catalogitem)} isthere] == 0} { html "" } else { html "" } html "
"