torrus, RT#10574

1 files changed, 32 insertions, 0 deletions

diff --git a/FS/FS/part_pkg/torrus_bw_percentile.pm b/FS/FS/part_pkg/torrus_bw_percentile.pm
new file mode 100644
index 0000000..7cf254a
--- /dev/null
+++ b/FS/FS/part_pkg/torrus_bw_percentile.pm
@@ -0,0 +1,32 @@
+package FS::part_pkg::torrus_bw_percentile;
+
+use strict;
+use base qw( FS::part_pkg::torrus_Common );
+use List::Util qw(max);
+
+our %info = (
+  'name'      => '95th percentile billing based on the integrated Torrus NMS',
+  'shortname' => 'Bandwidth (95th percentile)',
+  'weight'    => 54.5, #:/
+  'inherit_fields' => [ 'flat', 'global_Mixin' ],
+  'fields' => {
+    #'recur_temporality' => { 'hidden' => 1, 'value' => 'preceding' }, #XXX do
+    'recur_temporality' => { 'disabled' => 1 },
+    'sync_bill_date'    => { 'disabled' => 1 },
+    'cutoff_day'        => { 'disabled' => 1 },
+    'base_mbps'         => { 'name'    => 'Included megabytes/sec (95th percentile)',
+                             'default' => 0,
+                           },
+    'mbps_rate'         => { 'name'    => 'Charge per megabyte/sec (95th percentile)',
+                             'default' => 0,
+                           },
+  },
+  'fieldorder' => [ qw( base_mbps mbps_rate ) ],
+  'freq' => 'm',
+);
+
+sub _torrus_name { '95TH_PERCENTILE'; }
+sub _torrus_base { 'base_mbps'; }
+sub _torrus_rate { 'mbps_rate'; }
+
+1;