FS/FS/part_pkg/torrus_bw_usage.pm

   1 package FS::part_pkg::torrus_bw_usage;
   2
   3 use strict;
   4 use base qw( FS::part_pkg::torrus_Common );
   5 use List::Util qw(max);
   6
   7 our %info = (
   8   'name'      => 'Volume billing based on the integrated Torrus NMS',
   9   'shortname' => 'Bandwidth (volume)',
  10   'weight'    => 54.7, #:/
  11   'inherit_fields' => [ 'flat', 'global_Mixin' ],
  12   'fields' => {
  13     'recur_temporality' => { 'disabled' => 1 },
  14     'sync_bill_date'    => { 'disabled' => 1 },
  15     'cutoff_day'        => { 'disabled' => 1 },
  16     'base_gb'           => { 'name'    => 'Included gigabytes',
  17                              'default' => 0,
  18                            },
  19     'gb_rate'           => { 'name'    => 'Charge per gigabyte',
  20                              'default' => 0,
  21                            },
  22   },
  23   'fieldorder' => [ qw( base_gb gb_rate ) ],
  24   'freq' => 'm',
  25 );
  26
  27 sub _torrus_name  { 'VOLUME'; }
  28 sub _torrus_base  { 'base_gb'; }
  29 sub _torrus_rate  { 'gb_rate'; }
  30 sub _torrus_label { 'gb'; };
  31
  32 1;