|
Lines 92-131
while ( my $h = $holds_rs->next() ) {
Link Here
|
| 92 |
my $biblio = $h->biblio(); |
92 |
my $biblio = $h->biblio(); |
| 93 |
my @subtitles = split(/ \| /, $biblio->subtitle() // ''); |
93 |
my @subtitles = split(/ \| /, $biblio->subtitle() // ''); |
| 94 |
my $hold = { |
94 |
my $hold = { |
| 95 |
DT_RowId => $h->reserve_id(), |
95 |
DT_RowId => $h->reserve_id(), |
| 96 |
biblionumber => $biblionumber, |
96 |
biblionumber => $biblionumber, |
| 97 |
title => $biblio->title(), |
97 |
title => $biblio->title(), |
| 98 |
subtitle => \@subtitles, |
98 |
subtitle => \@subtitles, |
| 99 |
medium => $biblio->medium() // '', |
99 |
medium => $biblio->medium() // '', |
| 100 |
part_number => $biblio->part_number() // '', |
100 |
part_number => $biblio->part_number() // '', |
| 101 |
part_name => $biblio->part_name() // '', |
101 |
part_name => $biblio->part_name() // '', |
| 102 |
author => $biblio->author(), |
102 |
author => $biblio->author(), |
| 103 |
reserve_id => $h->reserve_id(), |
103 |
reserve_id => $h->reserve_id(), |
| 104 |
branchcode => $h->branch()->branchname(), |
104 |
branchcode => $h->branch()->branchname(), |
| 105 |
branches => $libraries, |
105 |
branches => $libraries, |
| 106 |
desk_name => $desk_name, |
106 |
desk_name => $desk_name, |
| 107 |
reservedate => $h->reservedate(), |
107 |
reservedate => $h->reservedate(), |
| 108 |
expirationdate => $h->expirationdate(), |
108 |
expirationdate => $h->expirationdate(), |
| 109 |
suspend => $h->suspend(), |
109 |
suspend => $h->suspend(), |
| 110 |
suspend_until => $h->suspend_until(), |
110 |
suspend_until => $h->suspend_until(), |
| 111 |
found => $h->found(), |
111 |
found => $h->found(), |
| 112 |
waiting => $h->is_waiting(), |
112 |
waiting => $h->is_waiting(), |
| 113 |
waiting_at => $h->branch()->branchname(), |
113 |
waiting_at => $h->branch()->branchname(), |
| 114 |
waiting_here => $h->branch()->branchcode() eq $branch, |
114 |
waiting_here => $h->branch()->branchcode() eq $branch, |
| 115 |
priority => $h->priority(), |
115 |
priority => $h->priority(), |
| 116 |
reservenotes => $h->reservenotes(), |
116 |
reservenotes => $h->reservenotes(), |
| 117 |
itemtype_limit => $itemtype_limit, |
117 |
itemtype_limit => $itemtype_limit, |
| 118 |
reservedate_formatted => $h->reservedate() ? output_pref( |
118 |
reservedate_formatted => $h->reservedate() |
| 119 |
{ dt => dt_from_string( $h->reservedate() ), dateonly => 1 } |
119 |
? output_pref( { dt => dt_from_string( $h->reservedate() ), dateonly => 1 } ) |
| 120 |
) |
|
|
| 121 |
: q{}, |
120 |
: q{}, |
| 122 |
suspend_until_formatted => $h->suspend_until() ? output_pref( |
121 |
suspend_until_formatted => $h->suspend_until() |
| 123 |
{ dt => dt_from_string( $h->suspend_until() ), dateonly => 1 } |
122 |
? output_pref( { dt => dt_from_string( $h->suspend_until() ), dateonly => 1 } ) |
| 124 |
) |
|
|
| 125 |
: q{}, |
123 |
: q{}, |
| 126 |
expirationdate_formatted => $h->expirationdate() ? output_pref( |
124 |
expirationdate_formatted => $h->expirationdate() |
| 127 |
{ dt => dt_from_string( $h->expirationdate() ), dateonly => 1 } |
125 |
? output_pref( { dt => dt_from_string( $h->expirationdate() ), dateonly => 1 } ) |
| 128 |
) |
|
|
| 129 |
: q{}, |
126 |
: q{}, |
| 130 |
}; |
127 |
}; |
| 131 |
|
128 |
|
| 132 |
- |
|
|