|
Lines 230-241
$orderinfo->{'list_price'} ||= 0;
Link Here
|
| 230 |
$orderinfo->{'uncertainprice'} ||= 0; |
230 |
$orderinfo->{'uncertainprice'} ||= 0; |
| 231 |
$orderinfo->{subscriptionid} ||= undef; |
231 |
$orderinfo->{subscriptionid} ||= undef; |
| 232 |
|
232 |
|
| 233 |
my $basketno=$$orderinfo{basketno}; |
233 |
my $user = $input->remote_user; |
| 234 |
my $basket = GetBasket($basketno); |
234 |
my $basketno = $$orderinfo{basketno}; |
| 235 |
|
235 |
my $basket = Koha::Acquisition::Baskets->find($basketno); |
| 236 |
my $user = $input->remote_user; |
|
|
| 237 |
my $basketno=$$orderinfo{basketno}; |
| 238 |
my $basket = Koha::Acquisition::Baskets->find( $basketno ); |
| 239 |
|
236 |
|
| 240 |
# create, modify or delete biblio |
237 |
# create, modify or delete biblio |
| 241 |
# create if $quantity>0 and $existing='no' |
238 |
# create if $quantity>0 and $existing='no' |
| 242 |
- |
|
|