|
Lines 65-71
BEGIN {
Link Here
|
| 65 |
&GetKohaAuthorisedValuesMapping |
65 |
&GetKohaAuthorisedValuesMapping |
| 66 |
&GetKohaAuthorisedValueLib |
66 |
&GetKohaAuthorisedValueLib |
| 67 |
&GetAuthorisedValueByCode |
67 |
&GetAuthorisedValueByCode |
| 68 |
&GetKohaImageurlFromAuthorisedValues |
|
|
| 69 |
&GetAuthValCode |
68 |
&GetAuthValCode |
| 70 |
&AddAuthorisedValue |
69 |
&AddAuthorisedValue |
| 71 |
&GetNormalizedUPC |
70 |
&GetNormalizedUPC |
|
Lines 1077-1101
sub displayServers {
Link Here
|
| 1077 |
return \@primaryserverloop; |
1076 |
return \@primaryserverloop; |
| 1078 |
} |
1077 |
} |
| 1079 |
|
1078 |
|
| 1080 |
|
|
|
| 1081 |
=head2 GetKohaImageurlFromAuthorisedValues |
| 1082 |
|
| 1083 |
$authhorised_value = GetKohaImageurlFromAuthorisedValues( $category, $authvalcode ); |
| 1084 |
|
| 1085 |
Return the first url of the authorised value image represented by $lib. |
| 1086 |
|
| 1087 |
=cut |
| 1088 |
|
| 1089 |
sub GetKohaImageurlFromAuthorisedValues { |
| 1090 |
my ( $category, $lib ) = @_; |
| 1091 |
my $dbh = C4::Context->dbh; |
| 1092 |
my $sth = $dbh->prepare("SELECT imageurl FROM authorised_values WHERE category=? AND lib =?"); |
| 1093 |
$sth->execute( $category, $lib ); |
| 1094 |
while ( my $data = $sth->fetchrow_hashref ) { |
| 1095 |
return $data->{'imageurl'}; |
| 1096 |
} |
| 1097 |
} |
| 1098 |
|
| 1099 |
=head2 GetAuthValCode |
1079 |
=head2 GetAuthValCode |
| 1100 |
|
1080 |
|
| 1101 |
$authvalcode = GetAuthValCode($kohafield,$frameworkcode); |
1081 |
$authvalcode = GetAuthValCode($kohafield,$frameworkcode); |