97 |
# postoji modify -> drugi ISBN počinje prefixom "ISBN" koji se miče (sfb) |
# postoji modify -> drugi ISBN počinje prefixom "ISBN" koji se miče (sfb) |
98 |
|
|
99 |
marc('020','a', |
marc('020','a', |
100 |
regex('s/ ISBN //g', |
regex('s/\s*[\\r\\n]+\s*\**\s*/ ; /g', |
101 |
rec('10') |
rec('10') |
102 |
) |
) |
103 |
); |
); |
168 |
#_debug(2); |
#_debug(2); |
169 |
|
|
170 |
marc_repeatable_subfield('041','a', |
marc_repeatable_subfield('041','a', |
171 |
rec('101') |
lc( rec('101') ) |
172 |
); |
); |
173 |
|
|
174 |
#_debug(0); |
#_debug(0); |
321 |
|
|
322 |
marc_compose('245', |
marc_compose('245', |
323 |
'a', suffix( |
'a', suffix( |
324 |
( ! ( rec('200','d') || rec('200','e') || rec('200','k') ) ) && ( rec('200','f') ) ? ' / ' : |
( ! ( rec('200','d') || rec('200','e') || rec('200','k') ) ) && ( rec('200','f') ) ? ' /' : |
325 |
( rec('200','d') ) ? ' = ' : |
( rec('200','d') ) ? ' =' : |
326 |
( rec('200','e') ) ? ' : ' : |
( rec('200','e') ) ? ' :' : |
327 |
( rec('200','k') ) ? ' ; ' : |
( rec('200','k') ) ? ' ;' : |
328 |
'', |
'', |
329 |
rec('200','a'), |
rec('200','a'), |
330 |
), |
), |
331 |
'b', suffix( |
'b', suffix( |
332 |
( rec('200','d') && rec('200','f') ) ? ' / ' : |
( rec('200','d') && rec('200','f') ) ? ' /' : |
333 |
( rec('200','d') && rec('200','c') ) ? '. ' : |
( rec('200','d') && rec('200','c') ) ? '.' : |
334 |
'', |
'', |
335 |
rec('200','d'), |
rec('200','d'), |
336 |
), |
), |
337 |
'b', suffix( |
'b', suffix( |
338 |
( rec('200','e') && rec('200','f') ) ? ' / ' : |
( rec('200','e') && rec('200','f') ) ? ' /' : |
339 |
( rec('200','e') && rec('200','c') ) ? '. ' : |
( rec('200','e') && rec('200','c') ) ? '.' : |
340 |
'', |
'', |
341 |
rec('200','e'), |
rec('200','e'), |
342 |
), |
), |
343 |
'b', suffix( |
'b', suffix( |
344 |
( rec('200','k') && rec('200','f') ) ? ' / ' : |
( rec('200','k') && rec('200','f') ) ? ' /' : |
345 |
( rec('200','k') && rec('200','c') ) ? '. ' : |
( rec('200','k') && rec('200','c') ) ? '.' : |
346 |
'', |
'', |
347 |
rec('200','k'), |
rec('200','k'), |
348 |
), |
), |
349 |
'c', suffix( |
'c', suffix( |
350 |
( rec('200','f') && rec('200','c') ) ? '. ' : |
( rec('200','f') && rec('200','c') ) ? '.' : |
351 |
'', |
'', |
352 |
rec('200','f'), |
rec('200','f'), |
353 |
), |
), |
354 |
'+', rec('200','c'), |
'+', suffix('.', |
355 |
|
rec('200','c'), |
356 |
|
), |
357 |
); |
); |
358 |
|
|
359 |
#marc_compose('245', |
#marc_compose('245', |
849 |
} else { |
} else { |
850 |
|
|
851 |
$series = join_with('', |
$series = join_with('', |
852 |
config(), |
uc( config() ), |
853 |
'LS', |
' LS', |
854 |
rec('000') |
rec('000') |
855 |
); |
); |
856 |
|
|