{ rightname=>'Process payment', desc=>'Process credit card or e-check payments' },
'Process credit card payment',
'Process Echeck payment',
- { rightname=>'Delete payment', desc=>'Enable deletion of unclosed payments. Be very careful! Only delete payments that were data-entry errors, not adjustments.' }, #aka. deletepayments Optionally specify one or more comma-separated email addresses to be notified when a payment is deleted.
],
###
'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',
{ rightname=>'Post refund', desc=>'Enable posting of check and cash refunds.' },
'Post check refund',
sub default_superuser_rights {
my $class = shift;
my %omit = map { $_=>1 } (
- 'Delete invoices',
- 'Delete payment',
- 'Delete credit', #?
'Delete refund', #?
'Edit customer package dates',
'Time queue',
'Apply payment', 'Refund credit card payment', 'Refund Echeck payment',
'Post refund', 'Post check refund', 'Post cash refund ', 'Refund payment',
'Credit card void', 'Echeck void', 'Void payments', 'Unvoid payments',
+<<<<<<< HEAD
'Delete payment', 'Unapply payment',
'Apply credit', 'Delete credit', 'Unapply credit', 'Void credit', 'Unvoid credit',
+=======
+ 'Unapply payment',
+ 'Apply credit', 'Unapply credit', 'Void credit', 'Unvoid credit',
+>>>>>>> 727d620... remove payment deletion, RT#37908
'Delete refund',
'Billing event reports', 'View customer billing events',
)
<% $payment. ' '. $info. $desc.
- $view. $change_pkg. $apply. $refund. $void. $delete. $unapply
+ $view. $change_pkg. $apply. $refund. $void. $unapply
%>
<%init>
|| ( $cust_pay->payby !~ /^(CARD|CHEK)$/ && $opt{'Void payments'} )
);
-my $delete = '';
-$delete = areyousure_link("${p}misc/delete-cust_pay.cgi?".$cust_pay->paynum,
- emt('Are you sure you want to delete this payment?'),
- emt('Delete this payment from the database completely - not recommended'),
- emt('delete')
- )
- if $cust_pay->closed !~ /^Y/i
- && $opt{'deletepayments'}
- && $opt{'Delete payment'};
-
my $unapply = '';
$unapply = areyousure_link("${p}misc/unapply-cust_pay.cgi?".$cust_pay->paynum,
emt('Are you sure you want to unapply this payment?'),