X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=9274ad858852d172232579c19a584af2b7cb2991;hb=4e63920a6b29e4e0b2321f80427211816d697612;hp=ca96eb52fd721355919a27fbe91e82429c820335;hpb=ecc15d03711690d2b2aeeda2bd8ff1119956c583;p=freeside.git diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index ca96eb52f..9274ad858 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -53,7 +53,6 @@ assigned to users and/or groups. # 'billing' => [ # '_desc' => 'Access to billing configuration', # 'payment_gateway' => {}, -# 'part_bill_event' => {}, # 'prepay_credit' => {}, # 'rate' => {}, # 'cust_main_county' => {}, @@ -93,12 +92,11 @@ tie my %rights, 'Tie::IxHash', 'New prospect', 'View prospect', 'Edit prospect', - 'List prospects', 'Edit contact', #! #'New contact', #'View customer contacts', - #'List contacts', 'Generate quotation', + 'Disable quotation', ], ### @@ -151,6 +149,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 ], ### @@ -183,7 +184,6 @@ tie my %rights, 'Tie::IxHash', 'Resend invoices', #NEWNEW 'Void invoices', 'Unvoid invoices', - 'Delete invoices', 'View customer tax exemptions', #yow 'Edit customer tax exemptions', #NEWNEW 'Add customer tax adjustment', #new, but no need to phase in @@ -191,6 +191,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 ], ### @@ -216,8 +217,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', @@ -230,13 +234,15 @@ 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 refund reason', #NEW ], ### # customer voiding rights.. ### 'Customer payment void rights' => [ - { rightname=>'Credit card void', desc=>'Enable local-only voiding of echeck payments in addition to refunds against the payment gateway.' }, #aka. cc-void + { rightname=>'Credit card void', desc=>'Enable local-only voiding of credit card payments in addition to refunds against the payment gateway.' }, #aka. cc-void { rightname=>'Echeck void', desc=>'Enable local-only voiding of echeck payments in addition to refunds against the payment gateway.' }, #aka. echeck-void 'Void payments', { rightname=>'Unvoid payments', desc=>'Enable unvoiding of voided payments' }, #aka. unvoid @@ -265,6 +271,8 @@ tie my %rights, 'Tie::IxHash', # report/listing rights... ### 'Reporting/listing rights' => [ + 'List prospects', + 'List contacts', 'List customers', 'List all customers', 'Advanced customer search', @@ -295,6 +303,7 @@ tie my %rights, 'Tie::IxHash', 'Services: Wireless broadband services: Advanced search', 'Services: DSLs', 'Services: Cable subscribers', + 'Services: Conferencing', 'Services: Dish services', 'Services: Hardware', 'Services: Hardware: Advanced search', @@ -304,12 +313,14 @@ tie my %rights, 'Tie::IxHash', 'Services: Ports', 'Services: Mailing lists', 'Services: Alarm services', + 'Services: Video', + 'Services: Circuits', 'Services: External services', 'Usage: RADIUS sessions', '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 }, @@ -337,6 +348,12 @@ tie my %rights, 'Tie::IxHash', ### #'Database access rights' => [ { rightname=>'Raw SQL', global=>1 }, #NEW + #] + + #'Employee preference rights' => [ + { rightname=>'Employee preference telephony integration' }, + #] + ], ### @@ -350,9 +367,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 }, @@ -369,12 +396,17 @@ tie my %rights, 'Tie::IxHash', { rightname=>'Broadband configuration' }, { rightname=>'Broadband global configuration', global=>1 }, - + + { rightname=>'Alarm configuration' }, + { rightname=>'Alarm global configuration', global=>1 }, + { rightname=> 'Configure network monitoring', global=>1 }, #{ 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 @@ -408,7 +440,6 @@ Most (but not all) right names. sub default_superuser_rights { my $class = shift; my %omit = map { $_=>1 } ( - 'Delete invoices', 'Delete payment', 'Delete credit', #? 'Delete refund', #? @@ -423,7 +454,9 @@ 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 + 'Backdate credit', + 'View legacy typeset statments', ); no warnings 'uninitialized';