projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
41ed76e
)
fix otaker population for cust_refund like cust_credit and cust_pay
author
ivan
<ivan>
Tue, 4 Mar 2008 21:07:14 +0000
(21:07 +0000)
committer
ivan
<ivan>
Tue, 4 Mar 2008 21:07:14 +0000
(21:07 +0000)
FS/FS/cust_refund.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_refund.pm
b/FS/FS/cust_refund.pm
index
53c6bac
..
4981795
100644
(file)
--- a/
FS/FS/cust_refund.pm
+++ b/
FS/FS/cust_refund.pm
@@
-235,10
+235,13
@@
returns the error, otherwise returns false. Called by the insert method.
sub check {
my $self = shift;
sub check {
my $self = shift;
+ $self->otaker(getotaker) unless ($self->otaker);
+
my $error =
$self->ut_numbern('refundnum')
|| $self->ut_numbern('custnum')
|| $self->ut_money('refund')
my $error =
$self->ut_numbern('refundnum')
|| $self->ut_numbern('custnum')
|| $self->ut_money('refund')
+ || $self->ut_alpha('otaker')
|| $self->ut_text('reason')
|| $self->ut_numbern('_date')
|| $self->ut_textn('paybatch')
|| $self->ut_text('reason')
|| $self->ut_numbern('_date')
|| $self->ut_textn('paybatch')
@@
-257,8
+260,6
@@
sub check {
$error = $self->payinfo_check;
return $error if $error;
$error = $self->payinfo_check;
return $error if $error;
- $self->otaker(getotaker);
-
$self->SUPER::check;
}
$self->SUPER::check;
}