projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
journal cdrbatch -> cdrbatchnum upgrade
[freeside.git]
/
FS
/
FS
/
cdr.pm
diff --git
a/FS/FS/cdr.pm
b/FS/FS/cdr.pm
index
844b7fd
..
f545632
100644
(file)
--- a/
FS/FS/cdr.pm
+++ b/
FS/FS/cdr.pm
@@
-1877,9
+1877,12
@@
sub process_batch_import {
#
# Used by FS::Upgrade to migrate to a new database.
#
# Used by FS::Upgrade to migrate to a new database.
+use FS::upgrade_journal;
sub _upgrade_data {
my ($class, %opts) = @_;
sub _upgrade_data {
my ($class, %opts) = @_;
+ return if FS::upgrade_journal->is_done('cdr_cdrbatchnum');
+
warn "$me upgrading $class\n" if $DEBUG;
my $sth = dbh->prepare(
warn "$me upgrading $class\n" if $DEBUG;
my $sth = dbh->prepare(
@@
-1907,6
+1910,8
@@
sub _upgrade_data {
$sth->execute($cdrbatchnum{$cdrbatch}, $cdrbatch) or die $sth->errstr;
}
$sth->execute($cdrbatchnum{$cdrbatch}, $cdrbatch) or die $sth->errstr;
}
+ FS::upgrade_journal->set_done('cdr_cdrbatchnum');
+
}
=item ip_addr_sql FIELD RANGE
}
=item ip_addr_sql FIELD RANGE