2 # Item Information test
8 use Sip::Constants qw(:all);
9 use SIPtest qw(:basic :user1 :item1);
11 my $item_info_test_template = {
12 id => "Item Information: check info for available item ($item_barcode)",
13 msg => "1720060110 215612AO$instid|AB$item_barcode|",
14 pat => qr/^180[13]0201$datepat/, # status of 'other' or 'available'
16 $SIPtest::field_specs{(FID_SCREEN_MSG)},
17 $SIPtest::field_specs{(FID_PRINT_LINE)},
18 { field => FID_ITEM_ID,
19 pat => qr/^$item_barcode$/,
21 { field => FID_TITLE_ID,
22 pat => qr/^$item_title\s*$/,
24 { field => FID_MEDIA_TYPE,
28 pat => qr/^$item_owner$/,
35 $SIPtest::sc_status_test,
36 $item_info_test_template,
39 SIPtest::run_sip_tests(@tests);