Lines 1031-1048
sub backend_create {
Link Here
|
1031 |
# ... complex case: commit! |
1031 |
# ... complex case: commit! |
1032 |
|
1032 |
|
1033 |
# Do we still have space for an ILL or should we queue? |
1033 |
# Do we still have space for an ILL or should we queue? |
1034 |
my $permitted = $self->check_limits( |
1034 |
my $permitted = 1; |
1035 |
{ patron => $self->patron }, { librarycode => $self->branchcode } |
1035 |
if( $self->patron ) { |
1036 |
); |
1036 |
$permitted = $self->check_limits( |
1037 |
|
1037 |
{ patron => $self->patron }, { librarycode => $self->branchcode } |
1038 |
# Now augment our committed request. |
1038 |
); |
1039 |
|
1039 |
$result->{permitted} = $permitted; |
1040 |
$result->{permitted} = $permitted; # Queue request? |
1040 |
$self->status('QUEUED')->store unless ($permitted); |
1041 |
|
1041 |
} |
1042 |
# This involves... |
|
|
1043 |
|
1044 |
# ...Updating status! |
1045 |
$self->status('QUEUED')->store unless ( $permitted ); |
1046 |
|
1042 |
|
1047 |
## Handle Unmediated ILLs |
1043 |
## Handle Unmediated ILLs |
1048 |
|
1044 |
|
1049 |
- |
|
|