Lines 54-60
exit 0;
Link Here
|
54 |
sub fetch_bib_framework { |
54 |
sub fetch_bib_framework { |
55 |
my $query = shift; |
55 |
my $query = shift; |
56 |
my $biblionumber = shift; |
56 |
my $biblionumber = shift; |
57 |
my $frameworkcode = GetFrameworkCode( $biblionumber ); |
57 |
my $frameworkcode = C4::Biblio::GetFrameworkCode( $biblionumber ); |
58 |
my $result = { |
58 |
my $result = { |
59 |
'frameworkcode' => $frameworkcode |
59 |
'frameworkcode' => $frameworkcode |
60 |
}; |
60 |
}; |
61 |
- |
|
|