1 <% include( 'elements/edit.html',
3 'table' => 'quotation',
6 'quotationnum' => 'Quotation number',
7 'prospectnum' => 'Prospect',
8 'custnum' => 'Customer',
10 'disabled' => 'Disabled',
13 { field=>'prospectnum', type=>'fixed-prospect_main' },
14 { field=>'custnum', type=>'fixed-cust_main' },
15 { field=>'_date', type=>'fixed-date' },
16 { field=>'disabled', type=>'checkbox', value=>'Y'},
18 #XXX some way to disable the "view all"
19 'new_callback' => sub { my( $cgi, $quotation) = @_;
20 $quotation->$_( $cgi->param($_) )
21 foreach qw( prospectnum custnum );
22 $quotation->_date(time);
29 unless $FS::CurrentUser::CurrentUser->access_right('Generate quotation');