+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['080', 'a', '!=', '12345']],
+ record_type => 'bibs',
+ }
+ );
+ is( $record, undef, "Record condition \"080a!=12345\" should not match" );
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['080', 'a', '>', '1234']],
+ record_type => 'bibs',
+ }
+ );
+ ok( $record, "Record condition \"080a>1234\" should match" );
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['080', 'a', '<', '123456']],
+ record_type => 'bibs',
+ }
+ );
+ ok( $record, "Record condition \"080a<123456\" should match" );
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['080', 'a', '>', '123456']],
+ record_type => 'bibs',
+ }
+ );
+ is( $record, undef, "Record condition \"080a>123456\" should not match" );
+
+
+ ## Multiple subfields
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['035', 'a', '!=', 'TEST(12345)']],
+ record_type => 'bibs',
+ }
+ );
+ ok( $record, "Record condition \"035a!=TEST(12345)\" should match" );
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['035', 'a', '=', 'TEST(1234)']],
+ record_type => 'bibs',
+ }
+ );
+ is( $record, undef, "Record condition \"035a=TEST(1234)\" should not match" ); # Since matching all subfields required
+
+
+ ## Multiple conditions
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['035', 'a', '!=', 'TEST(12345)'], ['080', 'a', '>', '1234']],
+ record_type => 'bibs',
+ }
+ );
+ ok( $record, "Record condition \"035a!=TEST(12345),080a>1234\" should match" );
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['035', 'a', '!=', 'TEST(12345)'], ['080', 'a', '<', '1234']],
+ record_type => 'bibs',
+ }
+ );
+ is( $record, undef, "Record condition \"035a!=TEST(12345),080a<1234\" should not match" );
+
+
+ ## exists/not_exists
+
+ $record = Koha::Exporter::Record::_get_record_for_export(
+ {
+ record_id => $biblionumber,
+ record_conditions => [['035', 'a', '?']],
+ record_type => 'bibs',
+ }
+ );
+ ok( $record, "Record condition \"exists(035a)\" should match" );