Hecl Builder

Easy Mobile Applications

Download: .jad .jar
5.0/5 Average rating:

MIDP Version: 1.0
Description: A simple shopping cart that connects to this web page to download the list of stuff to buy: http://dedasys.com/shopping_cart/
Last updated: Mon Nov 25 17:22:45 +0000 2013 by davidw

proc complete? {lb} {
    set l [getprop $lb selected]
    foreach v $l {
	if { = $v 0 } {
    setprop $lb label "Done!"

proc getlist {listname} {
    global shoppinglist
    set code [getprop $listname text]
    set shoppinglist [split [http http://dedasys.com/shopping_list/getlist.tcl?listid=$code] \n]

set f [form label "Shopping List - Select a List" code {
    set listname [textfield label "Shopping list id number:" type numeric]
    string "Insert the numeric code that you received from http://dedasys.com/shopping_list/ to recieve your shopping list."
    cmd label "Get list" code {
	set lb [listbox label "Shopping list - things to get" type multiple callback {
	    complete? $lb
	setcurrent $lb
	getlist $listname
	foreach item $shoppinglist {
	    string $item

setcurrent $f

Note: If you have trouble with the applets on this site, you might try upgrading your Jave Runtime Environment, in order to get the "Next-Generation Java Plug-In", available for download here: http://download.java.net/jdk6/
Content-Type: text/html; charset=utf-8 Set-Cookie: _builder_hecl_session=BAh7BzoOcmV0dXJuX3RvIhQvc2NyaXB0cy9zaG93LzMiCmZsYXNoSUM6J0FjdGlvbkNvbnRyb2xsZXI6OkZsYXNoOjpGbGFzaEhhc2h7AAY6CkB1c2VkewA%3D--c611681caaeb06c2043ea21064c9ce8260000545; path=/; HttpOnly Cache-Control: private, max-age=0, must-revalidate X-Runtime: 4ms Content-Length: 5127 X-Powered-By: ETag: "115bf1535eda59ce21ba26c8a962d261" Status: 500 Internal Server Error

Application error (Apache)

Change this error message for exceptions thrown outside of an action (like in Dispatcher setups or broken Ruby code) in public/500.html