projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
credit sources, RT#28917
[freeside.git]
/
FS
/
FS
/
AccessRight.pm
diff --git
a/FS/FS/AccessRight.pm
b/FS/FS/AccessRight.pm
index
4b165eb
..
121f83c
100644
(file)
--- a/
FS/FS/AccessRight.pm
+++ b/
FS/FS/AccessRight.pm
@@
-93,12
+93,11
@@
tie my %rights, 'Tie::IxHash',
'New prospect',
'View prospect',
'Edit prospect',
'New prospect',
'View prospect',
'Edit prospect',
- 'List prospects',
'Edit contact', #!
#'New contact',
#'View customer contacts',
'Edit contact', #!
#'New contact',
#'View customer contacts',
- #'List contacts',
'Generate quotation',
'Generate quotation',
+ 'Disable quotation',
],
###
],
###
@@
-151,6
+150,9
@@
tie my %rights, 'Tie::IxHash',
'Edit customer package comments', #NEW
'Qualify service', #NEW
'Waive setup fee', #NEW
'Edit customer package comments', #NEW
'Qualify service', #NEW
'Waive setup fee', #NEW
+ 'View appointments', #NEWNEW
+ 'Make appointment',
+ 'View package definition costs', #NEWNEW
],
###
],
###
@@
-216,6
+218,7
@@
tie my %rights, 'Tie::IxHash',
###
'Customer credit and refund rights' => [
'Post credit',
###
'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
{ rightname=>'Unapply credit', desc=>'Enable "unapplication" of unclosed credits.' }, #aka unapplycredits
'Credit line items', #NEWNEWNEW
'Apply credit', #NEWNEW
{ rightname=>'Unapply credit', desc=>'Enable "unapplication" of unclosed credits.' }, #aka unapplycredits
@@
-230,6
+233,7
@@
tie my %rights, 'Tie::IxHash',
'Refund Echeck payment',
'Delete refund', #NEW
'Add on-the-fly credit reason', #NEW
'Refund Echeck payment',
'Delete refund', #NEW
'Add on-the-fly credit reason', #NEW
+ 'Add on-the-fly refund reason', #NEW
],
###
],
###
@@
-265,6
+269,8
@@
tie my %rights, 'Tie::IxHash',
# report/listing rights...
###
'Reporting/listing rights' => [
# report/listing rights...
###
'Reporting/listing rights' => [
+ 'List prospects',
+ 'List contacts',
'List customers',
'List all customers',
'Advanced customer search',
'List customers',
'List all customers',
'Advanced customer search',
@@
-306,6
+312,7
@@
tie my %rights, 'Tie::IxHash',
'Services: Mailing lists',
'Services: Alarm services',
'Services: Video',
'Services: Mailing lists',
'Services: Alarm services',
'Services: Video',
+ 'Services: Circuits',
'Services: External services',
'Usage: RADIUS sessions',
'Usage: Call Detail Records (CDRs)',
'Services: External services',
'Usage: RADIUS sessions',
'Usage: Call Detail Records (CDRs)',
@@
-356,6
+363,12
@@
tie my %rights, 'Tie::IxHash',
'Bulk edit package definitions',
'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 fee definitions',
{ rightname=>'Edit global fee definitions', global=>1 },
@@
-432,7
+445,8
@@
sub default_superuser_rights {
'Edit usage',
'Credit card void',
'Echeck void',
'Edit usage',
'Credit card void',
'Echeck void',
- 'Edit customer package dates',
+ 'Void invoices',#people are overusing this when credits are more appropriate
+ 'Backdate credit',
);
no warnings 'uninitialized';
);
no warnings 'uninitialized';