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	dpavlin	1239	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	mglavica	1252	if ( my $year = rec('008') ) {
23			search( 'year',
24			substr( $year,7,4 )
25			) if length($year) > 13;
26			}
27	mglavica	1267
28
29	dpavlin	1239	search( 'keywords',
30			join_with(' ; ',
31			rec('653','a')
32			)
33			);
34			search( 'biblionumber',
35			rec('999','c')
36			);