|
|
| version 1.1.2.1, 2003/04/11 10:57:24 | version 1.4, 2008/05/29 10:02:35 |
|---|---|
| Line 1 | Line 1 |
| @main[] | |
| $table[^table::create{group name | $table[^table::create{group name |
| first a | first a |
| first b | first b |
| Line 5 second c | Line 6 second c |
| third d | third d |
| third e | third e |
| }] | }] |
| $distinct_tables[^table.hash[group][ | |
| $.distinct[tables] | |
| ]] | |
| ^distinct_tables.foreach[key;table]{ | |
| $key ^table.menu{$table.name}[,]<br> | |
| } | |
| ^do[unique key, no value columns, no options]{ | |
| ^table.hash[name] | |
| } | |
| ^do[non-unique key, no value columns, no options]{ | |
| ^table.hash[group] | |
| }[if key not unique ^$.distinct(1) must be specified] | |
| ^do[non-unique key, no value columns, options: ^$.distinct[tables] (backward)]{ | |
| ^table.hash[group][ | |
| $.distinct[tables] | |
| ] | |
| } | |
| ^do[non-unique key, no value columns, options: ^$.distinct[tables], ^$.type[hash] ]{ | |
| ^table.hash[group][ | |
| $.distinct[tables] | |
| $.type[hash] | |
| ] | |
| }[^$.distinct[tables] and ^$.type[...] can't be specified together] | |
| ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[table]]{ | |
| ^table.hash[group][ | |
| $.distinct(1) | |
| $.type[table] | |
| ] | |
| } | |
| ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[table]]{ | |
| ^table.hash[group][ | |
| $.type[table] | |
| ] | |
| }[non unique key without distinct option] | |
| ^do[unique key, no value columns, options: ^$.type[table]]{ | |
| ^table.hash[name][ | |
| $.type[table] | |
| ] | |
| } | |
| ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[hash]]{ | |
| ^table.hash[group][ | |
| $.distinct(1) | |
| $.type[hash] | |
| ] | |
| } | |
| ^do[non-unique key, no value columns, options: ^$.distinct(1) (as above because ^$.type[hash] == default)]{ | |
| ^table.hash[group][ | |
| $.distinct(1) | |
| ] | |
| } | |
| ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[string]]{ | |
| ^table.hash[group][ | |
| $.distinct(1) | |
| $.type[string] | |
| ] | |
| }[with ^$.type[string] only one field must be specified] | |
| ^do[non-unique key, one value column (name), options: ^$.distinct(1) ^$.type[string]]{ | |
| ^table.hash[group;name][ | |
| $.distinct(1) | |
| $.type[string] | |
| ] | |
| } | |
| @do[sTitle;jCode;sExceptionComment][h] | |
| <h3>$sTitle</h3> | |
| ^try{ | |
| $h[$jCode] | |
| ^print[$h] | |
| }{ | |
| ^if($exception.type eq "parser.runtime"){ | |
| $exception.handled(1) | |
| ^if(def $sExceptionComment){ | |
| failed, that's OK.<br /> | |
| $sExceptionComment | |
| }{ | |
| something wrong | |
| } | |
| } | |
| } | |
| @print[hData][sKey;value] | |
| ^hData.foreach[sKey;value]{ | |
| $sKey ^if($value is "table"){^value.menu{$value.name}[,]}{^if($value is "string"){$value}{^if($value is "hash"){<blockquote>^print[$value]</blockquote>}}}<br /> | |
| } |