blob: e5bb4999079aba1069540736b486e7a8d3ae3ead (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
%if ( $error ) {
% errorpage($error);
%} else {
<% $cgi->redirect(popurl(2)."view/quotation.html?quotationnum=$quotationnum") %>
%}
<%init>
die "access deined"
unless $FS::CurrentUser::CurrentUser->access_right('Disable quotation');
$cgi->param('quotationnum') =~ /^(\d+)$/ or die 'illegal quotationnum';
my $quotationnum = $1;
my $quotation =
qsearchs('quotation', { 'quotationnum' => $quotationnum } );
my $error = $quotation->enable;
#my( $label, $url ) = $quotation->cust_or_prospect_label_link( popurl(2) );
</%init>
|