Lines 66-71
foreach my $bibnum (@holdable_bibs) {
Link Here
|
66 |
|
66 |
|
67 |
if ( $op eq 'cud-placerequest' && $patron ) { |
67 |
if ( $op eq 'cud-placerequest' && $patron ) { |
68 |
my %failed_holds; |
68 |
my %failed_holds; |
|
|
69 |
my @successful_biblionumbers; |
69 |
foreach my $biblionumber ( keys %bibinfos ) { |
70 |
foreach my $biblionumber ( keys %bibinfos ) { |
70 |
|
71 |
|
71 |
my $can_override = C4::Context->preference('AllowHoldPolicyOverride'); |
72 |
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 |
$hold_priority++; |
110 |
$hold_priority++; |
109 |
|
111 |
|
Lines 132-137
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
132 |
non_priority => $non_priority, |
134 |
non_priority => $non_priority, |
133 |
} |
135 |
} |
134 |
); |
136 |
); |
|
|
137 |
push @successful_biblionumbers, $biblionumber; |
135 |
} |
138 |
} |
136 |
} else { |
139 |
} else { |
137 |
|
140 |
|
Lines 155-160
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
155 |
item_group_id => $item_group_id, |
158 |
item_group_id => $item_group_id, |
156 |
} |
159 |
} |
157 |
); |
160 |
); |
|
|
161 |
push @successful_biblionumbers, $biblionumber; |
158 |
} |
162 |
} |
159 |
} |
163 |
} |
160 |
} |
164 |
} |
Lines 167-173
if ( $op eq 'cud-placerequest' && $patron ) {
Link Here
|
167 |
foreach my $msg ( keys %failed_holds ) { |
171 |
foreach my $msg ( keys %failed_holds ) { |
168 |
push( @failed_hold_msgs, $msg ); |
172 |
push( @failed_hold_msgs, $msg ); |
169 |
} |
173 |
} |
170 |
$redirect_url->query_form( biblionumber => [@biblionumbers], failed_holds => \@failed_hold_msgs ); |
174 |
$redirect_url->query_form( |
|
|
175 |
biblionumber => [@biblionumbers], failed_holds => \@failed_hold_msgs, |
176 |
successful_holds => \@successful_biblionumbers, |
177 |
); |
171 |
print $input->redirect($redirect_url); |
178 |
print $input->redirect($redirect_url); |
172 |
} elsif ( $borrowernumber eq '' ) { |
179 |
} elsif ( $borrowernumber eq '' ) { |
173 |
print $input->header(); |
180 |
print $input->header(); |