// Title: Tigra Tables PRO
// URL: http://www.softcomplex.com/products/tigra_tables_pro/
// Version: 1.1
// Date: 04-21-2002 (mm-dd-yyyy)
// Technical Support: support@softcomplex.com (specify product title and order ID)
// Notes: Registration needed to use this script legally.
//	Visit official site for details.

var path_to_files='scripts/'

var d=document,Tdefault=[],Ttables=[],Tclass=[],NUM='NUM',STR='STR',
Timg_pagep = new Image(), 
Timg_pagen = new Image(), 
Timg_srtas = new Image(), 
Timg_srtds = new Image(), 
Timg_srtno = new Image()
d.write('<SCRIPT LANGUAGE="JavaScript" src="'+path_to_files+'table.dflt.js"></SCRIPT>')

function TsortNUM(a,b) {return a*1<b*1}
function TsortSTR(a,b) {return a+''<b+''}
function Tqs(id,c,l,h,func) {with (Ttables[id].content) {
	var x=body[(h+l)>>1][c],i=l,j=h,t=[]
	do {
		while (i<=h && func(body[i][c],x)) i++
		while (j>=l && func(x,body[j][c])) j--
		if (i<=j) {t=body[i]; body[i]=body[j]; body[j]=t; i++; j--}
	} while (i<j)
	if (l<j) Tqs(id,c,l,j,func)
	if (i<h) Tqs(id,c,i,h,func)
}}

function Ttable_vars(caption, content, look) {
	var p = [],c=0,filters=['substring','match','regexp'],buf=[]
	p.content = []
	p.caption = []
	p.content.head = []
	p.content.body = []
	p.content.foot = []
	p.page = []
	p.sort = []
	p.id = Ttables.length
	with (look) {
		p.padding = params[0]?params[0]:Tdefault.params[0]
		p.spacing = params[1]?params[1]:Tdefault.params[1]
		p.color0 = colors[0]?colors[0]:Tdefault.colors[0]
		p.color1 = colors[1]?colors[1]:Tdefault.colors[1]
		p.head = freeze[0]*1
		p.foot = freeze[1]*1
		p.page.n = (paging[0]?1:0)&&(paging[0]>0)?paging[0]:paging!=''&&paging>0?paging:content.length
		p.page.firs = paging[1]?paging[1]:Tdefault.paging[0]
		p.page.prev = paging[2]?paging[2]:Tdefault.paging[1]
		p.page.next = paging[3]?paging[3]:Tdefault.paging[2]
		p.page.last = paging[4]?paging[4]:Tdefault.paging[3]
		p.sort.ias = sorting[0] ? sorting[0] : '';
		p.sort.ids = sorting[1] ? sorting[1] : '';
		p.sort.ino = sorting[2] ? sorting[2] : '';
		p.filters = filters
		p.fil_cnt = 3
		for (i=0;i<filters.length;i++) if (!((1<<i)&filter)) {p.filters[i]=0; p.fil_cnt--}
		}
	p.page.c = 0
	p.sort.col = 0
	p.sort.ord = 0
	p.fil_col = 0
	p.fil_pat = ''
	p.fil_typ = 0
	p.rows = content.length-p.head-p.foot
	p.cols = caption.names.length
	for (var i=0;i<p.cols;i++) with (caption) 
		if (types[i]==STR||!types[i]) types[i]=TsortSTR
		else if (types[i]==NUM) types[i]=TsortNUM
		else if (types[i].indexOf('return')>-1) types[i] = new Function("a","b",types[i])
		else types[i]=TsortSTR
	p.caption=caption
	for (i=0;i<content.length;i++) for (j=0;j<content[0].length;j++) 
		if (!content[i][j]) content[i][j] = '&nbsp;'
	for (i=0;i<p.head;i++) p.content.head[i]=content[c++]
	for (i=0;i<p.rows;i++) p.content.body[i]=content[c++]
	for (i=0;i<p.foot;i++) p.content.foot[i]=content[c++]
	return p
}
function Taddsrt(id,value,colnum) {with (Ttables[id].sort) {
	return s="<table cellpadding=0 width=100% cellspacing=0 border=0><tr valign=middle>"
		+"<td width=99% class="+Tclass.capttxt+id+">"+value+"</td><td class="+Tclass.sortarr+id+"><a href=javascript:Tsrt("+id+","+colnum+","+(col!=colnum||ord==1?0:1)+")>"
		+(col!=colnum?ino:ord==1?ids:ias)+"</a></td></tr></table>"
}}
function Taddfil(id) {with (Ttables[id]) {
	if (fil_cnt==0) return ''
	var s="<tr><td class="+Tclass.filt+id+" align=right colspan="+cols+" nowrap><form name=Tfrm"+id+" onsubmit='return Tfil("+id+",this)'>use <input class="+Tclass.filtpat+id+" type=text name=fil_pat size=10"+(fil_pat!=''?" value='"+fil_pat:'')+"'> as "
	if (fil_cnt>1) {
		s+="<select class="+Tclass.filtsel+id+" name=fil_typ>"
		for(i=0;i<filters.length;i++) 
			if(filters[i]) s+="<option value="+i+(i==fil_typ?' selected':'')+">"+filters[i] 
		s+="</select>"
	}
	else 
		for (i = 0; i < 3; i++) if (filters[i]) 
			s += '<input type="hidden" name="fil_typ" value="' + i + '">' + filters[i]
	s+=" <input type=image src="+Timg_dir+"/yes.gif border=0 alt='filter'></a><br> on column <select class="+Tclass.filtsel+id+" name=fil_col><option value=0>- none -"
	for(var i=1;i<=cols;i++) 
		s+="<option value="+i+(fil_col==i?' selected':'')+">"+caption.names[i-1]
	s+="</select> <a href=# onclick=javascript:Tfil("+id+",0)><img src="+Timg_dir+"/no.gif border=0 alt='clear filter'></a></td></form></tr>"
	return s
}}
function Taddpag(id,rown) {with (Ttables[id]) {
	var a=Math.ceil(rown/page.n)-1,s=''
	if (a>0) {
		var s="<tr><td colspan="+cols+" class="+Tclass.page+id+"><table cellspacing=0 width=100%><tr>"
		if(page.c>0) {
			s+="<td class="+Tclass.pagearr+id+"><a href=javascript:Tpage("+id+",0)>"+page.firs+"</a></td><td class="+Tclass.pagearr+id+"><a href=javascript:Tpage("+id+","+(page.c*1-1)+")>"+page.prev+"</a></td>"
		}
		s+="<td width=99% class="+Tclass.pagetxt+id+">&nbsp;Page "+(page.c*1+1)+" of "+(a*1+1)+"&nbsp;</td>"
		if(page.c<a)
			s+="<td class="+Tclass.pagearr+id+"><a href=javascript:Tpage("+id+","+(page.c*1+1)+")>"+page.next+"</a></td><td class="+Tclass.pagearr+id+"><a href=javascript:Tpage("+id+","+a+")>"+page.last+"</a></td>"
		s+="</tr></table></td></tr>"
	}
	return s
}}

d.write('<SCRIPT LANGUAGE="JavaScript" src="'+path_to_files+'table.do.'+(d.body&&d.body.innerHTML?'ok':'no')+'.js"></SCRIPT>')
