From d1898d95d5591226d226e055e155e31175ab9d10 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Thu, 4 Feb 2021 11:59:11 +0000 Subject: [PATCH] Bug 27589: Unit test Previous tests only covered CHECKIN, this adds a test for ITEM_INFORMATION Signed-off-by: Kyle M Hall Signed-off-by: Martin Renvoize --- t/db_dependent/SIP/Message.t | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) diff --git a/t/db_dependent/SIP/Message.t b/t/db_dependent/SIP/Message.t index 8315ccc7de..8d04fb30f6 100755 --- a/t/db_dependent/SIP/Message.t +++ b/t/db_dependent/SIP/Message.t @@ -199,7 +199,7 @@ subtest "Test build_additional_item_fields_string" => sub { }; subtest "Test cr_item_field" => sub { - plan tests => 1; + plan tests => 2; my $builder = t::lib::TestBuilder->new(); my $branchcode = $builder->build({ source => 'Branch' })->{branchcode}; @@ -253,6 +253,24 @@ subtest "Test cr_item_field" => sub { my $id = $item_object->id; ok( $response =~ m/CR$id/, "Found correct CR field in response"); + + $siprequest = ITEM_INFORMATION . 'YYYYMMDDZZZZHHMMSS' . + FID_INST_ID . $branchcode . '|'. + FID_ITEM_ID . $item_object->barcode . '|' . + FID_TERMINAL_PWD . 'ignored' . '|'; + undef $response; + $msg = C4::SIP::Sip::MsgType->new( $siprequest, 0 ); + + $mockILS->mock( 'find_item', sub { + return C4::SIP::ILS::Item->new( $item_object->barcode ); + }); + + $server->{account}->{cr_item_field} = 'itype'; + + $msg->handle_item_information( $server ); + + my $itype = $item_object->itype; + ok( $response =~ m/CR$itype/, "Found correct CR field in response"); }; subtest 'Patron info summary > 5 should not crash server' => sub { -- 2.20.1