package OpenILS::WWW::EGCatLoader;
use strict; use warnings;
-use Data::Dumper;
use Apache2::Const -compile => qw(OK DECLINED FORBIDDEN HTTP_INTERNAL_SERVER_ERROR REDIRECT HTTP_BAD_REQUEST);
use OpenSRF::Utils::Logger qw/$logger/;
use OpenILS::Utils::CStoreEditor qw/:funcs/;
$ctx->{marc_xml} = $rec_data[0]->{marc_xml};
$ctx->{copies} = $copy_rec->gather(1);
- # Add Copy Notes some how to Each Copy?
+
+ # Add Copy Notes to Each Copy?
foreach my $copy (@{$ctx->{copies}}) {
$copy->{notes} = $U->simplereq(
- 'open-ils.circ',
+ 'open-ils.circ',
'open-ils.circ.copy_note.retrieve.all',
{itemid => $copy->{id}, pub => 1 }
);
$rec_id, undef, undef, $copy_limit, $copy_offset, $self->ctx->{is_staff}
);
- # Add Copy Notes?
- # Some How need to Make Notes an Array of Notes
- # This makes two rows for the record, when there are two copy notes - cause of the JOIN
- # Also, if this is moved to around line 68 as $copy_rec it seems to not work the same?
-# $query->{select}->{acpn} = [
-# {column => 'title', alias => 'note_title'},
-# {column => 'value', alias => 'note_value'}
-# ];
-# $query->{from}->{acp}->{acpn} = {
-# type => 'left'
-# };
-
if($org != $self->ctx->{aou_tree}->()->id) {
# no need to add the org join filter if we're not actually filtering
$query->{from}->{acp}->{aou} = {