Attachment #161620 for bug #35248

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




    return $bookable_items->single->itemnumber;
}

=head3 place_booking

  my $booking = $biblio->place_booking(
    {
        patron     => $patron,
        start_date => $datetime,
        end_date   => $datetime
    }
  );

Add a booking for this item for the dates passed.

Returns the Koha::Booking object or throws an exception if the item cannot be booked for the given dates.

=cut

sub place_booking {
    my ( $self, $params ) = @_;

    # check for mandatory params
    my @mandatory = ( 'start_date', 'end_date', 'patron' );
    for my $param (@mandatory) {
        unless ( defined( $params->{$param} ) ) {
            Koha::Exceptions::MissingParameter->throw( error => "The $param parameter is mandatory" );
        }
    }
    my $patron = $params->{patron};

    # New booking object
    my $booking = Koha::Booking->new(
        {
            start_date => $params->{start_date},
            end_date   => $params->{end_date},
            patron_id  => $patron->borrowernumber,
            biblio_id  => $self->biblionumber
        }
    )->store();
    return $booking;
}

=head3 can_be_transferred

$biblio->can_be_transferred({ to => $to_library, from => $from_library })




    return $bookings_count ? 0 : 1;
}

=head3 place_booking

  my $booking = $item->place_booking(
    {
        patron     => $patron,
        start_date => $datetime,
        end_date   => $datetime
    }
  );

Add a booking for this item for the dates passed.

Returns the Koha::Booking object or throws an exception if the item cannot be booked for the given dates.

=cut

sub place_booking {
    my ( $self, $params ) = @_;

    # check for mandatory params
    my @mandatory = ( 'start_date', 'end_date', 'patron' );
    for my $param (@mandatory) {
        unless ( defined( $params->{$param} ) ) {
            Koha::Exceptions::MissingParameter->throw( error => "The $param parameter is mandatory" );
        }
    }
    my $patron = $params->{patron};

    # New booking object
    my $booking = Koha::Booking->new(
        {
            start_date => $params->{start_date},
            end_date   => $params->{end_date},
            patron_id  => $patron->borrowernumber,
            biblio_id  => $self->biblionumber,
            item_id    => $self->itemnumber,
        }
    )->store();
    return $booking;
}

=head3 request_transfer

  my $transfer = $item->request_transfer(
- 

Return to bug 35248

Lines 321-366 sub assign_item_for_booking { Link Here

(-)a/Koha/Biblio.pm (-40 lines)
321	return $bookable_items->single->itemnumber;	321	return $bookable_items->single->itemnumber;
322	}	322	}
323		323
324	=head3 place_booking
325
326	my $booking = $biblio->place_booking(
327	{
328	patron => $patron,
329	start_date => $datetime,
330	end_date => $datetime
331	}
332	);
333
334	Add a booking for this item for the dates passed.
335
336	Returns the Koha::Booking object or throws an exception if the item cannot be booked for the given dates.
337
338	=cut
339
340	sub place_booking {
341	my ( $self, $params ) = @_;
342
343	# check for mandatory params
344	my @mandatory = ( 'start_date', 'end_date', 'patron' );
345	for my $param (@mandatory) {
346	unless ( defined( $params->{$param} ) ) {
347	Koha::Exceptions::MissingParameter->throw( error => "The $param parameter is mandatory" );
348	}
349	}
350	my $patron = $params->{patron};
351
352	# New booking object
353	my $booking = Koha::Booking->new(
354	{
355	start_date => $params->{start_date},
356	end_date => $params->{end_date},
357	patron_id => $patron->borrowernumber,
358	biblio_id => $self->biblionumber
359	}
360	)->store();
361	return $booking;
362	}
363
364	=head3 can_be_transferred	324	=head3 can_be_transferred
365		325
366	$biblio->can_be_transferred({ to => $to_library, from => $from_library })	326	$biblio->can_be_transferred({ to => $to_library, from => $from_library })

Lines 662-708 sub check_booking { Link Here

(-)a/Koha/Item.pm (-42 lines)
662	return $bookings_count ? 0 : 1;	662	return $bookings_count ? 0 : 1;
663	}	663	}
664		664
665	=head3 place_booking
666
667	my $booking = $item->place_booking(
668	{
669	patron => $patron,
670	start_date => $datetime,
671	end_date => $datetime
672	}
673	);
674
675	Add a booking for this item for the dates passed.
676
677	Returns the Koha::Booking object or throws an exception if the item cannot be booked for the given dates.
678
679	=cut
680
681	sub place_booking {
682	my ( $self, $params ) = @_;
683
684	# check for mandatory params
685	my @mandatory = ( 'start_date', 'end_date', 'patron' );
686	for my $param (@mandatory) {
687	unless ( defined( $params->{$param} ) ) {
688	Koha::Exceptions::MissingParameter->throw( error => "The $param parameter is mandatory" );
689	}
690	}
691	my $patron = $params->{patron};
692
693	# New booking object
694	my $booking = Koha::Booking->new(
695	{
696	start_date => $params->{start_date},
697	end_date => $params->{end_date},
698	patron_id => $patron->borrowernumber,
699	biblio_id => $self->biblionumber,
700	item_id => $self->itemnumber,
701	}
702	)->store();
703	return $booking;
704	}
705
706	=head3 request_transfer	665	=head3 request_transfer
707		666
708	my $transfer = $item->request_transfer(	667	my $transfer = $item->request_transfer(
709	-