Lines 79-86
is ( scalar( map { $_->{orderstatus} eq 'ordered' ? 1 : () } @orders ), 2, "2 or
Link Here
|
79 |
|
79 |
|
80 |
C4::Acquisition::ReopenBasket( $basketno ); |
80 |
C4::Acquisition::ReopenBasket( $basketno ); |
81 |
@orders = C4::Acquisition::GetOrders( $basketno ); |
81 |
@orders = C4::Acquisition::GetOrders( $basketno ); |
82 |
is ( scalar( map { $_->{orderstatus} eq 'ordered' ? 1 : () } @orders ), 0, "No order are ordered, the basket is reopen" ); |
82 |
is ( scalar( map { $_->{orderstatus} eq 'ordered' ? 1 : () } @orders ), 0, "No order is ordered, the basket is reopened" ); |
83 |
is ( scalar( map { $_->{orderstatus} eq 'new' ? 1 : () } @orders ), 2, "2 orders are new, the basket is reopen" ); |
83 |
is ( scalar( map { $_->{orderstatus} eq 'new' ? 1 : () } @orders ), 2, "2 orders are new, the basket is reopened" ); |
84 |
|
84 |
|
85 |
C4::Acquisition::DelOrder( $biblionumber1, $ordernumber1 ); |
85 |
C4::Acquisition::DelOrder( $biblionumber1, $ordernumber1 ); |
86 |
my ( $order ) = C4::Acquisition::GetOrders( $basketno, {cancelled => 1} ); |
86 |
my ( $order ) = C4::Acquisition::GetOrders( $basketno, {cancelled => 1} ); |
87 |
- |
|
|