Committing the new Ecommerce system
This commit is contained in:
parent
5676bf9585
commit
eeafe944e2
5 changed files with 168 additions and 0 deletions
12
sbin/Hourly/ExpireSubscriptionCodes.pm
Normal file
12
sbin/Hourly/ExpireSubscriptionCodes.pm
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
package Hourly::ExpireSubscriptionCodes;
|
||||
|
||||
use strict;
|
||||
use WebGUI::SQL;
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
sub process {
|
||||
WebGUI::SQL->write("update subscriptionCode set status='Expired' where status = 'Unused' and dateCreated + expires < ".time);
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue