Lines 178-181
sub list_rules {
Link Here
|
178 |
}; |
178 |
}; |
179 |
} |
179 |
} |
180 |
|
180 |
|
|
|
181 |
=head3 set_rules |
182 |
|
183 |
Set rules for the given patron/item/branch combination |
184 |
|
185 |
=cut |
186 |
|
187 |
sub set_rules { |
188 |
my $c = shift->openapi->valid_input or return; |
189 |
|
190 |
return try { |
191 |
my $body = $c->req->json; |
192 |
|
193 |
my $item_type = $body->{context}->{item_type_id}; |
194 |
my $branchcode = $body->{context}->{library_id}; |
195 |
my $patron_category = $body->{context}->{patron_category_id}; |
196 |
|
197 |
if ( $item_type eq '*' ) { |
198 |
$item_type = undef; |
199 |
} else { |
200 |
my $type = Koha::ItemTypes->find($item_type); |
201 |
return $c->render_invalid_parameter_value( |
202 |
{ |
203 |
path => '/body/context/item_type_id', |
204 |
values => { |
205 |
uri => '/api/v1/item_types', |
206 |
field => 'item_type_id' |
207 |
} |
208 |
} |
209 |
) unless $type; |
210 |
} |
211 |
|
212 |
if ( $branchcode eq '*' ) { |
213 |
$branchcode = undef; |
214 |
} else { |
215 |
my $library = Koha::Libraries->find($branchcode); |
216 |
return $c->render_invalid_parameter_value( |
217 |
{ |
218 |
path => '/body/context/library_id', |
219 |
values => { |
220 |
uri => '/api/v1/libraries', |
221 |
field => 'library_id' |
222 |
} |
223 |
} |
224 |
) unless $library; |
225 |
} |
226 |
|
227 |
if ( $patron_category eq '*' ) { |
228 |
$patron_category = undef; |
229 |
} else { |
230 |
my $category = Koha::Patron::Categories->find($patron_category); |
231 |
return $c->render_invalid_parameter_value( |
232 |
{ |
233 |
path => '/body/context/patron_category_id', |
234 |
values => { |
235 |
uri => '/api/v1/patron_categories', |
236 |
field => 'patron_category_id' |
237 |
} |
238 |
} |
239 |
) unless $category; |
240 |
} |
241 |
|
242 |
my $rules = {%$body}; |
243 |
delete $rules->{context}; |
244 |
|
245 |
my $new_rules = Koha::CirculationRules->set_rules( |
246 |
{ |
247 |
categorycode => $patron_category, |
248 |
itemtype => $item_type, |
249 |
branchcode => $branchcode, |
250 |
rules => $rules, |
251 |
} |
252 |
); |
253 |
|
254 |
# TODO: Add error handling for rule scope exceptions thrown in Koha::CirculationRules::set_rule |
255 |
|
256 |
my $return = { map { $_->rule_name => $_->rule_value } @{$new_rules} }; |
257 |
$return->{context} = |
258 |
{ library_id => $branchcode, patron_category_id => $patron_category, item_type_id => $item_type }; |
259 |
|
260 |
return $c->render( |
261 |
status => 200, |
262 |
openapi => $return |
263 |
); |
264 |
} |
265 |
} |
266 |
|
181 |
1; |
267 |
1; |