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

(-)a/C4/Circulation.pm (-6 / +5 lines)
Lines 1751-1764 sub AddReturn { Link Here
1751
    my $stat_type = 'return';
1751
    my $stat_type = 'return';
1752
1752
1753
    # get information on item
1753
    # get information on item
1754
    my $item       = GetItem( undef, $barcode )
1754
    my $item = GetItem( undef, $barcode );
1755
        or die "GetItem( undef, $barcode ) failed";
1755
    unless ($item) {
1756
        return ( 0, { BadBarcode => $barcode } );    # no barcode means no item or borrower.  bail out.
1757
    }
1758
1756
    my $itemnumber = $item->{ itemnumber };
1759
    my $itemnumber = $item->{ itemnumber };
1757
    my $itemtype   = $item->{ itype };
1760
    my $itemtype   = $item->{ itype };
1758
1761
1759
    unless ($itemnumber) {
1760
        return (0, { BadBarcode => $barcode }); # no barcode means no item or borrower.  bail out.
1761
    }
1762
    my $issue  = GetItemIssue($itemnumber);
1762
    my $issue  = GetItemIssue($itemnumber);
1763
    if ($issue and $issue->{borrowernumber}) {
1763
    if ($issue and $issue->{borrowernumber}) {
1764
        $borrower = C4::Members::GetMemberDetails($issue->{borrowernumber})
1764
        $borrower = C4::Members::GetMemberDetails($issue->{borrowernumber})
1765
- 

Return to bug 14598