--- trunk/conf/normalize/mapping.pl	2006/07/05 00:12:08	583
+++ trunk/conf/normalize/mapping.pl	2006/07/10 10:16:11	595
@@ -1,6 +1,10 @@
+if ( rec('200','a') ) {
+
 # Leader
+#
+# raspraviti 17,18
 
-if ( rec('200','a') ) {
+# u nekim knjižnicama koristi se 999a i 999b
 
 if ( rec('999') && first(rec('999')) =~ m/pregledan/i) {
 	marc_leader('05','c');
@@ -8,11 +12,9 @@
 	marc_leader('05','n');
 }
 
-marc_leader('06','a');
-
-marc_leader('07','m');
-
-marc_leader('18','i');
+	marc_leader('06','a');
+	marc_leader('07','m');
+	marc_leader('18','i');
 
 if ( rec('230') ) {
 	marc_leader('19','r');
@@ -23,9 +25,15 @@
 
 # polje 035 je u NSK ponovljivo. zašto ???
 
+# privemeno koristimo 0356 umjesto 0359
 
 marc('035','6',
-	prefix( 
+	join_with(' ',
+#		config('input normalize path'),
+		config('name'),
+		config('input name'),
+		config(),
+		id(),
 		rec('994','a'),
 		rec('000')
 	)
@@ -34,15 +42,17 @@
 # u marc 035a treba dodati System Number - 
 # NSK zapisuje Voyagerov ID (001) - kako ???
 
+# u FFSF bazama postoji nekoliko zaredanih ISBN, odvojenih s '. - '
+
 marc('020','a',
 	rec('010')
 );
 
 # u polje 040a možda još dodati prefiks HR
-# NSK ima HR NSB (možda u novijim zapisima ima NSK)
+# NSK ima HR NSB (možda u novijim zapisima ima NSK?)
 
 marc('040','a',
-	rec('801')
+	'FFZG'
 );
 
 marc('040','b',
@@ -61,6 +71,8 @@
 
 marc_indicators('245', 0, 0);
 
+#_debug(3);
+
 marc_compose('245',
 	'a', rec('200','a'),
 	'h', rec('200','b'),
@@ -76,6 +88,8 @@
 	),
 );
 
+#_debug(0);
+
 # marc('245','a',
 # 	rec('200','a')
 # );
@@ -165,7 +179,7 @@
 
 marc_indicators('505', '0', ' ');
 marc('505','a',
-	regex('s/\\r\\n\\r\\n|\\r\\n/ ; /g',
+	regex('s/\s*[\\r\\n]+\s*\**\s*/ ; /g',
 		rec('327')
 	)
 );
@@ -177,7 +191,7 @@
 # FFPS koristi 330 (NP) - sažetak
 
 marc('520','a',
-	regex('s/\\r\\n\\r\\n|\\r\\n/. /g',
+	regex('s/[\\r\\n]+/. /g',
 		rec('330')
 	)
 );
@@ -328,6 +342,7 @@
 marc_duplicate();
 
 marc_remove('245');
+marc_remove('035','6');
 
 marc('245','a',
 	rec('230','a')