Lines 69-74
foreach my $bibnum ( @holdable_bibs ) {
Link Here
|
69 |
|
69 |
|
70 |
if ( $op eq 'cud-placerequest' && $patron ) { |
70 |
if ( $op eq 'cud-placerequest' && $patron ) { |
71 |
my %failed_holds; |
71 |
my %failed_holds; |
|
|
72 |
my @successful_biblionumbers; |
72 |
foreach my $biblionumber ( keys %bibinfos ) { |
73 |
foreach my $biblionumber ( keys %bibinfos ) { |
73 |
|
74 |
|
74 |
my $can_override = C4::Context->preference('AllowHoldPolicyOverride'); |
75 |
my $can_override = C4::Context->preference('AllowHoldPolicyOverride'); |
Lines 104-109
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
104 |
non_priority => $non_priority, |
105 |
non_priority => $non_priority, |
105 |
} |
106 |
} |
106 |
); |
107 |
); |
|
|
108 |
push @successful_biblionumbers, $biblionumber; |
107 |
|
109 |
|
108 |
} else { |
110 |
} else { |
109 |
$failed_holds{$can_item_be_reserved} = 1; |
111 |
$failed_holds{$can_item_be_reserved} = 1; |
Lines 130-135
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
130 |
non_priority => $non_priority, |
132 |
non_priority => $non_priority, |
131 |
} |
133 |
} |
132 |
); |
134 |
); |
|
|
135 |
push @successful_biblionumbers, $biblionumber; |
133 |
} |
136 |
} |
134 |
} else { |
137 |
} else { |
135 |
# place a request on 1st available |
138 |
# place a request on 1st available |
Lines 152-157
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
152 |
item_group_id => $item_group_id, |
155 |
item_group_id => $item_group_id, |
153 |
} |
156 |
} |
154 |
); |
157 |
); |
|
|
158 |
push @successful_biblionumbers, $biblionumber; |
155 |
} |
159 |
} |
156 |
} |
160 |
} |
157 |
} |
161 |
} |
Lines 164-170
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
164 |
foreach my $msg ( keys %failed_holds ) { |
168 |
foreach my $msg ( keys %failed_holds ) { |
165 |
push( @failed_hold_msgs, $msg ); |
169 |
push( @failed_hold_msgs, $msg ); |
166 |
} |
170 |
} |
167 |
$redirect_url->query_form( biblionumber => [@biblionumbers], failed_holds => \@failed_hold_msgs ); |
171 |
$redirect_url->query_form( biblionumber => [@biblionumbers], failed_holds => \@failed_hold_msgs, successful_holds => \@successful_biblionumbers, ); |
168 |
print $input->redirect($redirect_url); |
172 |
print $input->redirect($redirect_url); |
169 |
} |
173 |
} |
170 |
elsif ( $borrowernumber eq '' ) { |
174 |
elsif ( $borrowernumber eq '' ) { |