Lines 17-27
sub fetch {
Link Here
|
17 |
return unless $ordernumber; |
17 |
return unless $ordernumber; |
18 |
my $schema = Koha::Database->new->schema; |
18 |
my $schema = Koha::Database->new->schema; |
19 |
|
19 |
|
20 |
my $rs = |
20 |
my $order = |
21 |
$schema->resultset('Aqorder')->search( { ordernumber => $ordernumber }, |
21 |
$schema->resultset('Aqorder')->find( { ordernumber => $ordernumber }, |
22 |
{ result_class => 'DBIx::Class::ResultClass::HashRefInflator' } ); |
22 |
{ result_class => 'DBIx::Class::ResultClass::HashRefInflator' } ); |
23 |
|
23 |
return $class->new( $order ); |
24 |
return $class->new( $rs->first ); |
|
|
25 |
} |
24 |
} |
26 |
|
25 |
|
27 |
sub insert { |
26 |
sub insert { |
28 |
- |
|
|