projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
switch to Email::Sender and add options for every kind of mail encryption & authentic...
[freeside.git]
/
FS
/
FS
/
part_pkg_option.pm
diff --git
a/FS/FS/part_pkg_option.pm
b/FS/FS/part_pkg_option.pm
index
9708f11
..
3cb330b
100644
(file)
--- a/
FS/FS/part_pkg_option.pm
+++ b/
FS/FS/part_pkg_option.pm
@@
-127,11
+127,16
@@
sub check {
sub _upgrade_data { # class method
my ($class, %opts) = @_;
sub _upgrade_data { # class method
my ($class, %opts) = @_;
- my $sql = "UPDATE part_pkg_option SET
UP
optionname = 'recur_fee'".
+ my $sql = "UPDATE part_pkg_option SET optionname = 'recur_fee'".
" WHERE optionname = 'recur_flat'";
my $sth = dbh->prepare($sql) or die dbh->errstr;
$sth->execute or die $sth->errstr;
" WHERE optionname = 'recur_flat'";
my $sth = dbh->prepare($sql) or die dbh->errstr;
$sth->execute or die $sth->errstr;
+ $sql = "UPDATE part_pkg_option SET optionname = 'recur_method',".
+ "optionvalue = 'prorate' WHERE optionname = 'enable_prorate'";
+ $sth = dbh->prepare($sql) or die dbh->errstr;
+ $sth->execute or die $sth->errstr;
+
'';
}
'';
}