Attachment #129934 for bug #29660

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




    my $marcrecord= GetMarcBiblio({ biblionumber => $biblioNumber });

    # flag indicating existence of at least one item linked via a host record
    my $hostitemsflag;
    # adding items linked via host biblios
    my @hostitemInfos = GetHostItemsInfo($marcrecord);
    if (@hostitemInfos){
        $hostitemsflag =1;
        push (@itemInfos,@hostitemInfos);
    }



        # if the items belongs to a host record, show link to host record
        if ( $itemInfo->{biblionumber} ne $biblioNum ) {
            $biblioLoopIter{hostitemsflag}    = 1;
            $itemLoopIter->{hostbiblionumber} = $itemInfo->{biblionumber};
            $itemLoopIter->{hosttitle}        = Koha::Biblios->find( $itemInfo->{biblionumber} )->title;
        }




        my @hostitems = get_hostitemnumbers_of($biblionumber);
        my @itemnumbers;
        if (@hostitems){
            $template->param('hostitemsflag' => 1);
            push(@itemnumbers, @hostitems);
        }



                $biblioitem->{force_hold_level} = $force_hold_level;

                if ( $biblioitem->{biblioitemnumber} ne $biblionumber ) {
                    $biblioitem->{hostitemsflag} = 1;
                }

                $biblioloopiter{description} = $biblioitem->{description};
                $biblioloopiter{itypename}   = $biblioitem->{description};
                if ( $biblioitem->{itemtype} ) {

                    }

                    if($item->{biblionumber} ne $biblionumber){
                        $item->{hostitemsflag} = 1;
                        $item->{hosttitle} = Koha::Biblios->find( $item->{biblionumber} )->title;
                    }

- 

Return to bug 29660

Lines 401-407 if ( ( $findborrower && $borrowernumber_hold \|\| $findclub && $club_hold ) Link Here

(-)a/reserve/request.pl (-7 lines)
401	my @hostitems = get_hostitemnumbers_of($biblionumber);	401	my @hostitems = get_hostitemnumbers_of($biblionumber);
402	my @itemnumbers;	402	my @itemnumbers;
403	if (@hostitems){	403	if (@hostitems){
404	$template->param('hostitemsflag' => 1);
405	push(@itemnumbers, @hostitems);	404	push(@itemnumbers, @hostitems);
406	}	405	}
407		406
Lines 450-459 if ( ( $findborrower && $borrowernumber_hold \|\| $findclub && $club_hold ) Link Here
450		449
451	$biblioitem->{force_hold_level} = $force_hold_level;	450	$biblioitem->{force_hold_level} = $force_hold_level;
452		451
453	if ( $biblioitem->{biblioitemnumber} ne $biblionumber ) {
454	$biblioitem->{hostitemsflag} = 1;
455	}
456
457	$biblioloopiter{description} = $biblioitem->{description};	452	$biblioloopiter{description} = $biblioitem->{description};
458	$biblioloopiter{itypename} = $biblioitem->{description};	453	$biblioloopiter{itypename} = $biblioitem->{description};
459	if ( $biblioitem->{itemtype} ) {	454	if ( $biblioitem->{itemtype} ) {
Lines 505-511 if ( ( $findborrower && $borrowernumber_hold \|\| $findclub && $club_hold ) Link Here
505	}	500	}
506		501
507	if($item->{biblionumber} ne $biblionumber){	502	if($item->{biblionumber} ne $biblionumber){
508	$item->{hostitemsflag} = 1;
509	$item->{hosttitle} = Koha::Biblios->find( $item->{biblionumber} )->title;	503	$item->{hosttitle} = Koha::Biblios->find( $item->{biblionumber} )->title;
510	}	504	}
511		505
512	-

Lines 153-163 foreach my $biblioNumber (@biblionumbers) { Link Here

(-)a/opac/opac-reserve.pl (-3 lines)
153	my $marcrecord= GetMarcBiblio({ biblionumber => $biblioNumber });	153	my $marcrecord= GetMarcBiblio({ biblionumber => $biblioNumber });
154		154
155	# flag indicating existence of at least one item linked via a host record	155	# flag indicating existence of at least one item linked via a host record
156	my $hostitemsflag;
157	# adding items linked via host biblios	156	# adding items linked via host biblios
158	my @hostitemInfos = GetHostItemsInfo($marcrecord);	157	my @hostitemInfos = GetHostItemsInfo($marcrecord);
159	if (@hostitemInfos){	158	if (@hostitemInfos){
160	$hostitemsflag =1;
161	push (@itemInfos,@hostitemInfos);	159	push (@itemInfos,@hostitemInfos);
162	}	160	}
163		161
Lines 553-559 foreach my $biblioNum (@biblionumbers) { Link Here
553		551
554	# if the items belongs to a host record, show link to host record	552	# if the items belongs to a host record, show link to host record
555	if ( $itemInfo->{biblionumber} ne $biblioNum ) {	553	if ( $itemInfo->{biblionumber} ne $biblioNum ) {
556	$biblioLoopIter{hostitemsflag} = 1;
557	$itemLoopIter->{hostbiblionumber} = $itemInfo->{biblionumber};	554	$itemLoopIter->{hostbiblionumber} = $itemInfo->{biblionumber};
558	$itemLoopIter->{hosttitle} = Koha::Biblios->find( $itemInfo->{biblionumber} )->title;	555	$itemLoopIter->{hosttitle} = Koha::Biblios->find( $itemInfo->{biblionumber} )->title;
559	}	556	}