Lines 318-325
if ( $op and $op eq 'serialchangestatus' ) {
Link Here
|
318 |
if ( C4::Context->preference('autoBarcode') eq |
318 |
if ( C4::Context->preference('autoBarcode') eq |
319 |
'incremental' ) |
319 |
'incremental' ) |
320 |
{ |
320 |
{ |
321 |
if ( !$bib_record->field($barcodetagfield) |
321 |
if ( |
322 |
->subfield($barcodetagsubfield) ) |
322 |
!( |
|
|
323 |
$bib_record->field($barcodetagfield) |
324 |
&& $bib_record->field($barcodetagfield)->subfield($barcodetagsubfield) |
325 |
) |
326 |
) |
323 |
{ |
327 |
{ |
324 |
my $sth_barcode = $dbh->prepare( |
328 |
my $sth_barcode = $dbh->prepare( |
325 |
'select max(abs(barcode)) from items'); |
329 |
'select max(abs(barcode)) from items'); |
326 |
- |
|
|