X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Frt_time.pm;h=11b7ee85c540f987b9b25e411b2c2f534d7d1e48;hb=856db1a116ffe0e2d79d572c14abcac488e128bd;hp=d179e750b73d1c1db8a2f3fa7c71a89592aafc42;hpb=250ac5b142e70f394cb9796b16264622c380e0c8;p=freeside.git diff --git a/FS/FS/part_pkg/rt_time.pm b/FS/FS/part_pkg/rt_time.pm index d179e750b..11b7ee85c 100644 --- a/FS/FS/part_pkg/rt_time.pm +++ b/FS/FS/part_pkg/rt_time.pm @@ -13,13 +13,25 @@ our $DEBUG = 0; our %info = ( 'name' => 'Bill from Time Worked on tickets in RT', 'shortname' => 'Project Billing (RT)', + 'weight' => 55, + 'inherit_fields' => [ 'global_Mixin' ], 'fields' => { 'base_rate' => { 'name' => 'Rate (per minute)', 'default' => 0, }, - } + 'recur_fee' => {'disabled' => 1}, + }, + 'fieldorder' => [ 'base_rate' ], ); +sub price_info { + my $self = shift; + my $str = $self->SUPER::price_info; + my $rate = $self->option('base_rate'); + $str .= " plus $rate/min" if $rate; + $str; +} + sub calc_setup { my($self, $cust_pkg ) = @_; $self->option('setup_fee'); @@ -38,12 +50,15 @@ sub calc_recur { } -sub calc_cancel { - my $self = shift; - my($cust_pkg, $sdate, $details, $param ) = @_; +sub can_discount { 0; } - $self->calc_usage(@_); -} +# use the default +#sub calc_cancel { +# my $self = shift; +# my($cust_pkg, $sdate, $details, $param ) = @_; +# +# $self->calc_usage(@_); +#} sub calc_usage { my $self = shift;