350 |
$bib .= isis_to_bib($row,'701','%700+','ab',undef,'>',', '); |
$bib .= isis_to_bib($row,'701','%700+','ab',undef,'>',', '); |
351 |
$bib .= isis_to_bib($row,'701','%700+','cd',undef,'>',', '); |
$bib .= isis_to_bib($row,'701','%700+','cd',undef,'>',', '); |
352 |
|
|
353 |
my $tmp = isis_sf($row,'710','abc', '', '', (' : ',', ')); |
my $tmp; |
354 |
|
$tmp = isis_sf($row,'710','abc', '', '', (' : ',', ')); |
355 |
$tmp .= isis_sf($row,'710','dfe', ' (', ')', ('', ' ; ',' ; ')); |
$tmp .= isis_sf($row,'710','dfe', ' (', ')', ('', ' ; ',' ; ')); |
356 |
$bib .= "%700+ $tmp\n" if ($tmp); |
$bib .= "%700+ $tmp\n" if ($tmp); |
357 |
|
|
358 |
my $tmp = isis_sf($row,'711','abc', '', '', (' : ',', ')); |
$tmp = isis_sf($row,'711','abc', '', '', (' : ',', ')); |
359 |
$tmp .= isis_sf($row,'711','dfe', ' (', ')', ('', ' ; ',' ; ')); |
$tmp .= isis_sf($row,'711','dfe', ' (', ')', ('', ' ; ',' ; ')); |
360 |
$bib .= "%700+ $tmp\n" if ($tmp); |
$bib .= "%700+ $tmp\n" if ($tmp); |
361 |
|
|
395 |
$mps .= isis_to_mps($row,'233',2,"ae"); |
$mps .= isis_to_mps($row,'233',2,"ae"); |
396 |
|
|
397 |
|
|
|
my $tmp; |
|
398 |
$tmp = isis_sf($row,'230','v'). |
$tmp = isis_sf($row,'230','v'). |
399 |
isis_sf($row,'230','a',' : '). |
isis_sf($row,'230','a',' : '). |
400 |
isis_sf($row,'250',undef,'. - '). |
isis_sf($row,'250',undef,'. - '). |
480 |
$bib .= isis_to_bib($row,'610','%610'); |
$bib .= isis_to_bib($row,'610','%610'); |
481 |
$mps .= isis_to_mps($row,'610',8); |
$mps .= isis_to_mps($row,'610',8); |
482 |
|
|
483 |
$bib .= isis_to_bib($row,'675','%675+'); |
$bib .= isis_to_bib($row,'675','%675+','a'); |
484 |
$mps .= isis_to_mps($row,'675',9); |
$mps .= isis_to_mps($row,'675',9); |
485 |
$bib .= isis_to_bib($row,'686','%675+'); |
$bib .= isis_to_bib($row,'686','%675+','a'); |
486 |
$mps .= isis_to_mps($row,'686',10); |
$mps .= isis_to_mps($row,'686',10); |
487 |
|
|
488 |
$bib .= isis_to_bib($row,'990','%990'); |
$bib .= isis_to_bib($row,'990','%990'); |