Lines 2610-2616
sub ToggleNewStatus {
Link Here
|
2610 |
my @params; |
2610 |
my @params; |
2611 |
|
2611 |
|
2612 |
my $query = q| |
2612 |
my $query = q| |
2613 |
SELECT items.biblionumber, items.itemnumber |
2613 |
SELECT items.* |
2614 |
FROM items |
2614 |
FROM items |
2615 |
LEFT JOIN biblioitems ON biblioitems.biblionumber = items.biblionumber |
2615 |
LEFT JOIN biblioitems ON biblioitems.biblionumber = items.biblionumber |
2616 |
WHERE 1 |
2616 |
WHERE 1 |
Lines 2643-2649
sub ToggleNewStatus {
Link Here
|
2643 |
my $itemnumber = $values->{itemnumber}; |
2643 |
my $itemnumber = $values->{itemnumber}; |
2644 |
for my $substitution ( @$substitutions ) { |
2644 |
for my $substitution ( @$substitutions ) { |
2645 |
next unless $substitution->{field}; |
2645 |
next unless $substitution->{field}; |
2646 |
next if ( $item->{ $substitution->{item_field} } eq $substitution->{value} ); |
2646 |
next if ( $values->{ $substitution->{item_field} } eq $substitution->{value} ); |
2647 |
C4::Items::ModItem( { $substitution->{item_field} => $substitution->{value} }, $biblionumber, $itemnumber ) |
2647 |
C4::Items::ModItem( { $substitution->{item_field} => $substitution->{value} }, $biblionumber, $itemnumber ) |
2648 |
unless $report_only; |
2648 |
unless $report_only; |
2649 |
push @{ $report->{$itemnumber} }, $substitution; |
2649 |
push @{ $report->{$itemnumber} }, $substitution; |
2650 |
- |
|
|