|
Lines 25-31
use C4::Auth;
Link Here
|
| 25 |
use C4::Koha; |
25 |
use C4::Koha; |
| 26 |
use C4::Biblio; |
26 |
use C4::Biblio; |
| 27 |
use C4::Circulation; |
27 |
use C4::Circulation; |
| 28 |
use C4::Dates qw/format_date/; |
|
|
| 29 |
use C4::Members; |
28 |
use C4::Members; |
| 30 |
|
29 |
|
| 31 |
use C4::Output; |
30 |
use C4::Output; |
|
Lines 89-96
foreach my $issue (@{$issues} ) {
Link Here
|
| 89 |
$line{title} = $issue->{'title'}; |
88 |
$line{title} = $issue->{'title'}; |
| 90 |
$line{author} = $issue->{'author'}; |
89 |
$line{author} = $issue->{'author'}; |
| 91 |
$line{itemcallnumber} = $issue->{'itemcallnumber'}; |
90 |
$line{itemcallnumber} = $issue->{'itemcallnumber'}; |
| 92 |
$line{date_due} = format_date( $issue->{'date_due'} ); |
91 |
$line{date_due} = $issue->{'date_due'}; |
| 93 |
$line{returndate} = format_date( $issue->{'returndate'} ); |
92 |
$line{returndate} = $issue->{'returndate'}; |
| 94 |
$line{volumeddesc} = $issue->{'volumeddesc'}; |
93 |
$line{volumeddesc} = $issue->{'volumeddesc'}; |
| 95 |
$issue->{'itemtype'} = C4::Context->preference('item-level_itypes') ? $issue->{'itype'} : $issue->{'itemtype'}; |
94 |
$issue->{'itemtype'} = C4::Context->preference('item-level_itypes') ? $issue->{'itype'} : $issue->{'itemtype'}; |
| 96 |
if($issue->{'itemtype'}) { |
95 |
if($issue->{'itemtype'}) { |
| 97 |
- |
|
|