parser3/www/htdocs/_bug.html - diff

Return to _bug.html CVS log

Up to [parser3project] / parser3 / www / htdocs

-version 1.13, 2004/02/27 14:58:35
+version 1.49, 2004/06/22 14:12:57
  Line 1
- $xdoc[^xdoc::load[_bug.xml]]
+ @main[]
- $xdoc[^xdoc.transform[_bug.xsl]]
+ ^connect[oracle://mts_imprimatur2:imp2@mts]{
- ^xdoc.save[_bug_saved.xml]
+ #    ^in[]
- OK?
+         ^out[]
+         OK
+ }
+ @inp[]
+ create or replace procedure paf(a in integer) as begin
+ insert into pif (a) values (:a);
+ end;
+ /
+ @in[]
+ #    ^void:sql{create table paf(a clob)}
+ #    ^void:sql{insert into paf (a) values (/**a**/'a')}
+ #    ^void:sql{insert into paf (a) values (:unk)}
+         ^void:sql{delete from pif}
+         ^void:sql{call paf(:a)}[
+                 $.bind[
+                         $.a[2]
+                 ]
+         ]
+         ^int:sql{select count(*) from pif}
+         "^string:sql{select a from pif}"
+ #       ^string:sql{select a from paf}
+ @outp[]
+ create or replace procedure pafm(ai in integer,ao out integer) as begin
+ ao:=ai;
+ end;
+ /
+ @out[]
+     $vars[
+         $.ai(2222)
+         $.ao[sad]
+     ]
+         ^void:sql{call pafm(:ai,:ao)}[
+                 $.bind[$vars]
+         ]
+         "$vars.ai"
+         "$vars.ao"
+ #       ^string:sql{select a from paf}

E-mail: