local
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 26 Oct 2008 15:58:55 +0000 (15:58 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 26 Oct 2008 15:58:55 +0000 (15:58 +0000)
git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1119 07558da8-63fa-0310-ba24-9fe276d99e06

conf/mjesec.yml
conf/modify/common.pl
conf/normalize/ff-libri.pl
conf/validate/ffge-libri
conf/validate/ffiz-libri
conf/validate/ffpo-libri
conf/validate/ffsf-librib [deleted file]
conf/validate/ffsf-librim [deleted file]

index a756e03..cba5074 100644 (file)
@@ -157,76 +157,49 @@ databases:
 #      - to: emerald
 #        credit: 5000
 
-
-#  'ffps':
-#    name: 'Knji¾nica Odsjeka za psihologiju'
-#    links:
-#      - to: ffps
-#        credit: 10000
-
-#  'drustvene':
-#    name: 'Katalog knji¾nica dru¹tvenih znanosti'
-#    links:
-#      - to: efzg
-#        credit: 10000
-#      - to: eizg
-#        credit: 10000
-#      - to: efos
-#        credit: 10000
-#      - to: irmo
-#        credit: 10000
-#      - to: hika
-#        credit: 10000
-#      - to: iztzg
-#        credit: 10000
-#      - to: jzav
-#        credit: 10000
-#      - to: ijf 
-#        credit: 10000
-   
-#  'ecasopisi':
-#    name: 'Katalog elektronièkih èasopisa'
-#    links:
-#      - to: emerald
-#        credit: 10000
-
-  ffan:
+  ang:
     name: 'Anglistika, Filozofski fakultet u Zagrebu'
     input:
       - name: mapirano 
         type: excel
-        path: '/data/isis_data/an/signature/an-mapirano-proba.xls'
+        path: '/data/isis_data/signature/an-mapirano.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: starasig 
         type: excel
-        path: '/data/isis_data/an/signature/an-stara_signatura.xls'
+        path: '/data/isis_data/signature/an-stara_signatura-plus.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-#        path: '/backup/isis_backup/A105-1/isisdata/latest/LIBRI/LIBRI'
         path: '/data/isis_data/lj2008/an/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/an.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-  #        - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librian.pl'
+          - path: 'conf/normalize/ffisis/librian2.pl'
 
-  ffar:
+  arh:
     name: 'Arheologija, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/ar-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-#        path: '/backup/isis_backup/A018-2/isisdata/latest/LIBRI/LIBRI'
         path: '/data/isis_data/lj2008/ar/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/ar.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/libriar.pl'
+          - path: 'conf/normalize/ffisis/libriar2.pl'
 
   ffet:
     name: 'Etnologija, Filozofski fakultet u Zagrebu'
@@ -240,7 +213,7 @@ databases:
           - path: 'conf/normalize/ff-libri.pl'
           - path: 'conf/normalize/ff-libri-svesci.pl'
 
-  fffi:
+  fil:
     name: 'Filozofija, Filozofski fakultet u Zagrebu'
     input:
 #      - name: sabrana
@@ -251,7 +224,7 @@ databases:
 #          - path: 'conf/normalize/xls2xls-min.pl'
       - name: mapirano 
         type: excel
-        path: '/data/isis_data/fi/signature/fi-mapirano.xls'
+        path: '/data/isis_data/signature/fi-mapirano.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
@@ -260,35 +233,56 @@ databases:
 #        path: '/backup/isis_backup/A102-1B/ISISDATA/latest/LIBRI/LIBRI'
         path: '/data/isis_data/lj2008/fi/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/fi.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librifi.pl'
+          - path: 'conf/normalize/ffisis/librifi2.pl'
 
-  fffo:
+  fon:
     name: 'Fonetika, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/fo-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/fo-stara_signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
 #        path: '/backup/isis_backup/novi-40162/ISISDATA/latest/LIBRI/LIBRI'
-        path: '/data/isis_data/fo/bkp/20080723/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/fo/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/fo.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
-
-  ffge:
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librifo.pl'
+          - path: 'conf/normalize/ffisis/librifo2.pl'
+  
+  ger:
     name: 'Germanistika, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/ge-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/novi-40166/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/ge/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/ge.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librige.pl'
+          - path: 'conf/normalize/ffisis/librige2.pl'
 
   ffhu:
     name: 'Hungarologija, Filozofski fakultet u Zagrebu'
@@ -302,107 +296,138 @@ databases:
           - path: 'conf/normalize/ff-libri.pl'
           - path: 'conf/normalize/ff-libri-svesci.pl'
 
-  ffiz:
+  izn:
     name: 'Informacijske znanosti, Filozofski fakultet u Zagrebu'
     input:
       - name: mapirano 
         type: excel
-        path: '/data/isis_data/iz/signature/iz-mapirano.xls'
+        path: '/data/isis_data/signature/iz-mapirano.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: starasig 
         type: excel
-        path: '/data/isis_data/iz/signature/stara-signatura.xls'
+        path: '/data/isis_data/signature/iz-stara-signatura.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A129-2/isisdata/latest/LIBRI/LIBRI'
+        # path: '/backup/isis_backup/A129-2/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/iz/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/iz.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
-  #  output:
-  #    - module: 'Excel'
-  #      path: '/data/isis_data/iz/reports/nova-signatura.xls'
-  #    - name: novasig
-  #      type: marc
-  #      path: '/data/webpac2/out/marc/ffiz-libri.marc'
-  #      encoding: 'UTF-8'
-  #      normalize:
-  #        path: 'conf/normalize/ffiz-novasig.pl'
-  #  output:
-  #    - module: 'Excel'
-  #      path: '/data/isis_data/iz/reports/lista-novih-signatura.xls'
+          - path: 'conf/normalize/ffisis/izn/libri.pl'
+          - path: 'conf/normalize/ffisis/izn/libriiz.pl'
+          - path: 'conf/normalize/ffisis/izn/libriiz2.pl'
 
-  ffkf:
+  klf:
     name: 'Klasièna filologija, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/kf_mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/kf-stara-signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A209-2/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/kf/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/kf.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librikf.pl'
+          - path: 'conf/normalize/ffisis/librikf2.pl'
   
-  ffkk:
+  kom:
     name: 'Komparativna knji¾evnost, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/kk-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/kk-stara-signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A206-4/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/kk/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/kk.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librikk.pl'
+          - path: 'conf/normalize/ffisis/librikk2.pl'
 
   fflo:
     name: 'Lingvistika, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/lo-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A108-1/ISISDATA/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/lo/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/lo.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+  #        - path: 'conf/normalize/ffisis/libriXX.pl'
+  #        - path: 'conf/normalize/ffisis/libriXX2.pl'
 
-  ffpe:
+  ped:
     name: 'Pedagogija, Filozofski fakultet u Zagrebu'
     input:
-      - name: signature
+      - name: mapirano
         type: excel
-        path: '/data/isis_data/pe/map-ped.xls'
+        path: '/data/isis_data/signature/pe-mapirano-proba.xls'
         encoding: 'windows-1250'
         normalize:
           path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/pe-stara_signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/b226-1/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/pe/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/pe.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/libripe.pl'
+          - path: 'conf/normalize/ffisis/libripe2.pl'
 
-  ffpo:
+  pov:
     name: 'Povijest, Filozofski fakultet u Zagrebu'
     input:
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A-201-1/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/po/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/po.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/libripo.pl'
+          - path: 'conf/normalize/ffisis/libripo2.pl'
 
   ffpu:
     name: 'Povijest umjetnosti, Filozofski fakultet u Zagrebu'
@@ -436,87 +461,138 @@ databases:
           - path: 'conf/normalize/ff-libri.pl'
           - path: 'conf/normalize/ff-libri-svesci.pl'
 
-  ffro:
+  rom:
     name: 'Romanistika, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano
+        type: excel
+        path: '/data/isis_data/signature/ro-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/ro-stara-signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: libri
+        type: isis
+        path: '/data/isis_data/lj2008/ro/LIBRI/LIBRI'
+        encoding: 'cp852'
+        modify_file: 'conf/modify/ffisis/ro.pl'
+        normalize:
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/libriro.pl'
+          - path: 'conf/normalize/ffisis/libriro2.pl'
+
+  ffsk:
+    name: 'Skandinavistika, Filozofski fakultet u Zagrebu'
+    input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/sk/signature/sk-mapirano-proba.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A224-2/isisdata/latest/LIBRI/LIBRI'
+        # path: '/backup/isis_backup/B009-1/ISISDATA/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/sk/LIBRI/LIBRI'
         encoding: 'cp852'
+        #limit: 10
         modify_file: 'conf/modify/common.pl'
         normalize:
           - path: 'conf/normalize/ff-libri.pl'
           - path: 'conf/normalize/ff-libri-svesci.pl'
 
-#  ffsk:
-#    name: 'Skandinavistika, Filozofski fakultet u Zagrebu'
-#    input:
-#      - name: libri
-#        type: isis
-#        path: '/backup/isis_backup/B009-1/ISISDATA/latest/LIBRI/LIBRI'
-#        encoding: 'cp852'
-#        #limit: 10
-#        modify_file: 'conf/modify/common.pl'
-#        normalize:
-#          - path: 'conf/normalize/ff-libri.pl'
-#          - path: 'conf/normalize/ff-libri-svesci.pl'
-
-  ffsf:
+  sfm:
     name: 'Slavenska filologija, Filozofski fakulteti u Zagrebu'
     input:
-      - name: librib
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/sf-mapirano_nova.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: libri
         type: isis
-        path: '/backup/isis_backup/A125-3/ISISDATA/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/sfm/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/sf.pl'
         normalize:
-  #        - path: 'conf/normalize/ff-nakladnicka.pl'
-          - path: 'conf/normalize/ff-libri.pl'
-  #        - path: 'conf/normalize/ff-libri-svesci.pl'
-      - name: librim
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librisfm.pl'
+          - path: 'conf/normalize/ffisis/librisfm2.pl'
+  
+  sfb:
+    name: 'Slavenska filologija, Filozofski fakulteti u Zagrebu'
+    input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/sf-mapirano_nova.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: libri
         type: isis
-        path: '/backup/isis_backup/A121-1/ISISDATA/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/sfb/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/sf.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/sfb/libri.pl'
+          - path: 'conf/normalize/ffisis/sfb/librisfb.pl'
+          - path: 'conf/normalize/ffisis/sfb/librisfb2.pl'
 
-  ffso:
+  soc:
     name: 'Sociologija, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/so-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/so-stara_signatura.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A002-3/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/so/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/so.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/libriso.pl'
+          - path: 'conf/normalize/ffisis/libriso2.pl'
 
-  ffta:
+  tal:
     name: 'Talijanistika, Filozofski fakultet u Zagrebu'
     input:
       - name: mapirano 
         type: excel
-        path: '/data/isis_data/ta/signature/ta-za_mapiranje.xls'
+        path: '/data/isis_data/signature/ta-mapirano.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: starasig 
         type: excel
-        path: '/data/isis_data/ta/signature/ta-stara_signatura.xls'
+        path: '/data/isis_data/signature/ta-stara-signatura.xls'
         encoding: 'windows-1250'
         normalize:
           - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A225-2/isisdata/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/ta/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/ta.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librita.pl'
+          - path: 'conf/normalize/ffisis/librita2.pl'
   
   fftu:
     name: 'Turkologija, Filozofski fakultet u Zagrebu'
@@ -545,26 +621,27 @@ databases:
 #          - path: 'conf/normalize/ff-libri.pl'
 #          - path: 'conf/normalize/ff-libri-svesci.pl'
 
-  ffsr:
+  src:
     name: 'Sredi¹nja èitaonica, Filozofski fakultet u Zagrebu'
     input:
+      - name: mapirano 
+        type: excel
+        path: '/data/isis_data/signature/sr-mapirano.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
+      - name: starasig 
+        type: excel
+        path: '/data/isis_data/signature/sr-stara-signatura-plus.xls'
+        encoding: 'windows-1250'
+        normalize:
+          - path: 'conf/normalize/xls2xls-min.pl'
       - name: libri
         type: isis
-        path: '/backup/isis_backup/A112-1/ISISDATA/latest/LIBRI/LIBRI'
+        path: '/data/isis_data/lj2008/sr/LIBRI/LIBRI'
         encoding: 'cp852'
-        modify_file: 'conf/modify/common.pl'
+        modify_file: 'conf/modify/ffisis/sr.pl'
         normalize:
-          - path: 'conf/normalize/ff-libri.pl'
-          - path: 'conf/normalize/ff-libri-svesci.pl'
-
-  nsk:
-    name: 'NSK'
-    input:
-      - name: baza
-        type: marc
-        path: '/home/mglavica/NSK/data/BBaza.ISO'
-        encoding: 'ISO-8859-2'
-        normalize: 'conf/normalize/ffreports-xls-nsk.pl'
-    output:
-      - module: 'Excel'
-        path: '/data/isis_data/nsk-sabrana.xls'
+          - path: 'conf/normalize/ffisis/libri.pl'
+          - path: 'conf/normalize/ffisis/librisr.pl'
+          - path: 'conf/normalize/ffisis/librisr2.pl'
index 7687cb8..50ad357 100644 (file)
@@ -2,27 +2,21 @@
 
 # FFSF - nekoliko zaredanih ISBN, odvojenih s '. - '
 
-991
-  'regex:^' => '^8ANG^aFFZG^bFFZG^cSE^iang'
-  'regex:$' => '^yKNJ'
-
 10
   '*'
     'regex:^' => '^a'
     'regex:\(' => ' ('
+    'regex:  ' => ' '
     ' | ' => '^a'
     ' ; ' => '^a'
     '. - ' => '^a'
     'ISBN ' => ''
     'ISBN ' => ''
-#    '-' => ''
 
 101
   '*'
     'regex:^' => '^a'
     ' ; ' => '^a'
-#    ' ; ' => '^a'
-#    ' ; ' => '^a'
 
 200
   '*'
   '*'
     'regex:$' => '.'
 
-# priprema za konverziju u 440
-
-#225
-#  '^a'
-#    ' / ' => ' /^z'
-#    ' : ' => ' :^z'
-#    ' = ' => ' =^z'
-#    '^w' => '^v'
-#    ' ; ' => '^v'
-
 225
   '^a'
     '^e' => ' : '
   '^i'
     '^f' => ' / '
     '^e' => ' : '
-## provjeri ovo:
   '^v' 
     '^f' => ' / '
     '^d' => ' = '
   '*'
     '^e' => '^a'
-#225
-#  '^a'
-#    '^v' => ' ; ^v'
-#    '^w' => ' ; ^v'
-#    '^d' => ' = '
-#    '^e' => ' : '
-#    '^f' => ' / '
-#    '^h' => '. ^n'
-#    '^i' => '. ^p'
-#    ' ; ' => ' ;^v'
-#  '^n'
-#    '^v' => ' ; ^v'
-#    '^w' => ' ; ^v'
-#    '^i' => ', ^p'
-#  '^p'
-#    '^v' => ' ; ^v'
-#    '^w' => ' ; ^v'
-#  '^v'
-#    '^w' => ' ; '
-#    '^x' => ', ^x'
-#
-#225
-#  '^a'
-#    ' = ' => '^d'
-#    ' / ' => '^f'
-#    ' : ' => '^e'
-#    ', ISSN ' => '^x'
-##    ' ; ' => '^v'
-#    ') (' => '^b'
-#    ')(' => '^b'
-#  '^d'
-#    ' / ' => '^f'
-#    '^e' => ' : '
-#    '^d' => ' = '
-#    ', ISSN ' => '^x'
-#  '^e'
-#    ' / ' => '^f'
-#    '^d' => ' = '
-#    ', ISSN ' => '^x'
-#  '^f'
-#    '^d' => ' = '
-#    ', ISSN ' => '^x'
-#    ') (' => '^b'
-#    ')(' => '^b'
-#  '^i'
-#    ', ISSN ' => '^y'
-#    ') (' => '^b'
-#    ')(' => '^b'
-#    ' ; ' => '^w'
-#  '^v'
-#    ') (' => '^b'
-#    ')(' => '^b'
-#    ']  (' => '^b'
-#  '^w'
-#    ') (' => '^b'
-#    ')(' => '^b'
-#  '^b'
-#    ' / ' => '^j'
-#    ' ; ' => '^k'
-#    '^i' => '^l'
-#    ') (' => '^c'
-#    ')(' => '^c'
-#  '^j'
-#    ') (' => '^c'
-#    ')(' => '^c'
-#    ' ; ' => '^k'
-#  '^c'
-#    ' / ' => '^r'
-#    ' ; ' => '^s'
-#  '*'
-#    '[The]' => 'The'
-#    '[A]'   => 'A'
-#    '[Der]' => 'Der'
-#    '[Le]'  => 'Le'
-
-#330
-#  '*'
-#    '><' => '^a'
-#    '<' => '^a'
-#    '>' => ''
-#  '^a'
-#    '^a' => '^b'
-#  '^b'
-#   '^a' => '^c'
-#  '^c'
-#    '^a' => '^d'
-#  '^d'
-#    '^a' => '^e'
-#  '^e'
-#    '^a' => '^f'
-#  '^f'
-#    '^a' => '^g'
-
-
-#326
-#  '*'
-#    'g1' => 'a'
-#    'g6' => 'b'
-#    'g4' => 'q'
-#    'g'  => 'a'
-#    'g2' => 'f'
-
 610
   '*'
     '_ _' => ' -- '
 
-230
-  '^d'
-    '^e' => ' : '
-  '^f'
-    '^g' => ' ; '
-
-231
-  '^e'
-    '^k' => ' ; '
-    '^g' => '^f'
-  '^f'
-    '^g' => ' ; '
-
-232
-  '^e'
-    '^k' => ' ; '
-    '^g' => '^f'
-  '^f'
-    '^g' => ' ; '
-
-233
-  '^e'
-    '^k' => ' ; '
-    '^g' => '^f'
-  '^f'
-    '^g' => ' ; '
-
-250
-  '^a'
-    '^c' => ' : '
-    '^d' => ', '
-
-260
-  '^a'
-    '^c' => ' : '
-    '^d' => ' ; '
-
-270
-  '^a'
-    ' ; ' => '^v'
-
-#231
-#  '^a'
-#    '^e' => ' : '
-#    '^f' => ' / '
-
-251
-  '^a'
-    '^c' => ' : '
-    '^d' => ', '
-
-261
-  '^a'
-    '^c' => ' : '
-    '^d' => ' ; '
-
-271
-  '^a'
-    ' ; ' => '^v'
-
-#232
-#  '^a'
-#    '^e' => ' : '
-#    '^f' => ' / '
-
-252
-  '^a'
-    '^c' => ' : '
-    '^d' => ', '
-
-262
-  '^a'
-    '^c' => ' : '
-    '^d' => ' ; '
-
-
-272
-  '^a'
-    ' ; ' => '^v'
-
-#233
-#  '^a'
-#    '^e' => ' : '
-#    '^f' => ' / '
-
-253
-  '^a'
-    '^c' => ' : '
-    '^d' => ', '
-
-263
-  '^a'
-    '^c' => ' : '
-    '^d' => ' ; '
-
-
-273
-  '^a'
-    ' ; ' => '^v'
-
-464
-  '^a'
-    '^f' => ' / '
-    '^g' => ', '
-
-## ne mo¾e ovako jer se izgubi informacija za indikator - ISPRAVITI u normalize fajlovima !!!
-#700
-#  '^a'
-#    '^b' => ', '
-
 701
-  '^a'
+  '*'
     '^b' => ', '
-  'regex:$' => '^4aut'
-
 702
-  '^a'
+  '*'
     '^b' => ', '
 
-#990
-#  '*'
-#    '[' => ''
-#    ']' => ''
-#    'PE' => ''
-#    'SF' => ''
-
+991
+  'regex:^' => '^8SLF^aFFZG^bFFZG^cSE^islf'
+  'regex:$' => '^yKNJ'
 
 220
-  'regex:^' => '^8ANG^aFFZG^bFFZG^cSE^iang'
+  'regex:^' => '^8SLF^aFFZG^bFFZG^cSE^islf'
   'regex:$' => '^yKNJ'
 
 221
-  'regex:^' => '^8ANG^aFFZG^bFFZG^cSE^iang'
+  'regex:^' => '^8SLF^aFFZG^bFFZG^cSE^islf'
   'regex:$' => '^yKNJ'
 
 222
-  'regex:^' => '^8ANG^aFFZG^bFFZG^cSE^iang'
+  'regex:^' => '^8SLF^aFFZG^bFFZG^cSE^islf'
   'regex:$' => '^yKNJ'
 
 223
-  'regex:^' => '^8ANG^aFFZG^bFFZG^cSE^iang'
+  'regex:^' => '^8SLF^aFFZG^bFFZG^cSE^islf'
   'regex:$' => '^yKNJ'
index a940113..35c6fb6 100644 (file)
@@ -4,55 +4,48 @@
 # UNIMARC formatu, sa vi¹estrukim odstupanjima od standarda.
 
 
-## lookup rezultat za sabrana djela
-my $sabrana;
+## lookup rezultat za sabrana djela (probna procedura za filozofiju od koje se odustalo)
+my $sabrana;
 
 
-## konvertira se ako postoji polje 200^a
+## sve skupa se konvertira tek ako postoji polje 200^a
 if ( rec('200','a') ) {
 
 ### LEADER
 
-## LDR 05 - c = pregledan ; n = new
-## provjeriti za svaku bazu koje polje koristi
-## 999^aP - SFM
-
-if ( rec('999','a') && rec('999','a') =~ m/(pregledan|P)/i) {
-       marc_leader('05','c');
-} else {
-       marc_leader('05','n');
-}
+## LDR 05 - n - new
+marc_leader('05','n');
 
 ## LDR 06 - a - language material 
-
-       marc_leader('06','a');
+marc_leader('06','a');
 
 ## LDR 07 - m - Monograph/item
+marc_leader('07','m');
+
+# ovo je bila proba za filozofiju
+# if ( config() =~ m/fffi/ ) { 
+#      $sabrana = 
+#              lookup(
+#                      sub{ rec('A') },
+#                      'fffi','sabrana',
+#                      sub { rec('B') },
+#                      sub { rec('000') }
+#              );
+# } 
+#
+# if ( ! $sabrana ) {
+#      marc_leader('07','m');
+# } else {
+#      marc_leader('07','c');
+# }
 
-if ( config() =~ m/fffi/ ) { 
-       $sabrana = 
-               lookup(
-                       sub{ rec('A') },
-                       'fffi','sabrana',
-                       sub { rec('B') },
-                       sub { rec('000') }
-               );
-}
-
-if ( ! $sabrana ) {
-       marc_leader('07','m');
-} else {
-       marc_leader('07','c');
-}
-
-## LDR 17 - Encoding level ; 7 - minimal level
-       marc_leader('17','7');
+## LDR 17 - Encoding level ; 7 - minimal level, u - unknown
+marc_leader('17','u');
 
 ## LDR 18 - i - isbd 
-       marc_leader('18','i');
+marc_leader('18','i');
 
-## LDR 19
-# # - Not specified or not applicable; a - Set; b - Part with independent title; c - Part with dependent title 
+## LDR 19 - Multipart resource record level ; # - Not specified or not applicable, a - Set, b - Part with independent title, c - Part with dependent title 
 
 #if ( ( ! $sabrana ) && ( rec('230') || rec('231') || rec('232') || rec('233') ) ) { 
 #      marc_leader('19','a');
@@ -73,12 +66,12 @@ if ( rec('994','c') =~ m/\d{8}/ ) {
                ),
        );
 } elsif ( rec('994','c') =~ m/\d{6}/ ) {
-       marc_fixed('008', 00,
+       marc_fixed('008','00',
                regex('s/^\d\d//',
                        rec('994','c')
                ),
        );
-       marc_fixed('008', '04',
+       marc_fixed('008','04',
                '01'
        );
 } elsif ( rec('994','c') =~ m/\d{4}/ ) {
@@ -87,9 +80,13 @@ if ( rec('994','c') =~ m/\d{8}/ ) {
                        rec('994','c')
                ),
        );
-       marc_fixed('008', '02',
+       marc_fixed('008','02',
                '0101'
        );
+} else {
+       marc_fixed('008','00',
+               '010101'
+       );
 }
 
 #warn( dump(
@@ -101,30 +98,15 @@ if ( rec('994','c') =~ m/\d{8}/ ) {
 
 ## 008 06 - Type of date/Publication status
 
-## 008 07-10 - Date 1 - 
-## srediti sve moguæe oznake za godine (06)
+## 008 07-10 - Date 1
+## 008 11-14 - Date 2 
 ## 210d kroz modify postaje 210c
 
 if ( rec('210','c') ) {
        my $d1 = '';
        my $d2 = '';
-       if ( rec('210','c') =~ m/(\?)/ ) {
-               marc_fixed('008','06','q');
-               if ( rec('210','c') =~ m/(\d{2})(--|__)/ ) {
-                       $d1 = $1.'uu';
-               } 
-               if ( rec('210','c') =~ m/(\d{3})(-|_)/ ) {
-                       $d1 = $1.'u';
-               }
-               if ( rec('210','c') =~ m/(\d{4})/ ) {
-                       $d1 = $1;
-               }
-       } elsif ( rec('210','c') =~ m/(\d{4})-/ ) {
-               if ( $sabrana ) { 
-                       marc_fixed('008','06','i');
-               } else {
-                       marc_fixed('008','06','m');
-               }
+       if ( rec('210','c') =~ m/(\d{4})-/ ) {
+               marc_fixed('008','06','m');
                if ( rec('210','c') =~ m/(\d{4})-/ ) {
                        $d1 = $1;
                        $d2 = '9999';
@@ -137,7 +119,45 @@ if ( rec('210','c') ) {
                if ( rec('210','c') =~ m/(\d{4})/ ) {
                        $d1 = $1;
                }
+               if ( rec('210','c') =~ m/(\d{2})(--|__)/ ) {
+                       $d1 = $1.'uu';
+               } 
+               if ( rec('210','c') =~ m/(\d{3})(-|_)/ ) {
+                       $d1 = $1.'u';
+               }
        }
+               
+#      if ( rec('210','c') =~ m/(\?)/ ) {
+#              marc_fixed('008','06','q');
+#              if ( rec('210','c') =~ m/(\d{2})(--|__)/ ) {
+#                      $d1 = $1.'uu';
+#              } 
+#              if ( rec('210','c') =~ m/(\d{3})(-|_)/ ) {
+#                      $d1 = $1.'u';
+#              }
+#              if ( rec('210','c') =~ m/(\d{4})/ ) {
+#                      $d1 = $1;
+#              }
+#      } elsif ( rec('210','c') =~ m/(\d{4})-/ ) {
+#              if ( $sabrana ) { 
+#                      marc_fixed('008','06','i');
+#              } else {
+#                      marc_fixed('008','06','m');
+#              }
+#              marc_fixed('008','06','m')
+#              if ( rec('210','c') =~ m/(\d{4})-/ ) {
+#                      $d1 = $1;
+#                      $d2 = '9999';
+#              }
+#              if ( rec('210','c') =~ m/-(\d{4})/ ) {
+#                      $d2 = $1;
+#              }
+#      } else {
+#              marc_fixed('008','06','s');
+#              if ( rec('210','c') =~ m/(\d{4})/ ) {
+#                      $d1 = $1;
+#              }
+#      }
 
        marc_fixed('008','07',$d1);             # 07-10 - Date 1
        marc_fixed('008','11',$d2);             # 07-10 - Date 1
@@ -148,12 +168,9 @@ if ( rec('210','c') ) {
 }
 
 
-## 008 11-14 - Date 2 
 
-## 008 15-17 - Place of publication, production, or execution - ¹to ako nema 102?
-## raspraviti
-
-marc_fixed('008','15','xx');
+## 008 15-17 - Place of publication, production, or execution - ako nema 102, popunjava se s |
+marc_fixed('008','15','|||');
 
 #marc_fixed('008','15', 
 #      lc ( rec('102') ) 
@@ -178,7 +195,7 @@ marc_fixed('008','35',
        lc( frec('101'))                
 );
                                        
-## 008 38 - Modified record - razjasniti
+## 008 38 - Modified record
 marc_fixed('008','38','|');            
 
 ## 008 39 - Cataloging source - d (other)
@@ -194,6 +211,7 @@ if ( rec('215','c') && rec('215','c') =~ m/ilustr/ ) {
 marc_fixed('008','22','|');
 
 ## 008 23 - Form of item
+marc_fixed('008','23','|');
 
 ## 008 24-27 - Nature of contents
 marc_fixed('008','24','||||');
@@ -218,9 +236,8 @@ marc_fixed('008','33','|');
 marc_fixed('008','34','|');
 
 ### 020
-## modify za polje 10 -> drugi ISBN poèinje prefixom "ISBN" koji se mièe (pr. u sfb)
-
-if ( frec('10') ne ( frec('290') ) ) {
+## postoji modify za polje 10 -> drugi ISBN poèinje prefixom "ISBN" koji se mièe (pr. u sfb)
+#if ( frec('10') ne ( frec('290') ) ) {
        if ( rec('10','a') !~ /pogre/ ) {
                marc('020','a', 
                        # isbn_13(
@@ -241,7 +258,7 @@ if ( frec('10') ne ( frec('290') ) ) {
        marc('020','z',
                rec('10','z')
        );
-}
+#}
 
 #warn( 
 #      dump(
@@ -251,7 +268,8 @@ if ( frec('10') ne ( frec('290') ) ) {
 
 ### 035$
 ## marc 035a - System Number 
-## polje mo¾e sadr¾avati slova i razmake, problem u pretra¾ivanju ako ima zagrade, kako bi trebalo po standardu
+## polje mo¾e sadr¾avati slova i razmake
+## moguæ problem u pretra¾ivanju ako ima zagrade, kako bi trebalo po standardu
 
 marc('035','a',
 join_with('',
@@ -259,7 +277,7 @@ join_with('',
        # config('name'),
        'HR-ZaFF ',
        config(),
-       'L-',
+       'L',
        # config('input name'),
        # id(),
        # rec('994','a'),
@@ -292,6 +310,7 @@ marc('040','e',
 ## (ako postoje zagrade pr. 94(=411.16) onda su to pomoæne oznake)
 ## pr. 821.111-2=163.42 je prijevod engleske drame na HR. 
 ## to ima samo za knji¾evna djela, eseje.... 
+## ovo treba kasnije ispravljati
 
 #if ( rec('675') =~ m/\d=\d/ ) ?
 
@@ -316,19 +335,18 @@ if (
        );
 }
 
-       ### 041
-       ## ponovljivo polje (101) konvertira se u ponovljivo potpolje (041a)
-       ## polje se koristi kad ima vi¹e od jednog jezika, ili kad se radi o prijevodu
-       #_debug(2);
-
-#_debug(0);
+### 041
+## ponovljivo polje (101) konvertira se u ponovljivo potpolje (041a)
+## koristi se kad ima vi¹e od jednog jezika, ili kad se radi o prijevodu
+## nadopuniti
 
 ### 044
-## kako dobiti zemlju izdavanja?
+## koristi se kad ima vi¹e zemalja izdavanja
 
 ### 080
 ## 675 podpolja b, c, d ... - ¹to s njima? - provjeriti za svaku bazu
 ## fi: abcd
+## sk: ima \r\n na kraju
 
 marc('080','a',
        rec('675','a')
@@ -352,6 +370,9 @@ marc('080','a',
 ## NSK konvertira polje 686 u 084, u skladu s LOC konv. tablicom
 ## polje 686 koristi FFPS. jo¹ netko?
 
+marc('084','2',
+       'APA CC'
+);
 marc('084','a',
        rec('686')
 );
@@ -375,7 +396,8 @@ marc('100','a',
 ### formalna odrednica - iz 503 u 110, i1=0, i2=1
 
 ### 111 i 110
-## konverzija u 110 ili 111 ovisno o postojanju/nepostojanju nekih polja - provjeriti ispise naslova iz svake baze - moguæe su gre¹ke.
+## provjeriti za svaku bazu
+## konverzija u 110 ili 111 ovisno o postojanju/nepostojanju nekih polja - provjeriti ispise naslova iz svake zbirke - moguæe su gre¹ke.
 ## popraviti interpunkciju
 
 # ovo vrijedi za FFSFB
@@ -429,36 +451,36 @@ marc_compose('111',
 ## i2 = pretpostavlja se na temelju èlana na poèetku naslova i jezika
 ## treba provjeriti
 
-my $i1;
+my $titleind1;
 
 if ( rec('700') || rec('710') ) {
-       $i1 = 1;
+       $titleind1 = 1;
 } else {
-       $i1 = 0;
+       $titleind1 = 0;
 }
        
-marc_indicators('245', $i1, 0);
+marc_indicators('245', $titleind1, 0);
 
 if ( rec('200','a') =~ m/^Einen / ) {
-               marc_indicators('245', $i1, 6);
+       marc_indicators('245', $titleind1, 6);
 } 
 if ( rec('200','a') =~ m/^Eine / ) {
-               marc_indicators('245', $i1, 5);
+       marc_indicators('245', $titleind1, 5);
 } 
 if ( rec('200','a') =~ m/^(Die|Das|Der|Ein|Les|Los|The) / ) {
-               marc_indicators('245', $i1, 4);
+       marc_indicators('245', $titleind1, 4);
 } 
 if ( rec('200','a') =~ m/^(Um|Un|An|La|Le|Lo|Il) / ) { 
-               marc_indicators('245', $i1, 3);
+       marc_indicators('245', $titleind1, 3);
 } 
 if ( ( rec('101') =~ m/ENG/ ) && ( rec('200','a') =~ m/^A / ) ) { 
-               marc_indicators('245', $i1, 2);
-} 
+       marc_indicators('245', $titleind1, 2);
+}
 if ( rec('200','a') =~ m/^L / ) { 
-               marc_indicators('245', $i1, 2);
+       marc_indicators('245', $titleind1, 2);
 } 
 if ( rec('200','a') =~ m/^L'/ ) { 
-               marc_indicators('245', $i1, 2);
+       marc_indicators('245', $titleind1, 2);
 } 
 
 
@@ -519,19 +541,17 @@ marc_compose('245',
 #_debug(0);
 
 ### 246
-## i1=1 ukoliko pravilo nalaze napomenu, ali napomenu necemo pisati ponovo u 500
-## i1=3 ako pravlo na nalze napomenu
+## i1=1 ukoliko pravilo nala¾e napomenu, ali napomenu necemo pisati ponovo u 500
+## i1=3 ako pravlo na nale napomenu
 ## vidi na wiki
 ## i2 - pogledati za svaku bazu sto su ti naslovi, pa onda oderditi indikatoda oderditi indikatoree
-
 marc_indicators('246', 3, ' ');
 marc('246','a',
        rec('532')
 );
 
 ### 250
-## zapisima koji nemaju potpolje, dodaje se ^a u modify - provjeriti
-
+## zapisima koji nemaju potpolje, dodaje se ^a u modify - provjeriti za svaku bazu
 marc_compose('250',
        'a',suffix(
                rec('205','f') ? ' / ' : 
@@ -543,13 +563,11 @@ marc_compose('250',
 
 ### 260
 ## ponovljiva potpolja u originalnom redosljedu - priprema u modify
-
-       marc_original_order('260', '210');
+marc_original_order('260', '210');
 
 
 ### 300
 ## urediti interpunkcije za sve kombinacije
-
 marc('300','a',
        suffix(
                rec('215','c') ? ' : ' :
@@ -579,7 +597,9 @@ marc('300','e',
 );
 
 ### 362 - brojèani podaci za nakladnièku cjelinu - to mi nemamo, polje se koristi samo za èasopise
-
+## i1 = 0 - formalizirani oblik navoda
+## i1 = 1 - neformalizirani
+## i2 nema
 
 # if ( ! rec('225','z')  ) {
 
@@ -879,67 +899,66 @@ if ( config() =~ m/ffps/ ) {
 }
 
 ### 526 - STUDY PROGRAM INFORMATION NOTE
-## provjeriti za svaku bazu sta je u 996?
-
+## u nekim bazame je to u 996 - provjeriti za svaku bazu sta je u 996?
 marc_indicators('526', 8, ' ');
-
 marc('526','a',
        rec('996')
 );
 
 ### 538 - zahtjevi sustava
-
 marc('538','a',
        rec('337','a')
 );
 
-### 655
-
-marc_indicators('655', ' ', 4);
-marc('655','a',
-       rec('608')
-);
-
-### 653
+### 653 - Index Term-Uncontrolled
 ## da li ponovljivo polje ili potpolje, pogledati u Koha tags
-
 marc_indicators('653', ' ', ' ');
 marc('653','a',
        rec('610')
 );
 
+### 655 - Index Term-Genre/Form 
+marc_indicators('655', ' ', 4);
+marc('655','a',
+       rec('608')
+);
+
 #_debug(2);
 
 
 ### 700
 ## ako je u originalu ponovljivo polje treba bioti i konvertirano u ponovljivo !!
-## ako ima samo podpolje a onda je pseudonim - popraviti indikator
-
-marc_indicators('700', 1, ' ');
+## ako ima samo podpolje a onda je pseudonim - nakon konverzije treba provjeriti
+if ( rec('701','a') =~ m/, / ) {
+       marc_indicators('700', 1, ' ');
+} else {
+       marc_indicators('700', 0, ' ');
+}
 
 marc('700','a',
        rec('701', 'a'),
 );
+
 marc('700','a',
        join_with(', ',
                rec('701', 'c'),
                rec('701', 'd')
-       )
+       ),
 );
 marc('700','a',
        join_with(', ',
                rec('701', 'e'),
                rec('701', 'f')
-       )
+       ),
 );
 marc('700','a',
        join_with(', ',
                rec('701', 'g'),
                rec('701', 'h')
-       )
+       ),
 );
 marc('700','a',
-               rec('702', 'a'),
+       rec('702','a'),
 );
 marc('700','a',
        join_with(', ',
@@ -962,10 +981,13 @@ marc('700','a',
 
 #_debug(0);
 
+## eventualno nadopuniti 710 i 711 - provjetiti da li u podacima postoji u ISIS-u
 
-### 740 - sta s tim?
 
-marc_indicators('740', 0, ' ');
+### 740 - Added Entry - Uncontrolled Related/Analytical Title 
+## raspraviti
+## nadopuniti prvi indikator prema èlanovima
+marc_indicators('740', '0', ' ');
 
 # if ( ! rec('464') ) {
 # marc('740','a',
@@ -984,8 +1006,7 @@ marc('740','a',
 
 # };
 
-# -------------------------------------------------------------------
-### 760 w
+### 760 w ---------------------------------------------
 ## generiranje zapisa o nakladnièkoj cjelini i povezivanje podreðenog zapisa s nadreðenim
 
 #if (
@@ -1119,37 +1140,39 @@ marc('740','a',
 #              rec('293'),
 #      )
 #);
-#
+
+
 ### 852 - ne koristimo, koristimo  942 i 952
 
-### 876 - item information - basic bibliographic unit
+### 876 - item information - basic bibliographic unit (R)
+## da li ovdje zapisati stare inventarne brojeve?
 #marc('876','a',
 #      rec('991','t'),
 #);
 
 ### 886 - former marc
 # inicijale treba prebaciti u neko lokalno polje, a ovo polje nam ne treba
-
-marc_indicators('886', 2, ' ');
-marc('886','2',
-       'ffmarc'
-);
-marc('886','a',
-       '994'
-);
-marc('886','b',
-       join_with(''.
-               '##^a',
-               join_with('',
-                       prefix('^a',
-                               rec('994','a'),
-                       ),
-                       prefix('^b',
-                               rec('994','b')
-                       )
-               )
-       )
-);
+#
+marc_indicators('886', 2, ' ');
+marc('886','2',
+#      'ffmarc'
+);
+marc('886','a',
+#      '994'
+);
+marc('886','b',
+#      join_with(''.
+#              '##^a',
+#              join_with('',
+#                      prefix('^a',
+#                              rec('994','a'),
+#                      ),
+#                      prefix('^b',
+#                              rec('994','b')
+#                      )
+#              )
+#      )
+#);
 
 ### KOHA items
 
@@ -1157,7 +1180,6 @@ marc('942','b',
        'LIB'
 );
 
-
 if ( grep( m/Posebni otisak/, rec('300') ) ) {
        marc('942','c',
                'SEP'
@@ -1168,48 +1190,70 @@ if ( grep( m/Posebni otisak/, rec('300') ) ) {
        );
 }
 
+## 990 u sk ima \r\n na kraju
+
 marc('942','d',
        join_with(' | ',
                rec('990')
        )
 );     
 
-if ( config() =~ m/ffan/ ) {
-       my $novasig1 =
-               lookup(
-                       sub { rec('C') },
-                       'ffan','mapirano',
-                       sub { rec('B') },
-                       sub { rec('990') }
-               );
-       my $novasig2 = 
-               lookup(
-                       sub { rec('C') . ' ' . rec('D') },
-                       'ffan','starasig',
-                       sub { rec('A') },
-                       sub { rec('000') },
-               );
-       marc('942','h',
-               $novasig1
+my $novasig1 =
+       lookup(
+               sub { rec('C') },
+               'ffiz','mapirano',
+               sub { rec('B') },
+               sub { rec('990') }
        );
-       marc('942','i',
-               $novasig2
+my $novasig2 = 
+       lookup(
+               sub { rec('C') . ' ' . rec('D') },
+               'ffiz','starasig',
+               sub { rec('A') },
+               sub { rec('000') },
        );
-}
 
+marc('942','h',
+       $novasig1
+);
+
+marc('942','i',
+       $novasig2
+);
 
-if ( config() =~ m/ffsf|ffpo|fffi/ ) {
-       my $sig1 = 
+if ( config() =~ m/ffar/ ) {
+       my $novasig1 =
                lookup(
-                       sub { rec('C') },
-                       'fffi','signature',
-                       sub { rec('B') },
-                       sub { frec('990') },
+                       sub { rec('E') },
+                       'ffar','mapirano',
+                       sub { rec('A') },
+                       sub { rec('000') }
                );
-       if ( rec('700','a') ) {
+       if ( $novasig1 ) {
                marc('942','h',
-                       $sig1,
+                       $novasig1
                );
+       } else {
+               marc('942','h',
+                       'ARH'
+               );
+       }
+
+
+}
+
+if ( config() =~ m/ffsf|ffpo|fffi|ffar|ffsk/ ) {
+#      my $sig1 = 
+#              lookup(
+#                      sub { rec('C') },
+#                      'fffi','signature',
+#                      sub { rec('B') },
+#                      sub { frec('990') },
+#              );
+       if ( rec('700','a') ) {
+#              marc('942','h',
+#                      $sig1,
+#              );
                if ( rec('200','a') =~ m/^(The|Die|Das|Der|Ein|Les) / ) {
                        marc('942','i',
                                join_with(' ',
@@ -1278,9 +1322,9 @@ if ( config() =~ m/ffsf|ffpo|fffi/ ) {
                        );
                }
        } elsif ( rec('710','a') ) {
-               marc('942','h',
-                       $sig1,
-               );
+#              marc('942','h',
+#                      $sig1,
+#              );
                if ( rec('200','a') =~ m/^(The|Die|Das|Der|Ein|Les) / ) {
                        marc('942','i',
                                join_with(' ',
@@ -1349,9 +1393,9 @@ if ( config() =~ m/ffsf|ffpo|fffi/ ) {
                        );
                }
        } elsif ( rec('200','a') =~ m/^(The|Die|Das|Der|Ein|Les) / ) {
-               marc('942','h',
-                       $sig1,
-               );
+#              marc('942','h',
+#                      $sig1,
+#              );
                marc('942','i',
                        regex('s/^.{4}(.{3}).*/$1/',
                                uc ( rec('200','a') )
@@ -1359,19 +1403,19 @@ if ( config() =~ m/ffsf|ffpo|fffi/ ) {
                );
                        
        } else {
-               marc('942','h',
-                       $sig1,
-               );
+#              marc('942','h',
+#                      $sig1,
+#              );
                marc('942','i',
                        regex('s/(^\w{3}).*/$1/',
                                uc ( rec('200','a') )
                        )
                )
        }
-} # if config()
+} # if config() za oznaku primjerka
 
 if ( ( rec('230') || rec('231') || rec('232') || rec('233') ) ) { 
-       warn "nema primjeraka";
+       warn "skupni zapis - nema primjeraka";
 } else {
        marc('952','8',
                rec('991','8')
@@ -1392,5 +1436,15 @@ if ( ( rec('230') || rec('231') || rec('232') || rec('233') ) ) {
                rec('991','y')
        );
 }
+
+### LOKALNA POLJA
+## 1. da li je zapis pregledan ili nije i datum kad je pregledan
+##    provjeriti za svaku bazu koje polje koristi
+##    SFM:     999^aP
+##    AN:      999 Pregledan
+## raspraviti
+
+
+
 } # polje 200a
 # } sig
index 4ab1f1b..bb2b7b9 100644 (file)
@@ -5,7 +5,7 @@
 10
 99
 101    
-200 a! b* c d e* f g* h i j k m n v w x y
+200 a! b* c d e* f g* h i j k m n v
 205 a!
 210 a b c* d* e f g h x y
 215 a c d e
index 69aac63..dae3836 100644 (file)
@@ -22,8 +22,8 @@
 261 a c d
 262 a c d
 263 a c d e
-270 a v 
-271 a v
+270 a! v 
+271 a! v
 272 
 273 
 280 
index bfe4503..78d3bc6 100644 (file)
@@ -36,7 +36,7 @@
 293 
 300 
 320 
-327 
+327
 423 a b c z
 464 a c f g x y
 503 a b
diff --git a/conf/validate/ffsf-librib b/conf/validate/ffsf-librib
deleted file mode 100644 (file)
index 1f558cd..0000000
+++ /dev/null
@@ -1,54 +0,0 @@
-0
-10     
-101    
-200 a! c d e* f g* k 
-205 a!
-210 a c d! 
-215 a c d e 
-225 a! e h i v w 
-230 a e f v 
-231 a e f v 
-232 a e f v 
-233 a e f v 
-240
-241
-250-
-251-
-252-
-253-
-260
-261
-262
-263
-270
-271
-272
-273
-280
-281
-282
-283
-290
-291
-292
-293
-300
-320
-330
-464 a b c f g 
-503 a b
-532
-610
-675 a! b c d 
-700 a! b 
-701 a! b c d 
-702 a! b 
-710 a! b c d e f 
-801
-990    
-991    
-994 a! b c 
-996    
-998 a! b 
-999 a! b 
-
diff --git a/conf/validate/ffsf-librim b/conf/validate/ffsf-librim
deleted file mode 100644 (file)
index 57cbefe..0000000
+++ /dev/null
@@ -1,58 +0,0 @@
-0
-10     
-101    
-200 a! c d e* f g* k
-205 a!
-210 a* c* d!
-215 a c d e
-225 a! e h i v w
-230 a e f v
-231 a e f v
-232 a e f v
-233 a e f v
-240
-241
-242
-250
-251
-252
-253
-260
-261
-262
-263
-270
-271
-272
-273
-280
-281
-282
-283
-290
-291
-292
-293
-300
-320
-327
-330
-423 a b c z
-464 a c f g x y
-503
-532
-610
-675 a! b c d
-700 a! b
-701 a! b c d
-702 a! b c d e f
-710 a! b c d e f 
-711 a! b c e f
-801
-990    
-991    
-994 a! b c
-996    
-998 a! b
-999 a b
-