projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
price plans web gui 1st pass, oh my
[freeside.git]
/
FS
/
FS
/
part_pkg.pm
diff --git
a/FS/FS/part_pkg.pm
b/FS/FS/part_pkg.pm
index
d262a04
..
d84b9c5
100644
(file)
--- a/
FS/FS/part_pkg.pm
+++ b/
FS/FS/part_pkg.pm
@@
-46,11
+46,15
@@
inherits from FS::Record. The following fields are currently supported:
=item comment - Text name of this billing item definition (non-customer-viewable)
=item comment - Text name of this billing item definition (non-customer-viewable)
-=item setup - Setup fee
+=item setup - Setup fee
expression
=item freq - Frequency of recurring fee
=item freq - Frequency of recurring fee
-=item recur - Recurring fee
+=item recur - Recurring fee expression
+
+=item plan - Price plan
+
+=item plandata - Price plan data
=back
=back
@@
-128,6
+132,8
@@
sub check {
|| $self->ut_anything('setup')
|| $self->ut_number('freq')
|| $self->ut_anything('recur')
|| $self->ut_anything('setup')
|| $self->ut_number('freq')
|| $self->ut_anything('recur')
+ || $self->ut_alphan('plan')
+ || $self->ut_anything('plandata')
;
}
;
}
@@
-166,7
+172,7
@@
sub svcpart {
=head1 VERSION
=head1 VERSION
-$Id: part_pkg.pm,v 1.
2 1999-08-20 08:27:06
ivan Exp $
+$Id: part_pkg.pm,v 1.
3 2001-10-15 10:42:28
ivan Exp $
=head1 BUGS
=head1 BUGS