<% include("/elements/header.html",'Virtual field definitions', menubar('Main Menu' => $p)) %>
%
%
%my %pvfs;
%my $block;
%my $p2 = popurl(2);
%my $dbtable;
%
%foreach (qsearch('part_virtual_field', {})) {
% push @{ $pvfs{$_->dbtable} }, $_;
%}
%
% if ($cgi->param('error')) {
Error: <%$cgi->param('error')%>
% }
Add a new field
% foreach $dbtable (sort { $a cmp $b } keys (%pvfs)) {
<%$dbtable%>
<%table()%>
| Field name | Description |
% foreach my $pvf (sort {$a->name cmp $b->name} @{ $pvfs{$dbtable} }) {
|
<%$pvf->name%> |
<%$pvf->label%> |
% }
% }