--- parser3/src/www/htdocs/Attic/index.html	2001/11/09 12:09:53	1.468
+++ parser3/src/www/htdocs/Attic/index.html	2001/11/14 09:47:49	1.478
@@ -1,4 +1,14 @@
 @main[]
+^badoracequoting[]
+#^badconstructors[]
+#^xloadwrongtable[]
+#^xsetwrongtable[]
+#^if($form:test){y}{n}
+#^tablecolumnerror[]
+#^roll[]
+#^cookie2[]
+#^tableset[]
+#^math:PI.format{%.30f}
 #^xchildren[]
 #^thashforeach3[]
 #^thashforeach2[]
@@ -53,11 +63,84 @@
 #^exec[]
 #^fori[]
 #^tconnect[]
-^xslt[]
-^xml[]
+#^xslt[]
+#^xml[]
 #^header[]
+<hr>
 OK
 
+@badoracequoting[]
+$SQL.connect-string[oracle://webspb:webpwd@mts?NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251&NLS_DATE_FORMAT=YYYY-MM-DD HH24:MI:SS]
+^connect[$SQL.connect-string]{
+^void:sql{delete from paf}
+^void:sql{insert into paf values (1, '^taint[1'2'3]')}
+$paf[^table::sql{select * from paf}]
+^paf.menu{
+	$paf.id: $paf.block<hr>
+
+}
+<hr>
+
+
+^rem{
+$news[^table::sql{select description from news}[$.limit(3)]]
+^news.menu{
+	^untaint{$news.description}<hr>
+
+}
+<hr>
+}
+
+$tables[^table::sql{select table_name from user_tables}]
+^tables.menu{
+$tables.table_name<br>
+}
+
+}
+<hr>
+$env:PATH
+
+@badconstructors[]
+$bred[^string::length[]]
+$bred[^response::clear[]]
+$bred[^int::int[]]
+
+
+@xloadwrongtable[]
+$constr[^xdoc::load[wrongtable.xml]]
+
+@xsetwrongtable[]
+$constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>
+<block-list>^untaint[as-is]{$constructor}</block-list>}]
+
+
+@tablecolumnerror[]
+$t[^table::set{a}]
+$t.$a
+
+@roll[]
+#$date[^date::set(1970;1;2)]
+#^date.roll[month](-1)
+$date[^date::set(2038;1;1)]
+^date.roll[month](+1)
+$date.year  $date.month  $date.day
+
+@cookie2[]
+#=$cookie:clientType[$.value[test]]=<br>
+=$cookie:clientType=<br>
+
+
+@tableset[]
+$a[^table::set{a
+1
+2}]
+^eval(100\$a)
+
+
+
+@zzz[]
+
+
 $constructor[
 <block1 name="main_srvr" type="0" label="Основное тело" />
 <block2 name="main_srvr2" type="0" label="Основное тело" />
@@ -238,8 +321,8 @@ paf=$hf.paf
 $a
 $xdoc[^xdoc::create[doc]]
 $doc[$xdoc.documentElement]
-$name[^doc.appendChild[^xdoc.createElement{name}]]
-$text[^name.appendChild[^xdoc.createTextNode{петросян&nbsp^;co}]]
+$name[^doc.appendChild[^xdoc.createElement[name]]]
+$text[^name.appendChild[^xdoc.createTextNode[петросян&coz]]]
 ^untaint[as-is]{=$text.nodeValue=}
 
 @domedit[]
@@ -572,7 +655,7 @@ by id:
 }
 
 @show-xdoc2[xdoc]
-^xdoc.save[save.xml;
+^xdoc.save[out/save.xml;
 #	$.encoding[windows-1251]
 	$.method[xml]
 ]
@@ -580,7 +663,7 @@ $file[^xdoc.file[
 #	$.encoding[windows-1251]
 	$.method[html]
 ]]
-^file.save[text;save_file.html]
+^file.save[text;out/save_file.html]
 <pre>^taint[^xdoc.string[]]
 #	$.encoding[windows-1251]
 #	$.method[html]