|
Lines 29-35
use C4::Output;
Link Here
|
| 29 |
use C4::Dates qw/format_date/; |
29 |
use C4::Dates qw/format_date/; |
| 30 |
use C4::Debug; |
30 |
use C4::Debug; |
| 31 |
use C4::Branch; # XXX subfield_is_koha_internal_p |
31 |
use C4::Branch; # XXX subfield_is_koha_internal_p |
| 32 |
use C4::Koha qw/IsAuthorisedValueCategory/; |
32 |
use C4::Koha qw/IsAuthorisedValueCategory GetFrameworksLoop/; |
| 33 |
|
33 |
|
| 34 |
=head1 NAME |
34 |
=head1 NAME |
| 35 |
|
35 |
|
|
Lines 644-649
elsif ($phase eq 'Run this report'){
Link Here
|
| 644 |
$authorised_lib{$itemtype} = $description; |
644 |
$authorised_lib{$itemtype} = $description; |
| 645 |
} |
645 |
} |
| 646 |
} |
646 |
} |
|
|
647 |
elsif ( $authorised_value eq "biblio_framework" ) { |
| 648 |
my $frameworks = GetFrameworksLoop(); |
| 649 |
my $default_source = ''; |
| 650 |
push @authorised_values,$default_source; |
| 651 |
$authorised_lib{$default_source} = 'Default'; |
| 652 |
foreach my $framework (@$frameworks) { |
| 653 |
push @authorised_values, $framework->{value}; |
| 654 |
$authorised_lib{$framework->{value}} = $framework->{description}; |
| 655 |
} |
| 656 |
} |
| 647 |
elsif ( $authorised_value eq "cn_source" ) { |
657 |
elsif ( $authorised_value eq "cn_source" ) { |
| 648 |
my $class_sources = GetClassSources(); |
658 |
my $class_sources = GetClassSources(); |
| 649 |
my $default_source = C4::Context->preference("DefaultClassificationSource"); |
659 |
my $default_source = C4::Context->preference("DefaultClassificationSource"); |