Lines 23-29
use CGI;
Link Here
|
23 |
use JSON qw(to_json); |
23 |
use JSON qw(to_json); |
24 |
|
24 |
|
25 |
use C4::Auth qw(check_cookie_auth); |
25 |
use C4::Auth qw(check_cookie_auth); |
26 |
use C4::Biblio qw(GetMarcBiblio GetFrameworkCode GetRecordValue ); |
26 |
use C4::Biblio qw(SplitSubtitle); |
27 |
use C4::Charset; |
27 |
use C4::Charset; |
28 |
use C4::Circulation qw(GetTransfers); |
28 |
use C4::Circulation qw(GetTransfers); |
29 |
use C4::Context; |
29 |
use C4::Context; |
Lines 84-94
while ( my $h = $holds_rs->next() ) {
Link Here
|
84 |
for my $library ( @$libraries ) { |
84 |
for my $library ( @$libraries ) { |
85 |
$library->{selected} = 1 if $library->{branchcode} eq $h->branchcode(); |
85 |
$library->{selected} = 1 if $library->{branchcode} eq $h->branchcode(); |
86 |
} |
86 |
} |
|
|
87 |
|
88 |
my $biblio = $h->biblio(); |
87 |
my $hold = { |
89 |
my $hold = { |
88 |
DT_RowId => $h->reserve_id(), |
90 |
DT_RowId => $h->reserve_id(), |
89 |
biblionumber => $biblionumber, |
91 |
biblionumber => $biblionumber, |
90 |
title => $h->biblio()->title(), |
92 |
title => $biblio->title(), |
91 |
author => $h->biblio()->author(), |
93 |
subtitle => C4::Biblio::SplitSubtitles($biblio->subtitle()), |
|
|
94 |
medium => $biblio->medium(), |
95 |
part_number => $biblio->part_number(), |
96 |
part_name => $biblio->part_name(), |
97 |
author => $biblio->author(), |
92 |
reserve_id => $h->reserve_id(), |
98 |
reserve_id => $h->reserve_id(), |
93 |
branchcode => $h->branch()->branchname(), |
99 |
branchcode => $h->branch()->branchname(), |
94 |
branches => $libraries, |
100 |
branches => $libraries, |
Lines 102-112
while ( my $h = $holds_rs->next() ) {
Link Here
|
102 |
waiting_here => $h->branch()->branchcode() eq $branch, |
108 |
waiting_here => $h->branch()->branchcode() eq $branch, |
103 |
priority => $h->priority(), |
109 |
priority => $h->priority(), |
104 |
itemtype_limit => $itemtype_limit, |
110 |
itemtype_limit => $itemtype_limit, |
105 |
subtitle => GetRecordValue( |
|
|
106 |
'subtitle', |
107 |
GetMarcBiblio({ biblionumber => $biblionumber }), |
108 |
GetFrameworkCode($biblionumber) |
109 |
), |
110 |
reservedate_formatted => $h->reservedate() ? output_pref( |
111 |
reservedate_formatted => $h->reservedate() ? output_pref( |
111 |
{ dt => dt_from_string( $h->reservedate() ), dateonly => 1 } |
112 |
{ dt => dt_from_string( $h->reservedate() ), dateonly => 1 } |
112 |
) |
113 |
) |