X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=8879500d79d1cfb0a2b49a7bc72f2c8b2adf0115;hb=be4379d3f8238376f913337b6402dd8b6167913a;hp=6d3937e2f4a17d81be714f43212b628d33281bed;hpb=8c2c7b4dc761ce015972444fb9fb8df7e7a9a5a4;p=freeside.git diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index 6d3937e2f..8879500d7 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -97,6 +97,7 @@ tie my %rights, 'Tie::IxHash', #'New contact', #'View customer contacts', 'Generate quotation', + 'Disable quotation', ], ### @@ -183,6 +184,7 @@ tie my %rights, 'Tie::IxHash', 'Customer invoice / financial info rights' => [ 'View invoices', 'Resend invoices', #NEWNEW + { rightname=>'Print and mail invoices', desc=>"Print and mail via Freeside's web service", }, ##NEWER than NEWNEWNEW 'Void invoices', 'Unvoid invoices', 'Delete invoices', @@ -193,6 +195,7 @@ tie my %rights, 'Tie::IxHash', 'View customer pending payments', #NEW 'Edit customer pending payments', #NEW 'View customer billing events', #NEW + 'View legacy typeset statements', #new, but no need to phase in ], ### @@ -218,8 +221,11 @@ tie my %rights, 'Tie::IxHash', ### 'Customer credit and refund rights' => [ 'Post credit', + { rightname=>'Backdate credit', desc=>'Enable credits to be posted for days other than today.' }, 'Credit line items', #NEWNEWNEW 'Apply credit', #NEWNEW + 'Void credit', #NEWER than things marked NEWNEWNEW + 'Unvoid credit', #NEWER than things marked NEWNEWNEW { rightname=>'Unapply credit', desc=>'Enable "unapplication" of unclosed credits.' }, #aka unapplycredits { rightname=>'Delete credit', desc=>'Enable deletion of unclosed credits. Be very careful! Only delete credits that were data-entry errors, not adjustments.' }, #aka. deletecredits Optionally specify one or more comma-separated email addresses to be notified when a credit is deleted. 'View refunds', @@ -232,6 +238,7 @@ tie my %rights, 'Tie::IxHash', 'Refund Echeck payment', 'Delete refund', #NEW 'Add on-the-fly credit reason', #NEW + 'Add on-the-fly void credit reason', ], ### @@ -284,6 +291,7 @@ tie my %rights, 'Tie::IxHash', 'Billing event reports', 'Receivables report', 'Financial reports', + { rightname=>'Send reports to customers', global=>1 }, { rightname=> 'List inventory', global=>1 }, { rightname=>'View email logs', global=>1 }, { rightname=>'View system logs' }, @@ -309,6 +317,9 @@ tie my %rights, 'Tie::IxHash', 'Services: Mailing lists', 'Services: Alarm services', 'Services: External services', + 'Services: Circuits', + 'Services: Fiber', + 'Services: Fiber: Advanced search', 'Usage: RADIUS sessions', 'Usage: Call Detail Records (CDRs)', 'Usage: Unrateable CDRs', @@ -341,6 +352,12 @@ tie my %rights, 'Tie::IxHash', ### #'Database access rights' => [ { rightname=>'Raw SQL', global=>1 }, #NEW + #] + + #'Employee preference rights' => [ + { rightname=>'Employee preference telephony integration' }, + #] + ], ### @@ -392,6 +409,8 @@ tie my %rights, 'Tie::IxHash', #{ rightname=>'Edit employees', global=>1, }, #{ rightname=>'Edit employee groupss', global=>1, }, + { rightname=>'Edit custom fields', global=>1 }, + { rightname=>'Configuration', global=>1 }, #most of the rest of the configuraiton is not agent-virtualized { rightname=>'Configuration download', }, #description of how it affects @@ -442,6 +461,8 @@ sub default_superuser_rights { 'Credit card void', 'Echeck void', 'Void invoices',#people are overusing this when credits are more appropriate + 'Backdate credit', + 'View legacy typeset statments', ); no warnings 'uninitialized';