X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=1bfae03ad0203e8cfbf4e4dc99ae355534dc9719;hp=aa59e7dbd622f8246801f59f38d09f37711afe92;hb=395cc72629d31c8dcd138acf423e66d2d73d89d2;hpb=b5c4237a34aef94976bc343c8d9e138664fc3984 diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index aa59e7dbd..1bfae03ad 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -144,6 +144,7 @@ tie my %rights, 'Tie::IxHash', 'Edit customer package invoice details', #NEW 'Edit customer package comments', #NEW 'Qualify service', #NEW + 'Waive setup fee', #NEW ], ### @@ -185,6 +186,7 @@ tie my %rights, 'Tie::IxHash', # customer payment rights ### 'Customer payment rights' => [ + 'View payments', { rightname=>'Post payment', desc=>'Make check or cash payments.' }, 'Post check payment', 'Post cash payment', @@ -205,6 +207,7 @@ tie my %rights, 'Tie::IxHash', 'Apply credit', #NEWNEW { 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', { rightname=>'Post refund', desc=>'Enable posting of check and cash refunds.' }, 'Post check refund', 'Post cash refund', @@ -261,6 +264,7 @@ tie my %rights, 'Tie::IxHash', 'Receivables report', 'Financial reports', { rightname=> 'List inventory', global=>1 }, + { rightname=>'View email logs', global=>1 }, #{ rightname => 'List customers of all agents', global=>1 }, ], @@ -271,9 +275,12 @@ tie my %rights, 'Tie::IxHash', 'Miscellaneous rights' => [ { rightname=>'Job queue', global=>1 }, { rightname=>'Time queue', global=>1 }, - { rightname=>'Process batches', global=>1 }, - { rightname=>'Reprocess batches', global=>1 }, - { rightname=>'Redownload resolved batches', global=>1 }, + { rightname=>'Process batches', }, #Process payment batches + { rightname=>'Process global batches', global=>1 }, #Process global payment batches + { rightname=>'Reprocess batches', global=>1 }, #Reprocess payment batches + { rightname=>'Redownload resolved batches', global=>1 }, #Redownload resolved payment batches + { rightname=>'Process invoice batches', }, + { rightname=>'Process global invoice batches', global=>1 }, { 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 }, @@ -310,6 +317,8 @@ tie my %rights, 'Tie::IxHash', { rightname=>'Broadband configuration' }, { rightname=>'Broadband global configuration', global=>1 }, + + { rightname=> 'Configure network monitoring', global=>1 }, #{ rightname=>'Edit employees', global=>1, }, #{ rightname=>'Edit employee groupss', global=>1, }, @@ -359,6 +368,8 @@ sub default_superuser_rights { 'View customers of all agents', 'View/link unlinked services', 'Edit usage', + 'Credit card void', + 'Echeck void', ); no warnings 'uninitialized';