summaryrefslogtreecommitdiff
path: root/FS/FS/part_pkg/prepaid.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/part_pkg/prepaid.pm')
-rw-r--r--FS/FS/part_pkg/prepaid.pm16
1 files changed, 15 insertions, 1 deletions
diff --git a/FS/FS/part_pkg/prepaid.pm b/FS/FS/part_pkg/prepaid.pm
index 4499d0e..cff165a 100644
--- a/FS/FS/part_pkg/prepaid.pm
+++ b/FS/FS/part_pkg/prepaid.pm
@@ -12,6 +12,11 @@ tie %recur_action, 'Tie::IxHash',
'cancel' => 'cancel',
;
+tie my %overlimit_action, 'Tie::IxHash',
+ 'overlimit' => 'Default overlimit processing',
+ 'cancel' => 'Cancel',
+;
+
%info = (
'name' => 'Prepaid, flat rate',
#'name' => 'Prepaid (no automatic recurring)', #maybe use it here too
@@ -27,8 +32,17 @@ tie %recur_action, 'Tie::IxHash',
'type' => 'select',
'select_options' => \%recur_action,
},
+ %FS::part_pkg::flat::usage_fields,
+ 'overlimit_action' => { 'name' => 'Action to take upon reaching a usage limit.',
+ 'type' => 'select',
+ 'select_options' => \%overlimit_action,
+ },
+ #XXX if you set overlimit_action to 'cancel', should also have the ability
+ # to select a reason
},
- 'fieldorder' => [ 'setup_fee', 'recur_fee', 'recur_action', ],
+ 'fieldorder' => [ qw( setup_fee recur_fee recur_action ),
+ @FS::part_pkg::flat::usage_fieldorder, 'overlimit_action',
+ ],
'weight' => 25,
);