basic conversion SOP

diff --git a/README b/README
new file mode 100644 (file)
index 0000000..6627180
--- /dev/null
+++ b/README
@@ -0,0 +1,36 @@
+Postupak migracije ferlib dump-a iz informix-a u Kohu
+
+#1 - import Informix dump-a u SQLite
+
+http://blog.rot13.org/2011/02/migration-of-informix-unl-dump-files-using-sql.html
+
+https://github.com/dpavlin/informix_unl_import
+
+dpavlin@llin:~/private/Koha-FER$ scp -r ferlib-2011-06-16 webpac2.rot13.org:/srv/Koha-FER/
+
+dpavlin@webpac2:/srv/Koha-FER$ time ./informix_unl_import.pl ferlib-2011-06-16
+# ...
+created /dev/shm/ferlib-2011-06-16.sqlite 52142080 bytes
+
+real    3m40.668s
+user    2m53.355s
+sys     0m46.359s
+
+
+
+
+
+#2 - konverzija bibliografskih podataka za WebPAC-om
+
+
+
+#3 - import ostatka podataka
+
+dpavlin@gimpoz:/srv/ferlib2koha$ time sudo FULL=1 ./ferlib2koha.pl 2>/tmp/log
+
+real    6m24.537s
+user    2m58.347s
+sys     0m10.133s
+
+
+- posuđeni lastseendate datum posudbe

diff --git a/ferlib2koha.pl b/ferlib2koha.pl
index 761cf9c..343c6e0 100755 (executable)
--- a/ferlib2koha.pl
+++ b/ferlib2koha.pl
@@ -8,10 +8,10 @@ use Algorithm::CheckDigits;
 $|++;
 
 my $import = {
-       borrowers => 0,
-       issues    => 1,
-       reserves  => 0,
-       barcode   => 0,
+       borrowers => $ENV{FULL} || 0,
+       issues    => $ENV{FULL} || 0,
+       reserves  => $ENV{FULL} || 1,
+       barcode   => $ENV{FULL} || 0,
 };
 
 my $f = DBI->connect("dbi:SQLite:dbname=knjiznica.sqlite","","", { RaiseError => 1, AutoCommit => 0 }) || die $DBI::errstr;