# Now I can start looping
foreach my $customer (@customers)
{
+ my $paydate = $customer->getfield('paydate');
+ next if $paydate =~ /^\s*$/; #skip empty expiration dates
+
my $custnum = $customer->getfield('custnum');
my $first = $customer->getfield('first');
my $last = $customer->getfield('last');
my $company = $customer->getfield('company');
my $payby = $customer->getfield('payby');
my $payinfo = $customer->getfield('payinfo');
- my $paydate = $customer->getfield('paydate');
my $daytime = $customer->getfield('daytime');
my $night = $customer->getfield('night');
-
+
my ($payyear,$paymonth,$payday) = split (/-/,$paydate);
my $expire_time = timelocal(0,0,0,$payday,--$paymonth,$payyear);
=head1 VERSION
-$Id: freeside-expiration-alerter,v 1.3 2002-04-16 09:38:19 ivan Exp $
+$Id: freeside-expiration-alerter,v 1.4 2002-09-16 09:27:14 ivan Exp $
=head1 BUGS