} elsif ( $options{'options'} ) {
warn " inserting part_pkg_option records for options hashref" if $DEBUG;
- foreach my $optionname ( %{$options{'options'}} ) {
+ foreach my $optionname ( keys %{$options{'options'}} ) {
my $part_pkg_option =
new FS::part_pkg_option {
'6' => 'semiannually (every 6 months)',
'12' => 'annually',
'24' => 'biannually (every 2 years)',
+ '36' => 'triannually (every 3 years)',
+ '48' => '(every 4 years)',
+ '60' => '(every 5 years)',
+ '120' => '(every 10 years)',
;
sub freq_pretty {
$value;
}
+#fallback that return 0 for old legacy packages with no plan
+
+sub calc_remain { 0; }
+sub calc_cancel { 0; }
+
=back
=head1 SUBROUTINES