--- parser3/www/htdocs/Attic/_bug.html 2004/03/09 14:49:47 1.29
+++ parser3/www/htdocs/Attic/_bug.html 2004/10/07 09:23:44 1.69
@@ -1,27 +1,10 @@
-@main[]
-$request:charset[windows-1251]
-$response:charset[windows-1251]
-$response:content-type[text/html]
-
-^if(def $form:param){
- ^$form:param=$form:param
-
- $several[$form:tables.several]
- ^$form:tables.several=^several.menu{
- $several.field
- }[,]
-}{
-
-$f[^file::load[text;http://parser3/_bug.html;
-# $.method[POST]
- $.form[
- $.param[pass=ed
- ]
- $.several[^table::create[nameless]{1^#0A2}]
- ]
- $.any-status(1)
-]]
-
-=$f.text=
-
-}
\ No newline at end of file
+^connect[oracle://iagency:pwd@oracle]{
+ ^string:sql{select 2*2 from dual}
+ ^try{
+ ^string:sql{select 2*2x from dual}
+ }{
+ $exception.handled(1)
+ exception($exception.comment) handled
+ }
+ ^string:sql{select 2*2 from dual}
+}