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