X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fagent.pm;h=62cf185ed087fde55b4cdc0b9ad96cd7957910cc;hb=6959e1e35908df64676d9626711e70b66715575d;hp=69ecf77ca5925f2b48fc49a154a2a7cfa917582b;hpb=86119e342d95f16b799043e9cf66230d015c37de;p=freeside.git diff --git a/FS/FS/part_pkg/agent.pm b/FS/FS/part_pkg/agent.pm index 69ecf77ca..62cf185ed 100644 --- a/FS/FS/part_pkg/agent.pm +++ b/FS/FS/part_pkg/agent.pm @@ -19,16 +19,8 @@ $me = '[FS::part_pkg::agent]'; %info = ( 'name' => 'Wholesale bulk billing, for master customers of an agent.', 'shortname' => 'Wholesale bulk billing for agent.', - + 'inherit_fields' => [qw( prorate global_Mixin)], 'fields' => { - 'setup_fee' => { 'name' => 'Setup fee for this package', - 'default' => 0, - }, - 'recur_fee' => { 'name' => 'Base recurring fee for this package', - 'default' => 0, - }, - - #'recur_method' => { 'name' => 'Recurring fee method', # #'type' => 'radio', # #'options' => \%recur_method, @@ -49,10 +41,9 @@ $me = '[FS::part_pkg::agent]'; }, - #'fieldorder' => [qw( setup_fee recur_fee recur_method cutoff_day ) ], - 'fieldorder' => [qw( setup_fee recur_fee cutoff_day add_full_period no_pkg_prorate ) ], + 'fieldorder' => [qw( cutoff_day add_full_period no_pkg_prorate ) ], - 'weight' => 51, + 'weight' => 52, ); @@ -68,6 +59,7 @@ sub calc_recur { my $conf = new FS::Conf; my $money_char = $conf->config('money_char') || '$'; + my $date_format = $conf->config('date_format') || '%m/%d/%Y'; my $total_agent_charge = 0; @@ -114,11 +106,15 @@ sub calc_recur { if $DEBUG; my $pkg_details = $cust_main->name_short. ': '; #name? + + my $part_pkg = $cust_pkg->part_pkg; + # + something to identify package... primary service probably + # no... package def for now + $pkg_details .= $part_pkg->pkg. ': '; my $pkg_charge = 0; - my $part_pkg = $cust_pkg->part_pkg; #option to not fallback? via options above my $pkg_setup_fee = $part_pkg->setup_cost || $part_pkg->option('setup_fee'); @@ -145,8 +141,8 @@ sub calc_recur { my $recur_charge += $pkg_recur_charge; $pkg_details .= $money_char. sprintf('%.2f', $recur_charge ). - ' ('. time2str('%x', $pkg_start). - ' - '. time2str('%x', $pkg_end ). ')' + ' ('. time2str($date_format, $pkg_start). + ' - '. time2str($date_format, $pkg_end ). ')' if $recur_charge; $pkg_charge += $recur_charge;