$sortkeys => 'ts_sortkeys'
$throw => undef
$tbrow => undef
+$rowclass => undef
$cols
</%args>
<&| script &>
-% my $sortfn= "ts_sort__$table";
+% print $m->content();
+
+% my $sortfn= "ts_s_$table";
function <% $sortfn %>(compar) {
debug('sorting compar='+compar);
var table= document.getElementById('<% $table %>');
for (; rowix < rows.length; rowix++) {
var row= rows.item(rowix);
if (row.id == '<% $throw %>') break;
+ debug('skip row '+rowix+' [[ '+row+' ]] id='+row.id);
}
rowix++;
% }
% if (defined $tbrow) {
if (row.id == '<% $tbrow %>') break;
% }
- if (!row.id) continue;
- if (row.tagName != 'TR') continue;
- debug('process row '+rowix+' [[ '+row+' ]] id='+row.id)
+ if (!row.id) { debug('noid row '+rowix+' [[ '+row+' ]]'); continue; }
+ if (row.tagName != 'TR') {
+ debug('no-tr row '+rowix+' tagName='+row.tagName+' [[ '+row+' ]]');
+ continue;
+ }
+ debug('process row '+rowix+' [[ '+row+' ]] id='+row.id);
newrows.push(row);
}
for (; rowix < rows.length; rowix++) {
var row= rows.item(rowix);
finalrows.push(row);
+ debug('final row '+rowix+' [[ '+row+' ]]');
}
newrows.sort(compar);
+% if (defined $rowclass) {
+ for (var rowix=0; rowix < newrows.length; rowix++) {
+ var row= newrows[rowix];
+ var classname= '<% $rowclass %>'+(rowix % 2);
+ debug('fix row '+rowix+' class '+classname);
+ row.className= classname;
+ }
+% }
newrows= newrows.concat(finalrows);
for (var rowix=0; rowix < newrows.length; rowix++) {
var row= newrows[rowix];
% my $thhtml= '';
% next if $col->{NoSort};
-% my $mapfn= "ts_compar${cix}_map__$table";
-function <% $mapfn %>(rowelement) {
- var rowid = rowelement.id;
+% my $mapfn= "ts_${cix}m_$table";
+function <% $mapfn %>(re) {
+ var rowid = re.id;
% if ($col->{SortKey}) {
return <% $col->{SortKey} %>;
% } else {
% }
}
-% my $comparefn= "ts_compar${cix}_cmp0__$table";
+% my $comparefn= "ts_${cix}c0_$table";
function <% $comparefn %>(a,b) {
- var a_key = <% $mapfn %>(a);
- var b_key = <% $mapfn %>(b);
+ var ak = <% $mapfn %>(a);
+ var bk = <% $mapfn %>(b);
% if ($col->{Numeric}) {
- return a_key - b_key
+ return ak - bk
% } else {
- if (a_key < b_key) return -1;
- if (a_key > b_key) return +1;
+ if (ak < bk) return -1;
+ if (ak > bk) return +1;
return 0;
% }
}
-% foreach my $reverse (qw(0 1)) {
-% my $tcomparefn= "ts_compar${cix}_cmp${reverse}__$table";
+% foreach my $reverse (qw(1 0)) {
+% my $tcomparefn= "ts_${cix}c${reverse}_$table";
% if ($reverse) {
% next unless $col->{DoReverse};
function <% $tcomparefn %>(a,b) { return -<% $comparefn %>(a,b); }
+
% }
% $thhtml .= "<a href=\"javascript:$sortfn($tcomparefn)\">".
% ($reverse ? '∨' : '∧'). '</a>';
thlist.item(cix).innerHTML += ah;
}
}
+
+register_onload(ts_onload__<% $table %>);
</&>