#use FS::Record qw(qsearch qsearchs);
use FS::part_pkg;
-@ISA = qw(FS::part_pkg);
+@ISA = qw(FS::part_pkg::flat);
%info = (
'name' => 'First partial month full charge, then flat-rate (1st of month billing)',
'weight' => 30,
);
-sub calc_setup {
- my($self, $cust_pkg ) = @_;
- $self->option('setup_fee');
-}
-
sub calc_recur {
my($self, $cust_pkg, $sdate ) = @_;