summaryrefslogtreecommitdiff
path: root/FS/FS/cust_refund.pm
diff options
context:
space:
mode:
authorivan <ivan>2004-07-06 14:22:56 +0000
committerivan <ivan>2004-07-06 14:22:56 +0000
commitc0c6e34a0818945d86165b47adcddfea91f3f7e4 (patch)
tree57b3e0078a545e027bae1715a969527b59c76869 /FS/FS/cust_refund.pm
parentcfe85e45bcba97089988b4dc22a895aec687f2c3 (diff)
document and check refund reasons
Diffstat (limited to 'FS/FS/cust_refund.pm')
-rw-r--r--FS/FS/cust_refund.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/FS/FS/cust_refund.pm b/FS/FS/cust_refund.pm
index b9f48db..106ccd3 100644
--- a/FS/FS/cust_refund.pm
+++ b/FS/FS/cust_refund.pm
@@ -45,6 +45,8 @@ inherits from FS::Record. The following fields are currently supported:
=item refund - Amount of the refund
+=item reason - Reason for the refund
+
=item _date - specified as a UNIX timestamp; see L<perlfunc/"time">. Also see
L<Time::Local> and L<Date::Parse> for conversion functions.
@@ -194,6 +196,7 @@ sub check {
$self->ut_numbern('refundnum')
|| $self->ut_numbern('custnum')
|| $self->ut_money('refund')
+ || $self->ut_text('reason')
|| $self->ut_numbern('_date')
|| $self->ut_textn('paybatch')
|| $self->ut_enum('closed', [ '', 'Y' ])