diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-09-16 06:42:10 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-09-16 06:42:10 -0700 |
| commit | 32834b6e8a92ca3ec0bbf58075956a7d0edca79a (patch) | |
| tree | 910caf96dd5091fb61cb14e0248cf40362a3aad6 | |
| parent | ae732741cb031ddb6c99156a8804cac3e7500f76 (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> + |