|
Lines 84-89
sub transit {
Link Here
|
| 84 |
return $self; |
84 |
return $self; |
| 85 |
} |
85 |
} |
| 86 |
|
86 |
|
|
|
87 |
=head3 receipt |
| 88 |
|
| 89 |
Receive the transfer by setting the datearrived time. |
| 90 |
|
| 91 |
=cut |
| 92 |
|
| 93 |
sub receipt { |
| 94 |
my ($self) = @_; |
| 95 |
|
| 96 |
# Throw exception if item is checked out |
| 97 |
Koha::Exceptions::Item::Transfer::Out->throw() if ($self->item->checkout); |
| 98 |
|
| 99 |
# Update the receipt state |
| 100 |
$self->set({ datearrived => dt_from_string })->store; |
| 101 |
|
| 102 |
ModDateLastSeen( $self->item->itemnumber ); |
| 103 |
return $self; |
| 104 |
} |
| 105 |
|
| 87 |
=head3 type |
106 |
=head3 type |
| 88 |
|
107 |
|
| 89 |
=cut |
108 |
=cut |
| 90 |
- |
|
|