|
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(); |