|
Lines 8-14
use POSIX qw(strftime);
Link Here
|
| 8 |
|
8 |
|
| 9 |
use C4::Bookseller qw( GetBookSellerFromId ); |
9 |
use C4::Bookseller qw( GetBookSellerFromId ); |
| 10 |
|
10 |
|
| 11 |
use Test::More tests => 87; |
11 |
use Test::More tests => 90; |
| 12 |
|
12 |
|
| 13 |
BEGIN { |
13 |
BEGIN { |
| 14 |
use_ok('C4::Acquisition'); |
14 |
use_ok('C4::Acquisition'); |
|
Lines 369-374
my @expectedfields = qw(
Link Here
|
| 369 |
quantity_to_receive |
369 |
quantity_to_receive |
| 370 |
subtotal |
370 |
subtotal |
| 371 |
latesince |
371 |
latesince |
|
|
372 |
cancellationreason |
| 372 |
); |
373 |
); |
| 373 |
( |
374 |
( |
| 374 |
$test_missing_fields, $test_extra_fields, |
375 |
$test_missing_fields, $test_extra_fields, |
|
Lines 481-486
my @base_expectedfields = qw(
Link Here
|
| 481 |
frameworkcode |
482 |
frameworkcode |
| 482 |
volumedesc |
483 |
volumedesc |
| 483 |
datecancellationprinted |
484 |
datecancellationprinted |
|
|
485 |
cancellationreason |
| 484 |
); |
486 |
); |
| 485 |
@expectedfields = |
487 |
@expectedfields = |
| 486 |
( @base_expectedfields, |
488 |
( @base_expectedfields, |
|
Lines 608-613
ok(
Link Here
|
| 608 |
budget_id |
610 |
budget_id |
| 609 |
authorisedby |
611 |
authorisedby |
| 610 |
booksellerid |
612 |
booksellerid |
|
|
613 |
cancellationreason |
| 611 |
); |
614 |
); |
| 612 |
|
615 |
|
| 613 |
# note that authorisedby was added to the return of SearchOrder by the |
616 |
# note that authorisedby was added to the return of SearchOrder by the |
| 614 |
- |
|
|