X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=4e5703203b935df0e24222186433734d19eee549;hb=7516e3da0f17eeecba27219ef96a8b5f46af2083;hp=207a308f5c8ebbed46b85976043e81647d41c90a;hpb=0ce4ba640f3c216a37d78296a0e9d4dd262df2d9;p=freeside.git diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index 207a308f5..4e5703203 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -151,6 +151,9 @@ tie my %rights, 'Tie::IxHash', 'Edit customer package comments', #NEW 'Qualify service', #NEW 'Waive setup fee', #NEW + 'View appointments', #NEWNEW + 'Make appointment', + 'View package definition costs', #NEWNEW ], ### @@ -230,6 +233,7 @@ tie my %rights, 'Tie::IxHash', 'Refund Echeck payment', 'Delete refund', #NEW 'Add on-the-fly credit reason', #NEW + 'Add on-the-fly refund reason', #NEW ], ### @@ -311,7 +315,7 @@ tie my %rights, 'Tie::IxHash', 'Usage: Call Detail Records (CDRs)', 'Usage: Unrateable CDRs', 'Usage: Time worked', - { rightname=>'Employees: Commission Report', global=>1 }, + #gone in 4.x as a distinct ACL (for now?) { rightname=>'Employees: Commission Report', global=>1 }, { rightname=>'Employees: Audit Report', global=>1 }, #{ rightname => 'List customers of all agents', global=>1 }, @@ -352,9 +356,19 @@ tie my %rights, 'Tie::IxHash', 'Edit package definitions', { rightname=>'Edit global package definitions', global=>1 }, - + 'Edit package definition costs', + 'Bulk edit package definitions', + 'Edit FCC report configuration', + { rightname => 'Edit FCC report configuration for all agents', global=>1 }, + + 'Edit CDR rates', + #{ rightname=>'Edit global CDR rates', global=>1, }, + + 'Edit fee definitions', + { rightname=>'Edit global fee definitions', global=>1 }, + 'Edit billing events', { rightname=>'Edit global billing events', global=>1 }, @@ -428,7 +442,7 @@ sub default_superuser_rights { 'Edit usage', 'Credit card void', 'Echeck void', - 'Edit customer package dates', + 'Void invoices',#people are overusing this when credits are more appropriate ); no warnings 'uninitialized';