|
Lines 98-114
sub GetAuthMARCFromKohaField {
Link Here
|
| 98 |
|
98 |
|
| 99 |
=head2 SearchAuthorities |
99 |
=head2 SearchAuthorities |
| 100 |
|
100 |
|
| 101 |
(\@finalresult, $nbresults)= &SearchAuthorities($tags, $and_or, |
101 |
( \@finalresult, $nbresults ) = &SearchAuthorities( |
| 102 |
$excluding, $operator, $value, $offset,$length,$authtypecode, |
102 |
$tags, undef, undef, $operator, $value, $offset, $length, |
| 103 |
$sortby[, $skipmetadata]) |
103 |
$authtypecode, $sortby[, $skipmetadata] ) |
| 104 |
|
104 |
|
| 105 |
returns ref to array result and count of results returned |
105 |
returns ref to array result and count of results returned |
| 106 |
|
106 |
|
| 107 |
=cut |
107 |
=cut |
| 108 |
|
108 |
|
| 109 |
sub SearchAuthorities { |
109 |
sub SearchAuthorities { |
| 110 |
my ($tags, $and_or, $excluding, $operator, $value, $offset,$length,$authtypecode,$sortby,$skipmetadata) = @_; |
110 |
my ( $tags, undef, undef, $operator, $value, $offset, $length, $authtypecode, $sortby, $skipmetadata) = @_; # NOTE: Parameter 2 (and_or) and 3 (excluding) were not used. |
| 111 |
# warn Dumper($tags, $and_or, $excluding, $operator, $value, $offset,$length,$authtypecode,$sortby); |
|
|
| 112 |
my $dbh=C4::Context->dbh; |
111 |
my $dbh=C4::Context->dbh; |
| 113 |
$sortby="" unless $sortby; |
112 |
$sortby="" unless $sortby; |
| 114 |
my $query; |
113 |
my $query; |
| 115 |
- |
|
|