my $branchcode = C4::Context->userenv->{'branch'};
- $query = "SELECT MAX(CAST(SUBSTRING_INDEX(copynumber,'_',-1) AS SIGNED)) FROM items WHERE homebranch = ?";
+ $query = "SELECT MAX(CAST(SUBSTRING_INDEX(stocknumber,'_',-1) AS SIGNED)) FROM items WHERE homebranch = ?";
my $sth=$dbh->prepare($query);
$sth->execute($branchcode);
while (my ($count)= $sth->fetchrow_array) {
INSERT IGNORE INTO marc_subfield_structure (frameworkcode,tagfield, tagsubfield, tab, repeatable, mandatory,kohafield)
SELECT DISTINCT (frameworkcode),995,"j",10,0,0,"items.stocknumber" from biblio_framework ;
});
- }
-
+ #Previously, copynumber was used as stocknumber
+ $dbh->do(qq{
+ UPDATE items set stocknumber=copynumber;
+ });
+ $dbh->do(qq{
+ UPDATE items set copynumber=NULL;
+ });
+ }
print "Upgrade to $DBversion done (stocknumber field added)\n";
SetVersion ($DBversion);
}