|
Lines 102-108
sub plugin_javascript {
Link Here
|
| 102 |
$year = substr($year, -2); |
102 |
$year = substr($year, -2); |
| 103 |
$query = "SELECT MAX(CAST(SUBSTRING(barcode,-4) AS signed)) AS number FROM items WHERE barcode REGEXP ?"; |
103 |
$query = "SELECT MAX(CAST(SUBSTRING(barcode,-4) AS signed)) AS number FROM items WHERE barcode REGEXP ?"; |
| 104 |
my $sth = $dbh->prepare($query); |
104 |
my $sth = $dbh->prepare($query); |
| 105 |
$sth->execute("^[a-zA-Z]{1,}$year"); |
105 |
$sth->execute("^[-a-zA-Z]{1,}$year"); |
| 106 |
while (my ($count)= $sth->fetchrow_array) { |
106 |
while (my ($count)= $sth->fetchrow_array) { |
| 107 |
$nextnum = $count if $count; |
107 |
$nextnum = $count if $count; |
| 108 |
$nextnum = 0 if $nextnum == 9999; # this sequence only allows for cataloging 10000 books per month |
108 |
$nextnum = 0 if $nextnum == 9999; # this sequence only allows for cataloging 10000 books per month |
| 109 |
- |
|
|