|
Lines 23-29
use C4::CourseReserves qw/ModCourseItem ModCourseReserve DelCourseReserve GetCou
Link Here
|
| 23 |
use C4::Context; |
23 |
use C4::Context; |
| 24 |
use Koha::Items; |
24 |
use Koha::Items; |
| 25 |
|
25 |
|
| 26 |
use Test::More tests => 27; |
26 |
use Test::More tests => 28; |
| 27 |
|
27 |
|
| 28 |
BEGIN { |
28 |
BEGIN { |
| 29 |
require_ok('C4::CourseReserves'); |
29 |
require_ok('C4::CourseReserves'); |
|
Lines 157-162
DelCourseReserve( cr_id => $cr_id2 );
Link Here
|
| 157 |
$item = Koha::Items->find($itemnumber); |
157 |
$item = Koha::Items->find($itemnumber); |
| 158 |
is($item->ccode, '', 'Item ccode should be set back to empty'); |
158 |
is($item->ccode, '', 'Item ccode should be set back to empty'); |
| 159 |
|
159 |
|
|
|
160 |
subtest 'Ensure item info is preserved' => sub { |
| 161 |
plan tests => 8; |
| 162 |
|
| 163 |
my $course = $builder->build({ |
| 164 |
source => 'Course', |
| 165 |
value => { |
| 166 |
enabled => 'no', |
| 167 |
} |
| 168 |
}); |
| 169 |
my $item = $builder->build_sample_item({ ccode=>"grasshopper", location=>"transylvania"}); |
| 170 |
#Add course item but change nothing |
| 171 |
my $course_item_id = ModCourseItem( |
| 172 |
itemnumber => $item->itemnumber, |
| 173 |
itype => '', |
| 174 |
ccode => '', |
| 175 |
holdingbranch => '', |
| 176 |
location => '', |
| 177 |
); |
| 178 |
#Add course reserve |
| 179 |
my $course_reserve_id = ModCourseReserve( |
| 180 |
course_id => $course->{course_id}, |
| 181 |
ci_id => $course_item_id, |
| 182 |
staff_note => '', |
| 183 |
public_note => '', |
| 184 |
); |
| 185 |
#Remove course reservei |
| 186 |
DelCourseReserve( cr_id => $course_reserve_id ); |
| 187 |
my $item_after = Koha::Items->find( $item->itemnumber ); |
| 188 |
is( $item->itype, $item_after->itype, "Itemtype is unchanged after adding to and removing from course reserves for inactive course"); |
| 189 |
is( $item->location, $item_after->location, "Location is unchanged after adding to and removing from course reserves for inactive course"); |
| 190 |
is( $item->holdingbranch, $item_after->holdingbranch, "Holdingbranch is unchanged after adding to and removing from course reserves for inactive course"); |
| 191 |
is( $item->ccode, $item_after->ccode, "Collection is unchanged after adding to and removing from course reserves for inactive course"); |
| 192 |
|
| 193 |
$course = $builder->build({ |
| 194 |
source => 'Course', |
| 195 |
value => { |
| 196 |
enabled => 'yes', |
| 197 |
} |
| 198 |
}); |
| 199 |
$item = $builder->build_sample_item({ ccode=>"grasshopper", location=>"transylvania"}); |
| 200 |
#Add course item but change nothing |
| 201 |
$course_item_id = ModCourseItem( |
| 202 |
itemnumber => $item->itemnumber, |
| 203 |
itype => '', |
| 204 |
ccode => '', |
| 205 |
holdingbranch => '', |
| 206 |
location => '', |
| 207 |
); |
| 208 |
#Add course reserve |
| 209 |
$course_reserve_id = ModCourseReserve( |
| 210 |
course_id => $course->{course_id}, |
| 211 |
ci_id => $course_item_id, |
| 212 |
staff_note => '', |
| 213 |
public_note => '', |
| 214 |
); |
| 215 |
#Remove course reserve |
| 216 |
DelCourseReserve( cr_id => $course_reserve_id ); |
| 217 |
$item_after = Koha::Items->find( $item->itemnumber ); |
| 218 |
is( $item->itype, $item_after->itype, "Itemtype is unchanged after adding to and removing from course reserves for inactive course"); |
| 219 |
is( $item->location, $item_after->location, "Location is unchanged after adding to and removing from course reserves for inactive course"); |
| 220 |
is( $item->holdingbranch, $item_after->holdingbranch, "Holdingbranch is unchanged after adding to and removing from course reserves for inactive course"); |
| 221 |
is( $item->ccode, $item_after->ccode, "Collection is unchanged after adding to and removing from course reserves for inactive course"); |
| 222 |
|
| 223 |
}; |
| 224 |
|
| 225 |
|
| 226 |
|
| 227 |
|
| 228 |
|
| 160 |
$schema->storage->txn_rollback; |
229 |
$schema->storage->txn_rollback; |
| 161 |
|
230 |
|
| 162 |
sub create_dependent_objects { |
231 |
sub create_dependent_objects { |
| 163 |
- |
|
|