|
Lines 138-144
use Koha::Acquisition::Orders;
Link Here
|
| 138 |
use Koha::Acquisition::Baskets; |
138 |
use Koha::Acquisition::Baskets; |
| 139 |
use C4::Barcodes; |
139 |
use C4::Barcodes; |
| 140 |
use Koha::DateUtils qw( dt_from_string ); |
140 |
use Koha::DateUtils qw( dt_from_string ); |
| 141 |
|
141 |
use Koha::BiblioFrameworks; |
| 142 |
use Koha::AdditionalFields; |
142 |
use Koha::AdditionalFields; |
| 143 |
|
143 |
|
| 144 |
### "-------------------- addorder.pl ----------" |
144 |
### "-------------------- addorder.pl ----------" |
|
Lines 323-330
if ( $basket->{is_standing} || $orderinfo->{quantity} ne '0' ) {
Link Here
|
| 323 |
} |
323 |
} |
| 324 |
C4::Acquisition::FillWithDefaultValues( $record ); |
324 |
C4::Acquisition::FillWithDefaultValues( $record ); |
| 325 |
|
325 |
|
| 326 |
# create the record in catalogue, with framework '' |
326 |
# create the record in catalogue |
| 327 |
my ($biblionumber,$bibitemnum) = AddBiblio($record,''); |
327 |
my $default_framework = |
|
|
328 |
Koha::BiblioFrameworks->get_default ? Koha::BiblioFrameworks->get_default->frameworkcode : ''; |
| 329 |
my ( $biblionumber, $bibitemnum ) = AddBiblio( $record, $default_framework ); |
| 328 |
|
330 |
|
| 329 |
$orderinfo->{biblionumber}=$biblionumber; |
331 |
$orderinfo->{biblionumber}=$biblionumber; |
| 330 |
} |
332 |
} |
| 331 |
- |
|
|