|
Lines 76-81
my $sql = '
Link Here
|
| 76 |
itemnumber, |
76 |
itemnumber, |
| 77 |
barcode, |
77 |
barcode, |
| 78 |
itemnotes, |
78 |
itemnotes, |
|
|
79 |
itemnotes_nonpublic, |
| 79 |
itemcallnumber, |
80 |
itemcallnumber, |
| 80 |
replacementprice, |
81 |
replacementprice, |
| 81 |
|
82 |
|
|
Lines 146-161
while ( my $c = $sth->fetchrow_hashref() ) {
Link Here
|
| 146 |
GetRenewCount( $c->{borrowernumber}, $c->{itemnumber} ); |
147 |
GetRenewCount( $c->{borrowernumber}, $c->{itemnumber} ); |
| 147 |
|
148 |
|
| 148 |
my $checkout = { |
149 |
my $checkout = { |
| 149 |
DT_RowId => $c->{itemnumber} . '-' . $c->{borrowernumber}, |
150 |
DT_RowId => $c->{itemnumber} . '-' . $c->{borrowernumber}, |
| 150 |
title => $c->{title}, |
151 |
title => $c->{title}, |
| 151 |
author => $c->{author}, |
152 |
author => $c->{author}, |
| 152 |
barcode => $c->{barcode}, |
153 |
barcode => $c->{barcode}, |
| 153 |
itemtype => $item_level_itypes ? $c->{itype} : $c->{itemtype}, |
154 |
itemtype => $item_level_itypes ? $c->{itype} : $c->{itemtype}, |
| 154 |
itemtype_description => $item_level_itypes ? $c->{itype_description} : $c->{itemtype_description}, |
155 |
itemtype_description => $item_level_itypes ? $c->{itype_description} : $c->{itemtype_description}, |
| 155 |
location => $c->{location} ? GetAuthorisedValueByCode( 'LOC', $c->{location} ) : q{}, |
156 |
location => $c->{location} ? GetAuthorisedValueByCode( 'LOC', $c->{location} ) : q{}, |
| 156 |
itemnotes => $c->{itemnotes}, |
157 |
itemnotes => $c->{itemnotes}, |
| 157 |
branchcode => $c->{branchcode}, |
158 |
itemnotes_nonpublic => $c->{itemnotes_nonpublic}, |
| 158 |
branchname => $c->{branchname}, |
159 |
branchcode => $c->{branchcode}, |
|
|
160 |
branchname => $c->{branchname}, |
| 159 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
161 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
| 160 |
charge => $charge, |
162 |
charge => $charge, |
| 161 |
fine => $fine, |
163 |
fine => $fine, |
|
Lines 170-176
while ( my $c = $sth->fetchrow_hashref() ) {
Link Here
|
| 170 |
date_due => $c->{date_due}, |
172 |
date_due => $c->{date_due}, |
| 171 |
date_due_overdue => $c->{date_due_overdue} ? JSON::true : JSON::false, |
173 |
date_due_overdue => $c->{date_due_overdue} ? JSON::true : JSON::false, |
| 172 |
timestamp => $c->{timestamp}, |
174 |
timestamp => $c->{timestamp}, |
| 173 |
onsite_checkout => $c->{onsite_checkout}, |
175 |
onsite_checkout => $c->{onsite_checkout}, |
| 174 |
renewals_count => $renewals_count, |
176 |
renewals_count => $renewals_count, |
| 175 |
renewals_allowed => $renewals_allowed, |
177 |
renewals_allowed => $renewals_allowed, |
| 176 |
renewals_remaining => $renewals_remaining, |
178 |
renewals_remaining => $renewals_remaining, |
|
Lines 186-198
while ( my $c = $sth->fetchrow_hashref() ) {
Link Here
|
| 186 |
as_due_date => 1 |
188 |
as_due_date => 1 |
| 187 |
} |
189 |
} |
| 188 |
), |
190 |
), |
| 189 |
subtitle => GetRecordValue( |
191 |
subtitle => |
| 190 |
'subtitle', |
192 |
GetRecordValue( 'subtitle', GetMarcBiblio( $c->{biblionumber} ), GetFrameworkCode( $c->{biblionumber} ) ), |
| 191 |
GetMarcBiblio( $c->{biblionumber} ), |
193 |
lost => $c->{itemlost} ? GetAuthorisedValueByCode( 'LOST', $c->{itemlost} ) : undef, |
| 192 |
GetFrameworkCode( $c->{biblionumber} ) |
194 |
damaged => $c->{damaged} ? GetAuthorisedValueByCode( 'DAMAGED', $c->{damaged} ) : undef, |
| 193 |
), |
|
|
| 194 |
lost => $c->{itemlost} ? GetAuthorisedValueByCode( 'LOST', $c->{itemlost} ) : undef, |
| 195 |
damaged => $c->{damaged} ? GetAuthorisedValueByCode( 'DAMAGED', $c->{damaged} ) : undef, |
| 196 |
borrower => { |
195 |
borrower => { |
| 197 |
surname => $c->{surname}, |
196 |
surname => $c->{surname}, |
| 198 |
firstname => $c->{firstname}, |
197 |
firstname => $c->{firstname}, |
| 199 |
- |
|
|