<%doc> Generic Browse function <%args> $table => undef <%attr> title => 'Browse' section => 'Generic' <%init> my $MAX = 20; my $WIDTH = 2;
% if ( ! $table ) { % my( @t ); % @t = $ui->meta->get_tables(); <& table.mhtml, width => $WIDTH, link => "browse.html", title => "Please select a table to browse:" &> % } else { % my @r = $table->retrieve_all();
<% $table %> ( <% scalar (@r) %> records)
<& sortresults.mhtml, table => $table, object => \@r, view => "row", withedit=>1, return_args=>"?table=$table" &>
% }