X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fmenu.html;h=f558777b5ace6fc34b67bfa5a57b7c52967de02f;hb=b64ad663a0b694d86079c82c80f9de929b2559af;hp=710850cc265df63d3088c5768f44e6d86846be35;hpb=13a5d5ea7770ef1868e1d9af95a27065008484b7;p=freeside.git diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html index 710850cc2..f558777b5 100644 --- a/httemplate/elements/menu.html +++ b/httemplate/elements/menu.html @@ -140,7 +140,7 @@ foreach my $svcdb ( FS::part_svc->svc_tables() ) { my $name = "FS::$svcdb"->table_info->{'name_plural'} || PL( "FS::$svcdb"->table_info->{'name'} ); - my $lcname = lc($name); + my $lcname = "FS::$svcdb"->table_info->{'lcname_plural'} || lc($name); my $lcsname = lc("FS::$svcdb"->table_info->{'name'}); my $longname = "FS::$svcdb"->table_info->{'longname_plural'} || $name; my $lclongname = lc($longname); @@ -191,16 +191,24 @@ foreach my $svcdb ( FS::part_svc->svc_tables() ) { ]; } - if ( $svcdb eq 'svc_acct' || $svcdb eq 'svc_broadband' ) { + if ( $svcdb =~ /^svc_(acct|broadband|hardware)$/ ) { $report_svc{"Advanced $lcsname reports"} = [ $fsurl."search/report_$svcdb.html", '' ]; } if ( $svcdb eq 'svc_phone' ) { + $report_svc{"Phone number (DID) availability"} = [ $fsurl."search/report_phone_avail.html", '' ]; $report_svc{"Inventory/Provisioning Status"} = [ $fsurl."search/phone_inventory_provisioned.html", '' ]; + + } elsif ( $svcdb eq 'svc_dsl' ) { + + $report_svc{'Qualifications'} = [ $fsurl. 'search/qual.cgi', #XXX qual.html + '', + ]; + } $report_services{$name} = [ \%report_svc, $longname ]; @@ -380,6 +388,8 @@ $tools_menu{'Process payment batches'} = [ $fsurl.'search/pay_batch.cgi?magic=_d && $curuser->access_right('Process batches'); $tools_menu{'Download invoice batches'} = [ $fsurl.'search/bill_batch.cgi' ] if $conf->exists('invoice_print_pdf'); +$tools_menu{'Bulk DID Orders'} = [ $fsurl.'browse/did_order.html', 'View/manage bulk DID orders' ] + if $curuser->access_right('Import'); $tools_menu{'Job Queue'} = [ $fsurl.'search/queue.html', 'View pending job queue' ] if $curuser->access_right('Job queue'); $tools_menu{'Ticketing'} = [ \%tools_ticketing, 'Ticketing tools' ] @@ -496,6 +506,11 @@ tie my %config_broadband, 'Tie::IxHash', tie my %config_phone, 'Tie::IxHash', 'View/Edit phone device types' => [ $fsurl.'browse/part_device.html', 'Phone device types' ], + 'View/Edit bulk DID vendors' => [ $fsurl.'browse/did_vendor.html', 'Bulk DID vendors' ], +; + +tie my %config_nms, 'Tie::IxHash', + 'View/Edit virtual ports' => [ $fsurl.'browse/torrus_srvderive.html', '' ], ; tie my %config_misc, 'Tie::IxHash'; @@ -517,6 +532,9 @@ $config_misc{'Inventory classes and inventory'} = [ $fsurl.'browse/inventory_cla || $curuser->access_right('Edit global inventory') || $curuser->access_right('Configuration'); +$config_misc{'Hardware types'} = [ $fsurl.'browse/hardware_class.html', 'Set up hardware type catalog' ] + if $curuser->access_right('Configuration'); + tie my %config_menu, 'Tie::IxHash'; if ( $curuser->access_right('Configuration' ) ) { %config_menu = ( @@ -542,11 +560,14 @@ $config_menu{'Ticketing'} = [ \%config_ticketing, '' ] if $conf->config('ticket_system') && FS::TicketSystem->access_right(\%session, 'ShowConfigTab'); $config_menu{'Dialup'} = [ \%config_dialup, '' ] - if ( $curuser->access_right('Dialup configuration') ); + if $curuser->access_right('Dialup configuration'); $config_menu{'Broadband'} = [ \%config_broadband, '' ] - if ( $curuser->access_right('Broadband configuration') ); + if $curuser->access_right('Broadband configuration'); $config_menu{'Phone'} = [ \%config_phone, '' ] - if ( $curuser->access_right('Configuration') ); + if $curuser->access_right('Configuration'); +$config_menu{'Network Monitoring'} = [ \%config_nms, '' ] + if $curuser->access_right('Configuration') + && $conf->config('network_monitoring_system') eq 'Torrus_Internal'; $config_menu{'Miscellaneous'} = [ \%config_misc, '' ] if $curuser->access_right('Configuration' ) || $curuser->access_right('Edit advertising sources')