<%doc> Common code for editing invoice/quotation details/comments. Expects to be the last element in a two-column table with specified id <& /edit/elements/detail-table.html, id => 'element_id', # required details => \@details, # plain text strings, existing details label => 'Comments', # optional, shows on first row only field => 'comment', # input field name/id, appended with rownum, default 'detail' &> <%shared> my $detail_table_init = 0; <%init> my %opt = @_; my @details = $opt{'details'} ? @{ $opt{'details'} } : (); push(@details,'') if $details[$#details] || !@details; my $id = $opt{'id'} or die "No id specified"; my $label = $opt{'label'} || ''; my $field = $opt{'field'} || 'detail';