vhost/koha/marc.pl

search( 'author',       
        join_with(' ; ',
                rec('100','a'),
                rec('700','a')
        )
);
search( 'title', 
        join_with(' ',
                rec('245','a'),
                rec('245','b'),
                rec('245','c'),
        )
);
search( 'isbn',         rec('020','a') );
search( 'impressum',    
        join_with(' ',
                rec('260','a'),
                rec('260','b'),
                rec('260','c'), 
        )
);
if ( my $year = rec('008') ) {
        search( 'year',
                substr( $year,7,4 )
        ) if length($year) > 13;
}
search( 'keywords',
        join_with(' ; ',
                rec('653','a')
        )
);
search( 'biblionumber',
        rec('999','c')
);
1	search( 'author',
2	join_with(' ; ',
3	rec('100','a'),
4	rec('700','a')
5	)
6	);
7	search( 'title',
8	join_with(' ',
9	rec('245','a'),
10	rec('245','b'),
11	rec('245','c'),
12	)
13	);
14	search( 'isbn', rec('020','a') );
15	search( 'impressum',
16	join_with(' ',
17	rec('260','a'),
18	rec('260','b'),
19	rec('260','c'),
20	)
21	);
22	if ( my $year = rec('008') ) {
23	search( 'year',
24	substr( $year,7,4 )
25	) if length($year) > 13;
26	}
27	search( 'keywords',
28	join_with(' ; ',
29	rec('653','a')
30	)
31	);
32	search( 'biblionumber',
33	rec('999','c')
34	);