%doc>
Generic Browse function
%doc>
<%args>
$table => undef
%args>
<%attr>
title => 'Browse'
section => 'Generic'
%attr>
<%init>
my $MAX = 20;
my $WIDTH = 2;
%init>
% 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" &>
% }