Conservancy/supporters
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Support amounts.

Browse source
This commit is contained in:
Bradley M. Kuhn 2019-12-10 09:30:32 -08:00
parent 51d0db3fab
commit 84a73aa0f6
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
scripts/send-mass-email.plx
View file

@ -37,9 +37,14 @@ close EMAIL;
my(@supporterIds) = $sp->findDonor({}); my(@supporterIds) = $sp->findDonor({});
foreach my $id (@supporterIds) { foreach my $id (@supporterIds) {
my $donorType = $self->getType($id);
my $expiresOn = $sp->supporterExpirationDate($id); my $expiresOn = $sp->supporterExpirationDate($id);
my $isLapsed = ( (not defined $expiresOn) or $expiresOn lt $TODAY); my $isLapsed = ( (not defined $expiresOn) or $expiresOn lt $TODAY);
# next unless $expiresOn lt "2017-02-01";
my $amount = $sp->donorTotalGaveInPeriod(donorId => $id);
my $lastGaveDate = $sp->donorLastGave($id);
my $firstGaveDate = $sp->donorFirstGave($id);
my $nineMonthsSinceFirstGave = UnixDate(DateCalc(ParseDate($firstGaveDate), "+ 9 months"), '%Y-%m-%d');
# invalid email address # invalid email address