Lines 69-74
CancelReceipt($ordernumber);
Link Here
|
69 |
my $order = GetOrder( $ordernumber ); |
69 |
my $order = GetOrder( $ordernumber ); |
70 |
is(scalar GetItemnumbersFromOrder($order->{ordernumber}), 0, "Create items on receiving: 0 item exist after cancelling a receipt"); |
70 |
is(scalar GetItemnumbersFromOrder($order->{ordernumber}), 0, "Create items on receiving: 0 item exist after cancelling a receipt"); |
71 |
|
71 |
|
|
|
72 |
$itemnumber = AddItem({}, $biblionumber); |
72 |
t::lib::Mocks::mock_preference('AcqCreateItem', 'ordering'); |
73 |
t::lib::Mocks::mock_preference('AcqCreateItem', 'ordering'); |
73 |
t::lib::Mocks::mock_preference('AcqItemSetSubfieldsWhenReceiptIsCancelled', '7=9'); # notforloan is mapped with 952$7 |
74 |
t::lib::Mocks::mock_preference('AcqItemSetSubfieldsWhenReceiptIsCancelled', '7=9'); # notforloan is mapped with 952$7 |
74 |
( undef, $ordernumber ) = C4::Acquisition::NewOrder( |
75 |
( undef, $ordernumber ) = C4::Acquisition::NewOrder( |
75 |
- |
|
|