blob: 1b668212615e01fa5458e7eb67b4f464ff2ff0a8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
package FS::part_event::Condition::pkg_recurring;
use strict;
use base qw( FS::part_event::Condition );
sub description { 'Package is recurring'; }
sub eventtable_hashref {
{ 'cust_main' => 0,
'cust_bill' => 0,
'cust_pkg' => 1,
};
}
sub condition {
my( $self, $cust_pkg ) = @_;
$cust_pkg->part_pkg->freq !~ /^0+\D?$/; #just in case, probably just != '0'
}
#XXX join part_pkg USING (pkgpart)
# part_pkg.freq != '0'
#sub condition_sql {
#
#}
1;
|