[BACK]Return to index.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / www / htdocs

Diff for /parser3/www/htdocs/Attic/index.html between versions 1.57 and 1.60

version 1.57, 2002/05/15 08:58:01 version 1.60, 2002/06/03 15:02:42
Line 1 Line 1
 #@USE  @USE
 #t.p  t.p
   
 @autoz[]  @autoz[]
 $request:charset[windows-1251]  $request:charset[windows-1251]
 $response:charset[windows-1251]  $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]  $response:content-type[$.value[text/html]$.charset[$response:charset]]
   
 @postprocess[body]  #@postprocess[body]
 #=$env:HTTP_TEST=<br>  #<b>$body</b>
 #=$env:REDIRECT_HTTP_TEST=<br>  #$result[123]
 #<hr>  
 $body  
 <hr>  
 OK  
   
 @main[]  @main[]
 #^sqldefaults[]  ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
           ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
       ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
   }
 #^eval(2)  #^eval(2)
 #^tcrashlocaljunctionsv2[]  #^tcrashlocaljunctionsv2[]
 #^tcrashlocaljunctions[]  #^tcrashlocaljunctions[]
Line 144  OK Line 143  OK
 #^xslt[]  #^xslt[]
 #^xml[]  #^xml[]
 #^header[]  #^header[]
   <<<<<<< index.html
 #^tablehasht[]  #^tablehasht[]
 #^datecreatestring[]  #^datecreatestring[]
 #^mssqltypes1[]  #^mssqltypes1[]
Line 153  OK Line 153  OK
 #^xpath2[]  #^xpath2[]
 #^callindirect[]  #^callindirect[]
 #^junctionprob[]  #^junctionprob[]
 ^datecreatestring2[]  #^datecreatestring2[]
   #^tstoredproc[]
   #^tstoredproc2[]
   #^forkeys[]
   #^pngsize[]
   ^checkList[]
   
   @checkList[]
   ...^oneOf[a;a,b,c]...<br>
   #...^oneOf[a;ax,b,c]...<br>
   ...^oneWord[word]...<br>
   #...^oneWord[wo rd]...<br>
   
   
   @oneOf[s;list][t] выдаёт строку, если строка она есть в списке(разделенном запятыми)
   $t[^list.lsplit[,]]
   ^if(!^t.locate[piece;$s]){^throw[user;$s;unknown]}
   $result[$s]
   
   @oneWord[s]
   ^if(^s.match[\W]){^throw[user.data;$s;not word]}{$s}
   
   @pngsize[]
   $i[^image::measure[test.png]]
   ^i.html[]
   
   
   @forkeys[]
   $text[^form:fields.foreach[key;val]{$key=$val
   }]
   ^text.save[ttt.txt]
   =$text=
   
   
   @tstoredproc2[]
   ^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
           ^void:sql{exec pafvoid}
   }
   
   @tstoredproc[]
   ^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
           $t[^table::sql{exec pafproc}]
   #       $t[^table::sql{{call pafproc}}]
           $c[^t.columns[]]
           ^c.menu{$c.column}[<br>]
   }
   
 @datecreatestring2[]  @datecreatestring2[]
 $date[^date::create[2000]]  <table border=1>
 ^date.sql-string[]        ^datecreatestring2show[2000]
   ^datecreatestring2show[2000-02]
   ^datecreatestring2show[2000-2-03]
   ^datecreatestring2show[2000-02-03 15]
   ^datecreatestring2show[2000-02-03 15:30] 
   ^datecreatestring2show[2000-02-03 15:30:04] 
   ^datecreatestring2show[2000-02-03 15:30:04 hren] 
   ^datecreatestring2show[15:30] 
   ^datecreatestring2show[15:30:05] 
   ^datecreatestring2show[15:30:05 hren] 
   </table>
   
   @datecreatestring2show[s]
   $date[^date::create[$s]]
   <tr>
   <td>$s</td><td align=right>^date.sql-string[]</td>
   </tr>
   
   
 @junctionprob[][l]  @junctionprob[][l]
 $l[123]  $l[123]
Line 255  $h[^t.hash[p]] Line 317  $h[^t.hash[p]]
         ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>          ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
     ^string:sql{select news_id from news where news_id=-1}[$.default{2}]      ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
 }  }
   =======
   <hr>
   OK
   >>>>>>> 1.50
   
 @tcrashlocaljunctionsv2[]  @tcrashlocaljunctionsv2[]
 $a[  $a[
Removed from v.1.57  
changed lines
  Added in v.1.60

E-mail: