diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-09-16 06:42:07 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-09-16 06:42:07 -0700 |
| commit | 202e6945393b47f5aa75a65682ab0d14e04fe7eb (patch) | |
| tree | e3e738513a5d86a71d06cac29fae0940a324bd66 | |
| parent | d2acdd4d53071f9e0f9718e14532cb009cda1a85 (diff) | |
convert prospects to customers via quotations, RT#20688
| -rw-r--r-- | httemplate/edit/process/quotation_convert.html | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/httemplate/edit/process/quotation_convert.html b/httemplate/edit/process/quotation_convert.html new file mode 100644 index 000000000..b387d0607 --- /dev/null +++ b/httemplate/edit/process/quotation_convert.html @@ -0,0 +1,17 @@ +<% $cgi->redirect(popurl(3). 'view/cust_main.cgi?'. $cust_main->custnum ) %> +<%init> + +#my $curuser = $FS::CurrentUser::CurrentUser; +#die "access denied" unless $curuser->access_right('Edit customer'); + +#my $conf = new FS::Conf; + +my $quotation = qsearchs( 'quotation' => { + quotationnum => scalar( $cgi->param('quotationnum') ), +} ) or die 'unknown quotationnum'; + +my $cust_main = $quotation->convert_cust_main; +errorpage($cust_main) unless ref($cust_main);# eq 'FS::cust_main'; + +</%init> + |