Lines 31-37
use C4::Suggestions qw( GetSuggestion GetSuggestionInfoFromBiblionumber GetSugge
Link Here
|
31 |
use Koha::Biblios; |
31 |
use Koha::Biblios; |
32 |
use Koha::Acquisition::Baskets; |
32 |
use Koha::Acquisition::Baskets; |
33 |
use Koha::Acquisition::Booksellers; |
33 |
use Koha::Acquisition::Booksellers; |
34 |
use Koha::Acquisition::Contracts; |
|
|
35 |
use Koha::Acquisition::Orders; |
34 |
use Koha::Acquisition::Orders; |
36 |
use Koha::Libraries; |
35 |
use Koha::Libraries; |
37 |
use C4::Letters qw( SendAlerts ); |
36 |
use C4::Letters qw( SendAlerts ); |
Lines 400-407
if ( $op eq 'list' ) {
Link Here
|
400 |
push @cancelledorders_loop, $line; |
399 |
push @cancelledorders_loop, $line; |
401 |
} |
400 |
} |
402 |
|
401 |
|
403 |
my $contract = Koha::Acquisition::Contracts->find( $basket->{contractnumber} ); |
|
|
404 |
|
405 |
if ( $basket->{basketgroupid} ) { |
402 |
if ( $basket->{basketgroupid} ) { |
406 |
$basketgroup = GetBasketgroup( $basket->{basketgroupid} ); |
403 |
$basketgroup = GetBasketgroup( $basket->{basketgroupid} ); |
407 |
} |
404 |
} |
Lines 418-431
if ( $op eq 'list' ) {
Link Here
|
418 |
my $edi_order = $basket_obj->edi_order; |
415 |
my $edi_order = $basket_obj->edi_order; |
419 |
|
416 |
|
420 |
$template->param( |
417 |
$template->param( |
421 |
basketno => $basketno, |
418 |
basketno => $basketno, |
422 |
basket => $basket, |
419 |
basket => $basket, # FIXME Remove basket_obj and use the Koha::Acq::Basket object in the template |
|
|
420 |
basket_obj => $basket_obj, |
423 |
basketname => $basket->{'basketname'}, |
421 |
basketname => $basket->{'basketname'}, |
424 |
basketbranchcode => $basket->{branch}, |
422 |
basketbranchcode => $basket->{branch}, |
425 |
basketnote => $basket->{note}, |
423 |
basketnote => $basket->{note}, |
426 |
basketbooksellernote => $basket->{booksellernote}, |
424 |
basketbooksellernote => $basket->{booksellernote}, |
427 |
basketcontractno => $basket->{contractnumber}, |
|
|
428 |
basketcontractname => $contract->contractname, |
429 |
branches_loop => \@branches_loop, |
425 |
branches_loop => \@branches_loop, |
430 |
creationdate => $basket->{creationdate}, |
426 |
creationdate => $basket->{creationdate}, |
431 |
edi_order => $edi_order, |
427 |
edi_order => $edi_order, |