Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.273 and 1.296.2.11

version 1.273, 2001/08/23 10:37:46 version 1.296.2.11, 2001/09/18 08:52:49
Line 1 Line 1
 @USE  
 t.p  
 dtf.p  
   
 @main[]  @main[]
 ^oratest[]  ^imagepoly[]
   #^dconst[]
   #^subnameinexpr3[]
   #^subnameinexpr2[]
   #^subnameinexpr[]
   #^statictest[]
   #^istable[]
   #^line[]
   #^emptyprotocol[]
   #^emptytableisnotdef[]
   #^autoconvemptystring[]
   #^tdupleform[]
   #^tvoiddefault[]
   #^testdom0[]
   #^testlocal[0]
   #^thashdefault2[]
   #^tcase2[]
   #^tlsplit2[]
   #^tconnect[]
   #^timghtmlyu[]
   #^timghtml[]
   #^tresult[]
   #^voidtest[]
   #^ttext[]
   #^tdoubledefault[]
   #^tintdefault[]
   #^t3partycookie[]
   #^t3partycookie[]
   #^tcookie[]
   #^tfilemove[]
   #^treplace[]
   #^measuretest[]
   #^savetest[]
   #^oratestinsert[]
   #^oratestread[]
 #^process_check[]  #^process_check[]
 #^ffcheck[]^[xxx]  #^ffcheck[]^[xxx]
   
Line 11  dtf.p Line 41  dtf.p
 #^list[]  #^list[]
 #^tests[]  #^tests[]
 #^func(0)<hr>  #^func(0)<hr>
   
   @imagepoly[]
   $i[^image::create[200;200]]
   rem{^i.polyline(0)[^table::set{x        y
   50      50
   100     50
   150     150
   }]}
   #^i.line(50;50;100;50;0)
   $response:body[^i.gif[]]
   
   @dconst[]
   $hash[
   $.a(0xe)
   ]
   $hash.a
   
   
   @subnameinexpr3[]
   ^use[/chart.p]
   $test[^chart::init[1;2;$.zz[]]]
   
   @subnameinexpr2[]
   ^use[/test.p]
   $test[^test::subnameinexpr2[]]
   $test.c
   
   @subnameinexpr[]
   $hash[
           $.a[1]
           $.b[2]
   ]
   $c($CLASS.hash.a+$hash.b)
   $c
   
   @statictest[]
   ^use[/test.p]
   $test[^test::create[]]
   
   @istable[]
   ^istable_nested[^table::set{hren}]
   @istable_nested[param]
   ^if($param is table){y2;n2}
   
   @line[]
   $êàðòèíêà[^image::create(200;200)]
   $êàðòèíêà.line-width(2)
   ^êàðòèíêà.line(0;0;$êàðòèíêà.width;$êàðòèíêà.height;0)[****   *   ]
   $response:body[^êàðòèíêà.gif[]]
   
   
   @emptyprotocol[]
   ^connect[]{zz}
   
   @emptytableisnotdef[]
   $table[^table::set[nameless]{}]
   ^if(def $table){y;n}
   
   @autoconvemptystring[]
   ^if($form:v){y}{n}
   
   
   @tdupleform[]
   #$form:fields.a
   #$c[^form:tables.a.columns[]]
   #^c.menu{$c.column}[,]<br>
   $atable[$form:tables.a]
   ^atable.menu{a=$atable.field}[,]
   
   @tvoiddefault[]
   $var[$form:element]
   ^var.int(2)
   
   
   @testdom0[]
   $dom[^dom::load[a.xml]]
   
   
   @testlocal[level][local]
   $local($level)
   before($level):$local<br>
   ^if($level<10){
           ^testlocal($level+1)
   }
   after($level):$local<br>
   
   @thashdefault2[]
   $hash[
           $.a[1]
           $.b[2]
           $._default[xx]
   ]
   $hash.c
   
   @tcase2[]
   $hash[
           $.1{^load[code1]}
           $.2{code2}
   ]       
   $hash.1
   
   @tlsplit2[]
   $splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]]
   OK
   
   @tconnect[]
   #^connect[mysql://hren:pwd@hren/zz]{hren}
   ^connect[mysql://]{^void:sql{show tables}}
   
   
   @timghtmlyu[]
   ^img[/i/commons_22_prev.gif][$.vspace(100)]
   @img[filename;params]
   ^if(-f $filename){$thisImage[^image::measure[$filename]]^thisImage.html[$params]}
   
   @timghtml[]
   $êàðòèíêà[^image::measure[i/commons_22_prev.gif]]
   #$hash[$.alt[222]]
   #^timghtml-nested[$hash]
   ^timghtml-nested[$.alt[222]]
   
   @timghtml-nested[params]
   ^êàðòèíêà.html[$params]
   
   @tresult[]
   44
   $result[]
   
   @voidtest[]
   #$var[123x]
   ^var.int(4)
   
   @ttext[]
   $êàðòèíêà[^image::load[background.gif]]
   ^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;font.gif](5)
   
   ^êàðòèíêà.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl]
   ^êàðòèíêà.text(10;30)[mnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞß]
   ^êàðòèíêà.text(10;50)[àáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789]
   ^êàðòèíêà.text(10;70)[!-+=!\"%:,.^^^;<>?@()[]'&*/^$!]
   
   
   $response:body[^êàðòèíêà.gif[]]
   
   @tdoubledefault[]
   $a[123.6x]
   #^a.double[]
   ^a.double(999)
   
   
   @tintdefault[]
   $a[123x]
   #^a.int[]
   ^a.int(999)
   
   @t3partycookie2[]
   #z<img width=100 height=100 src=http://i/cgi-bin/p3p.cgi>z
   z<img width=100 height=100 src=http://i.office.design.ru/cgi-bin/p3p.cgi>z
   
   @t3partycookie[]
   z<img width=100 height=100 src=http://rotabanner.adex.ru/cgi-bin/banner/mail>z
   
   @tcookie[]
   $response:P3P[policyref="http://parser3/w3c/paf.xml"]
   $cookie:test[$form:x^math:random(100)]
   $env:HTTP_COOKIE<br>
   get:$cookie:test
   #<img src=http://parser3.office.design.ru/?x=coffice>
   
   @tfilemove[]
   ^file:move[a/a;b/b]
   
   @treplace[]
   $øèëî-íà-ìûëî[^table::set{a     b
   øèëî    ìûëî
   }]
   $ñòðîêà[áûâàåò øèëî â çàäèöå]
   ^ñòðîêà.replace[$øèëî-íà-ìûëî]<BR>
   
   @measuretest[]
   $im[^image::measure[mm3.gif]]
   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]{  ^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[^table::sql{select table_name from user_tables}]
 ^tables.menu{  ^tables.menu{
         $tables.table_name<br>          $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[]  @process_check[]

Removed from v.1.273  
changed lines
  Added in v.1.296.2.11


E-mail: