--- parser3/src/www/htdocs/Attic/index.html 2001/08/23 12:10:30 1.275 +++ parser3/src/www/htdocs/Attic/index.html 2001/08/27 12:07:29 1.279 @@ -3,6 +3,7 @@ t.p dtf.p @main[] +#^savetest[] ^oratestinsert[] #^oratestread[] #^process_check[] @@ -12,13 +13,18 @@ dtf.p #^list[] #^tests[] #^func(0)
+ +@savetest[] +$file[^file::load[text;index.html]] +^file.save[binary;/some/dir/here.dat] +OK @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**/'буквы')} +^void:sql{insert into lobtest values (/**test**/'бу''квы')} $table[^table::sql{select * from lobtest}] -^table.menu{
$table.test} +^table.menu{^table.line[] } } @oratestread[]