|
Lines 23-28
use C4::Koha qw( GetAuthorisedValues );
Link Here
|
| 23 |
use C4::ClassSource qw( GetClassSources ); |
23 |
use C4::ClassSource qw( GetClassSources ); |
| 24 |
|
24 |
|
| 25 |
use Koha::DateUtils qw( dt_from_string ); |
25 |
use Koha::DateUtils qw( dt_from_string ); |
|
|
26 |
use Koha::I18N; |
| 26 |
use Koha::Libraries; |
27 |
use Koha::Libraries; |
| 27 |
|
28 |
|
| 28 |
=head1 NAME |
29 |
=head1 NAME |
|
Lines 206-221
sub generate_subfield_form {
Link Here
|
| 206 |
push @authorised_values, ""; |
207 |
push @authorised_values, ""; |
| 207 |
my $itemtypes; |
208 |
my $itemtypes; |
| 208 |
if ($branch_limit) { |
209 |
if ($branch_limit) { |
| 209 |
$itemtypes = Koha::ItemTypes->search_with_localization( |
210 |
$itemtypes = Koha::ItemTypes->search( |
| 210 |
{ branchcode => $branch_limit } ); |
211 |
{ branchcode => $branch_limit } ); |
| 211 |
} |
212 |
} |
| 212 |
else { |
213 |
else { |
| 213 |
$itemtypes = Koha::ItemTypes->search_with_localization; |
214 |
$itemtypes = Koha::ItemTypes->search; |
| 214 |
} |
215 |
} |
| 215 |
while ( my $itemtype = $itemtypes->next ) { |
216 |
while ( my $itemtype = $itemtypes->next ) { |
| 216 |
push @authorised_values, $itemtype->itemtype; |
217 |
push @authorised_values, $itemtype->itemtype; |
| 217 |
$authorised_lib{ $itemtype->itemtype } = |
218 |
$authorised_lib{ $itemtype->itemtype } = |
| 218 |
$itemtype->translated_description; |
219 |
db_t('itemtype', $itemtype->translation_key); |
| 219 |
} |
220 |
} |
| 220 |
|
221 |
|
| 221 |
if (!$value && $biblionumber) { |
222 |
if (!$value && $biblionumber) { |
| 222 |
- |
|
|