--- parser3/src/www/htdocs/Attic/index.html	2001/08/23 10:37:46	1.273
+++ parser3/src/www/htdocs/Attic/index.html	2001/08/27 15:56:46	1.280
@@ -3,7 +3,10 @@ t.p
 dtf.p
 
 @main[]
-^oratest[]
+^measuretest[]
+#^savetest[]
+#^oratestinsert[]
+#^oratestread[]
 #^process_check[]
 #^ffcheck[]^[xxx]
 
@@ -11,13 +14,47 @@ dtf.p
 #^list[]
 #^tests[]
 #^func(0)<hr>
+
+@measuretest[]
+$im[^image::measure[mm2.jpg]]
+x:y=${im.width}:${im.height}<BR>
+
+@savetest[]
+$file[^file::load[text;index.html]]
+^file.save[binary;/some/dir/here.dat]
+OK
 	
-@oratest[]
+@oratestinsert[]
+^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
+#^void:sql{create table lobtest(test clob)}
+^void:sql{insert into lobtest values (/**test**/'бу''квы')}
+$table[^table::sql{select * from lobtest}]
+^table.menu{^table.line[] <!--. $table.test -->}
+}
+
+@oratestread[]
 ^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
+^rem{
 $tables[^table::sql{select table_name from user_tables}]
 ^tables.menu{
 	$tables.table_name<br>
 }
+<hr>
+}
+$news[^table::sql{select * from news}[$.limit(2)]]
+^rem{
+news columns:<br>
+$news_columns[^news.columns[]]
+^news_columns.menu{
+	$news_columns.column<br>
+}
+<hr>
+}
+news description:<br>
+^news.menu{
+<hr>
+	$news.description
+}
 }
 
 @process_check[]