r742@llin: dpavlin | 2006-06-30 01:21:24 +0200

[webpac2] / conf / normalize / mapping.pl

diff --git a/conf/normalize/mapping.pl b/conf/normalize/mapping.pl
index eb1dfd4..02f7ead 100644 (file)
--- a/conf/normalize/mapping.pl
+++ b/conf/normalize/mapping.pl
@@ -1,66 +1,68 @@
-marc21('001',
+marc('001',
        rec('000')
 );
 
-marc21('020','a',
+marc('020','a',
        rec('010')
 );
 
-marc21('101','a',
+marc_repeatable_subfield('041','a',
        rec('101')
 );
 
-marc21('245','a',
+marc_indicators('245', 0, 0);
+
+marc('245','a',
        rec('200','a')
 );
 
-marc21('245','b',
+marc('245','b',
        join_with(' : ',
                rec('200','d'),
                rec('200','e')
        )
 );
 
-marc21('245','c',
+marc('245','c',
        join_with(' ; ',
                rec('200','f'),
                rec('200','g')
        )
 );
 
-marc21('250','a',
+marc('250','a',
        rec('205','a')
 );
 
-marc21('260','a',
+marc('260','a',
        rec('210','a')
 );
 
-marc21('260','b',
+marc('260','b',
        rec('210','c')
 );
 
-marc21('260','c',
+marc('260','c',
        rec('210','d')
 );
 
-marc21('300','a',
+marc('300','a',
        rec('215','a')
 );
 
-marc21('300','b',
+marc('300','b',
        rec('215','c')
 );
 
-marc21('300','c',
+marc('300','c',
        rec('215','d')
 );
 
-marc21('300','e',
+marc('300','e',
        rec('215','e')
 );
 
-marc21('490','a',
+marc('490','a',
        join_with(' = ',
                rec('225','a'),
                join_with(" :  ",
@@ -73,30 +75,32 @@ marc21('490','a',
        )
 );
 
-marc21('490','v',
+marc('490','v',
        rec('225','v')
 );
 
-marc21('500','a',
+marc('500','a',
        rec('300')
 );
 
-marc21('504','a',
+marc('504','a',
        rec('320')
 );
 
-marc21('655','a',
+marc_indicators('655', ' ', 4);
+marc('655','a',
        rec('610')
 );
 
-marc21('100','a',
+marc_indicators('100', 0, ' ');
+marc('100','a',
        join_with(', ',
                rec('700', 'a'),
                rec('700', 'b')
        )
 );
 
-marc21('700','a',
+marc('700','a',
        join_with(', ',
                rec('701', 'a'),
                rec('701', 'b')
@@ -104,12 +108,12 @@ marc21('700','a',
 );
 
 if ( rec('701') ) { 
-       marc21('700','4', 
+       marc('700','4', 
                '070'
        ); 
 }
 
-marc21('700','a',
+marc('700','a',
        join_with(', ',
                rec('702','a'),
                rec('702','b')
@@ -117,7 +121,7 @@ marc21('700','a',
 );
 
 if ( rec('702') ) {
-       marc21('700','4',
+       marc('700','4',
                '340'
        );
 }