|
Lines 247-252
sub GetItemTypes {
Link Here
|
| 247 |
my ( %params ) = @_; |
247 |
my ( %params ) = @_; |
| 248 |
my $style = defined( $params{'style'} ) ? $params{'style'} : 'hash'; |
248 |
my $style = defined( $params{'style'} ) ? $params{'style'} : 'hash'; |
| 249 |
|
249 |
|
|
|
250 |
require C4::Languages; |
| 250 |
my $language = C4::Languages::getlanguage(); |
251 |
my $language = C4::Languages::getlanguage(); |
| 251 |
# returns a reference to a hash of references to itemtypes... |
252 |
# returns a reference to a hash of references to itemtypes... |
| 252 |
my %itemtypes; |
253 |
my %itemtypes; |
|
Lines 549-554
Defaults to intranet.
Link Here
|
| 549 |
sub getitemtypeinfo { |
550 |
sub getitemtypeinfo { |
| 550 |
my ($itemtype, $interface) = @_; |
551 |
my ($itemtype, $interface) = @_; |
| 551 |
my $dbh = C4::Context->dbh; |
552 |
my $dbh = C4::Context->dbh; |
|
|
553 |
require C4::Languages; |
| 552 |
my $language = C4::Languages::getlanguage(); |
554 |
my $language = C4::Languages::getlanguage(); |
| 553 |
my $it = $dbh->selectrow_hashref(q| |
555 |
my $it = $dbh->selectrow_hashref(q| |
| 554 |
SELECT |
556 |
SELECT |
| 555 |
- |
|
|