X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_pkg%2Fglobal_Mixin.pm;h=899e73abc4767e70b099196e6f6ccb9d33285091;hb=51b14ce43f6cbf9f389ed7eb97565d609b167364;hp=ec2eb4e2e46641a6a4a793b4d5971abbbcc4fe03;hpb=ca1cb63cc645a3f402048f589c67d76bedf4d597;p=freeside.git diff --git a/FS/FS/part_pkg/global_Mixin.pm b/FS/FS/part_pkg/global_Mixin.pm index ec2eb4e2e..899e73abc 100644 --- a/FS/FS/part_pkg/global_Mixin.pm +++ b/FS/FS/part_pkg/global_Mixin.pm @@ -3,6 +3,17 @@ package FS::part_pkg::global_Mixin; use strict; use vars qw(%info); +use Tie::IxHash; +tie my %a2billing_types, 'Tie::IxHash', ( + 0 => 'Prepaid', + 1 => 'Postpaid', +); + +tie my %a2billing_simultaccess, 'Tie::IxHash', ( + 0 => 'Disabled', + 1 => 'Enabled', +); + %info = ( 'disabled' => 1, 'fields' => { @@ -19,17 +30,52 @@ use vars qw(%info); 'cancellation', 'type' => 'checkbox', }, + 'unused_credit_suspend' => { + 'name' => 'Credit the customer for the unused portion of service when '. + 'suspending', + 'type' => 'checkbox', + }, 'unused_credit_change' => { 'name' => 'Credit the customer for the unused portion of service when '. 'changing packages', 'type' => 'checkbox', }, + + # miscellany--maybe put this in a separate module? + + 'a2billing_tariff' => { + 'name' => 'A2Billing tariff group ID', + 'display_if' => sub { + FS::part_export->count("exporttype = 'a2billing'") > 0; + } + }, + 'a2billing_type' => { + 'name' => 'A2Billing card type', + 'display_if' => sub { + FS::part_export->count("exporttype = 'a2billing'") > 0; + }, + 'type' => 'select', + 'select_options' => \%a2billing_types, + }, + 'a2billing_simultaccess' => { + 'name' => 'A2Billing Simultaneous Access', + 'display_if' => sub { + FS::part_export->count("exporttype = 'a2billing'") > 0; + }, + 'type' => 'select', + 'select_options' => \%a2billing_simultaccess, + }, }, 'fieldorder' => [ qw( setup_fee recur_fee unused_credit_cancel + unused_credit_suspend unused_credit_change + + a2billing_tariff + a2billing_type + a2billing_simultaccess )], );