|
Lines 11477-11485
if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
Link Here
|
| 11477 |
my $sth3 = $dbh->prepare("UPDATE serials SET serialseq_x = ?, serialseq_y = ?, serialseq_z = ? WHERE serialid = ?"); |
11477 |
my $sth3 = $dbh->prepare("UPDATE serials SET serialseq_x = ?, serialseq_y = ?, serialseq_z = ? WHERE serialid = ?"); |
| 11478 |
|
11478 |
|
| 11479 |
foreach my $subscription ( $sth->fetchrow_hashref() ) { |
11479 |
foreach my $subscription ( $sth->fetchrow_hashref() ) { |
|
|
11480 |
next if !defined($subscription); |
| 11480 |
my $number_pattern = $subscription->numberpattern(); |
11481 |
my $number_pattern = $subscription->numberpattern(); |
| 11481 |
$sth2->execute( $subscription->{numberpattern} ); |
11482 |
$sth2->execute( $subscription->{numberpattern} ); |
| 11482 |
my $number_pattern = $sth2->fetchrow_hashref(); |
11483 |
$number_pattern = $sth2->fetchrow_hashref(); |
| 11483 |
|
11484 |
|
| 11484 |
my $numbering_method = $number_pattern->{numberingmethod}; |
11485 |
my $numbering_method = $number_pattern->{numberingmethod}; |
| 11485 |
# Get all the data between the enumeration values, we need |
11486 |
# Get all the data between the enumeration values, we need |
| 11486 |
- |
|
|