X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=40e9a4678b79f37611916d7ce2aacce65edffd92;hb=ba0afcb2c51e2aaa5b0c7d52c7e04e13c965c15b;hp=09d49873da26c0fffe8854451b6ef69ae70173aa;hpb=2aeeab8d86e0d828d89949981b220a01036e0a5e;p=freeside.git diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index 09d49873d..40e9a4678 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -109,6 +109,7 @@ tie my %rights, 'Tie::IxHash', 'Edit customer', 'Edit customer tags', 'Edit referring customer', + 'Edit customer invoice terms', 'View customer history', 'Suspend customer', 'Unsuspend customer', @@ -155,6 +156,8 @@ tie my %rights, 'Tie::IxHash', 'View package definition costs', #NEWNEW 'Change package start date', 'Change package contract end date', + 'Unmask customer DL', + 'Unmask customer SSN', ], ### @@ -236,7 +239,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', + 'Add on-the-fly void reason', 'Add on-the-fly refund reason', #NEW ], @@ -290,6 +293,7 @@ tie my %rights, 'Tie::IxHash', { rightname=> 'List rating data', desc=>'Usage reports', global=>1 }, 'Billing event reports', 'Receivables report', + 'Basic payment and refund reports', 'Financial reports', { rightname=>'Send reports to customers', global=>1 }, { rightname=> 'List inventory', global=>1 }, @@ -348,6 +352,7 @@ tie my %rights, 'Tie::IxHash', { rightname=>'Import', global=>1 }, #some of these are ag-virt'ed now? give em their own ACLs { rightname=>'Export', global=>1 }, { rightname=> 'Edit rating data', desc=>'Delete CDRs', global=>1 }, + { rightname=>'Delete fees', }, #], # ### @@ -361,6 +366,10 @@ tie my %rights, 'Tie::IxHash', { rightname=>'Employee preference telephony integration' }, #] + #'RT preference rights' => [ + { rightname=>'RT activity notification' }, + #] + ], ### @@ -462,6 +471,8 @@ sub default_superuser_rights { 'Void invoices',#people are overusing this when credits are more appropriate 'Backdate credit', 'View legacy typeset statments', + 'Detach customer package', + 'Delete fees', ); no warnings 'uninitialized'; @@ -503,4 +514,3 @@ L, L, L =cut 1; -