View | Details | Raw Unified | Return to bug 18254
Collapse All | Expand All

(-)a/cataloguing/additem.pl (-35 / +21 lines)
Lines 644-684 if ($op eq "additem") { Link Here
644
#-------------------------------------------------------------------------------
644
#-------------------------------------------------------------------------------
645
} elsif ($op eq "delallitems") {
645
} elsif ($op eq "delallitems") {
646
#-------------------------------------------------------------------------------
646
#-------------------------------------------------------------------------------
647
    my @biblioitems = &GetBiblioItemByBiblioNumber($biblionumber);
647
    my $itemnumbers = C4::Items::GetItemnumbersForBiblio( $biblionumber );
648
    my $errortest=0;
648
    foreach my $itemnumber ( @$itemnumbers ) {
649
    my $itemfail;
649
        $error = C4::Items::DelItemCheck( $biblionumber, $itemnumber );
650
    foreach my $biblioitem (@biblioitems) {
650
        next if $error == 1; # Means ok
651
        my $items = &GetItemsByBiblioitemnumber( $biblioitem->{biblioitemnumber} );
651
        push @errors,$error;
652
652
    }
653
        foreach my $item (@$items) {
653
    if ( @errors ) {
654
            $error =&DelItemCheck( $biblionumber, $item->{itemnumber} );
654
        $nextop="additem";
655
            $itemfail =$item;
655
    } else {
656
        if($error == 1){
656
        my $defaultview = C4::Context->preference('IntranetBiblioDefaultView');
657
            next
657
        my $views = { C4::Search::enabled_staff_search_views };
658
            }
658
        if ($defaultview eq 'isbd' && $views->{can_view_ISBD}) {
659
        else {
659
            print $input->redirect("/cgi-bin/koha/catalogue/ISBDdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
660
            push @errors,$error;
660
        } elsif  ($defaultview eq 'marc' && $views->{can_view_MARC}) {
661
            $errortest++
661
            print $input->redirect("/cgi-bin/koha/catalogue/MARCdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
662
            }
662
        } elsif  ($defaultview eq 'labeled_marc' && $views->{can_view_labeledMARC}) {
663
        }
663
            print $input->redirect("/cgi-bin/koha/catalogue/labeledMARCdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
664
        if($errortest > 0){
664
        } else {
665
            $nextop="additem";
665
            print $input->redirect("/cgi-bin/koha/catalogue/detail.pl?biblionumber=$biblionumber&searchid=$searchid");
666
        } 
667
        else {
668
            my $defaultview = C4::Context->preference('IntranetBiblioDefaultView');
669
            my $views = { C4::Search::enabled_staff_search_views };
670
            if ($defaultview eq 'isbd' && $views->{can_view_ISBD}) {
671
                print $input->redirect("/cgi-bin/koha/catalogue/ISBDdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
672
            } elsif  ($defaultview eq 'marc' && $views->{can_view_MARC}) {
673
                print $input->redirect("/cgi-bin/koha/catalogue/MARCdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
674
            } elsif  ($defaultview eq 'labeled_marc' && $views->{can_view_labeledMARC}) {
675
                print $input->redirect("/cgi-bin/koha/catalogue/labeledMARCdetail.pl?biblionumber=$biblionumber&searchid=$searchid");
676
            } else {
677
                print $input->redirect("/cgi-bin/koha/catalogue/detail.pl?biblionumber=$biblionumber&searchid=$searchid");
678
            }
679
            exit;
680
        }
666
        }
681
	}
667
        exit;
668
    }
682
#-------------------------------------------------------------------------------
669
#-------------------------------------------------------------------------------
683
} elsif ($op eq "saveitem") {
670
} elsif ($op eq "saveitem") {
684
#-------------------------------------------------------------------------------
671
#-------------------------------------------------------------------------------
685
- 

Return to bug 18254