--- parser3/www/htdocs/Attic/index.html	2002/04/15 06:46:02	1.35
+++ parser3/www/htdocs/Attic/index.html	2002/05/15 08:58:01	1.57
@@ -1,13 +1,38 @@
 #@USE
-#z/t.p
+#t.p
 
 @autoz[]
 $request:charset[windows-1251]
 $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]
 
+@postprocess[body]
+#=$env:HTTP_TEST=<br>
+#=$env:REDIRECT_HTTP_TEST=<br>
+#<hr>
+$body
+<hr>
+OK
+
 @main[]
-^casehashtext[]
+#^sqldefaults[]
+#^eval(2)
+#^tcrashlocaljunctionsv2[]
+#^tcrashlocaljunctions[]
+#^tjunctions[]
+#^replacetest[]
+#^matchoptionpp[]
+#^txdocxnodechild[]
+#^tclasses[]
+#$math:PI
+#^b:method[]
+#^main[]
+#^errort[]
+#^tselectNumber[]
+#$result[hello]
+#^invaliddate2[]
+#^process2[]
+#^casehashtext[]
 #^subjvaltest[]
 #^tableselect0[]
 #^memnotest1[]
@@ -119,8 +144,213 @@ $response:content-type[$.value[text/html
 #^xslt[]
 #^xml[]
 #^header[]
+#^tablehasht[]
+#^datecreatestring[]
+#^mssqltypes1[]
+#^badthrows[]
+#^xmlspace[]
+#^counter[main.counter]
+#^xpath2[]
+#^callindirect[]
+#^junctionprob[]
+^datecreatestring2[]
+
+@datecreatestring2[]
+$date[^date::create[2000]]
+^date.sql-string[]	
+
+@junctionprob[][l]
+$l[123]
+$a{$l}
+^junctionprobnested[$a]
+@junctionprobnested[p]
+$p
+
+
+@callindirecttarget[]
+callindirecttarget called
+@callindirect[]
+$f[$callindirecttarget]
+^f[]
+
+@xpath2[]
+$xdoc[^xdoc::create{<?xml version="1.0" encoding="windows-1251"?>
+<doc>
+<field-list>
+<field name="aa"/>
+<field name="bb"/>
+</field-list>
+</doc>
+}]
+
+#^xdoc.string[]
+
+$fieldList[^xdoc.selectSingle[/doc/field-list]]
+#^fieldList.childNodes._count[]
+$fields[^fieldList.select[field]]
+#^fields._count[]
+^fields.foreach[k;node]{
+	$node.nodeName<br>
+}
+@counter[filespec][f;s]
+^file:lock[$filespec]{
+	$f[^file::load[text;$filespec]]
+	$s[^eval($f.text+1)]
+	^s.save[$filespec]	
+}
+$s
+
+@xmlspace[]
+$xdoc[^xdoc::set{^process{<?xml version="1.0" encoding="windows-1251"?>
+<!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
+<people>
+	<man id="1" имя="word слово">
+		<name>1  2</name>
+	</man>
+</people>
+}}]
+$xdoc[^xdoc.transform[global.xsl]]
+$string[^xdoc.string[$.method[html]]]
+^string.save[a]
+^untaint[html]{$string}
+
+@badthrows[]
+#^throw[a;b;]
+^throw[a;]
+
+@mssqltypes1[]
+^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
+#    ^string:sql{select { ts '1998-05-02 01:23:56.123' }}
+#    ^string:sql{select CAST({ ts '1998-05-02 01:23:56.123' }AS smalldatetime)}
+#	^string:sql{select CAST({ts '2002-04-28 00:00:00.000'} AS smalldatetime)}
+	$t[^table::sql{select a from paf}]
+	^t.count[]
+}
+
+@datecreatestring[]
+$d[^date::create[2002-04-33 01:03:04]]
+^d.sql-string[]
+
+@method[hash]
+$hash.key
+@mainZ[]
+^method[
+    $.key{code}
+]
+
+@tablehasht[]
+$t[^table::create{p
+1
+3
+2
+4}]
+
+$h[^t.hash[p]]
+
+=^h._count[]=
+
+
+@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}]
+}
+
+@tcrashlocaljunctionsv2[]
+$a[
+	$b{  $c[1] }
+]
+$b
+$c
+
+@tcrashlocaljunctions[]
+$var[aaa]
+^if(1){
+^tcrashlocaljunctions1[]
+}
+
+$j
+
+@tcrashlocaljunctions1[][var]
+$var[varvalue]
+	$j{
+		$var
+	}
+$j
+
+@tjunctions[][tl]
+$t[^t::create[]]
+^tjunctionsi[]
+
+@tjunctionsi[][tl]
+$tl[12345]
+^t.tjunctionsm[
+	$.key{
+		$tl
+	}
+]
+
+@replacetest[]
+$b[b]
+$s[
+aaaaaaaaaa${b}aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa${b}aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+]
+^s.replace[^table::create{from	to
+ba	!_}]
+
+
+@matchoptionpp[]
+#$ORIGINS(1)
+$s[
+aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+]
+^s.match[b;g']{($match.prematch|$match.match|$match.postmatch)}
+
+
+@txdocxnodechild[]
+$xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?><d/>}]
+$xdoc.nodeName
+^xdoc.selectNumber[2*2]
+$xdoc:ELEMENT_NODE
+
+
+@tclasses[]
+$t[^t::create[]]
+^t.method[]
 <hr>
-OK
+^t.base_method[]
+
+
+@errort[]
+^xdoc::create[a]
+#^throw[user;here;this]
+
+@tselectNumber[]
+$d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?><d attr="привет" n="123"/>}]
+^d.selectString[string(d/@attr)]<br>
+^d.selectNumber[2*2]<br>
+^d.selectNumber[number(/d/@n)+1]<br>
+
+
+@invaliddate2[]
+$d[^date::create(1018946575/60/60)] ^d.sql-string[]
+
+@process2[]
+^^process{
+	^process{
+		^$a[^^if(0){^$.k[y]}{^$.k[^^hren[]n]}] ^$a.k
+	}
+}
 
 @casehashtext[]
 $tt[1]
@@ -133,8 +363,9 @@ $tmp[
                         $.bbb[456]
                 }
         }
+        shit!
 ]
-
+#$tmp
 $tmp.aaa
 
 @subjvaltest[]
@@ -352,12 +583,13 @@ $t[^table::create{a	b
 
 @execlangs[]
 $f[^file::exec[test.pl]]
+err:$f.stderr<br>
 ^process{$f.text}
 #$c[^t.columns[]]
 #^c.menu{
 #* $c.column<br>
 #}
-=$t.c=
+c:$t.c<br>
 
 @tobjeresult[]
 ^table::create{a