X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fmenu.html;h=573741e2144b25a0ec31450eed1f7bab14ecf12a;hb=63a268637b2d51a8766412617724b9436439deb6;hp=caf2274095b606abc368652912b9827d1eefb60c;hpb=40a7b3dc653e099f7bd0bd762b649b04c4432db2;p=freeside.git diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html index caf227409..573741e21 100644 --- a/httemplate/elements/menu.html +++ b/httemplate/elements/menu.html @@ -60,6 +60,11 @@ my $curuser = $FS::CurrentUser::CurrentUser; #XXX Active tickets not assigned to a customer +tie my %report_prospects, 'Tie::IxHash', + 'List prospects' => [ $fsurl. 'search/prospect_main.html', '' ], + 'Advanced prospect reports' => [ $fsurl. 'search/report_prospect_main.html', '' ], +; + tie my %report_customers_lists, 'Tie::IxHash', 'by customer number' => [ $fsurl. 'search/cust_main.cgi?browse=custnum', '' ], 'by last name' => [ $fsurl. 'search/cust_main.cgi?browse=last', '' ], @@ -251,6 +256,8 @@ if($curuser->access_right('Financial reports')) { } # else $report_financial contains nothing. tie my %report_menu, 'Tie::IxHash'; +$report_menu{'Prospects'} = [ \%report_prospects, 'Prospect reports' ] + if $curuser->access_right('List prospects'); $report_menu{'Customers'} = [ \%report_customers, 'Customer reports' ] if $curuser->access_right('List customers'); $report_menu{'Invoices'} = [ \%report_invoices, 'Invoice reports' ] @@ -323,7 +330,7 @@ $tools_menu{'Ticketing'} = [ \%tools_ticketing, 'Ticketing tools' ] $tools_menu{'Time Queue'} = [ $fsurl.'search/report_timeworked.html', 'View pending support time' ] if $curuser->access_right('Time queue'); $tools_menu{'Attachments'} = [ $fsurl.'browse/cust_attachment.html', 'View customer attachments' ] - if !$conf->config('disable_cust_attachment') and $curuser->access_right('View attachments'); + if !$conf->config('disable_cust_attachment') and $curuser->access_right('View attachments') and $curuser->access_right('Browse attachments'); $tools_menu{'Importing'} = [ \%tools_importing, 'Import tools' ] if $curuser->access_right('Import'); $tools_menu{'Exporting'} = [ \%tools_exporting, 'Export tools' ] @@ -476,6 +483,8 @@ if ( $conf->config('ticket_system') ) { 'Ticketing start page', ], } +$menu{'New prospect'} = [ $fsurl.'edit/prospect_main.html', 'Add a new prospect' ] + if $curuser->access_right('New prospect'); $menu{'New customer'} = [ $fsurl.'edit/cust_main.cgi', 'Add a new customer' ] if $curuser->access_right('New customer'); $menu{'Reports'} = [ \%report_menu, 'Lists, reporting and graphing' ]