EG install scripts: typo fix
[sitka/sitka-tools.git] / marc_import_overdrive / overdrive-ingest-db-func.sql
index c891615..0f95708 100755 (executable)
@@ -48,7 +48,7 @@ CREATE OR REPLACE FUNCTION sitka.overdrive_bc_add_uri_field( TEXT, TEXT, TEXT, T
     my $field856 = MARC::Field->new(
             '856' => ('4', '0'),
             u => $url_prefix . $tcn,
-            z => $uri_caption,
+            y => $uri_caption,
             9 => $shortname
     );
 
@@ -82,15 +82,68 @@ BEGIN
        -- from actor.org_unit_setting b join actor.org_unit a on (a.id = b.org_unit) where b.name = 'sitka.overdrive_setting' and b.value = true
        -- something like that
 
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'BBGVL'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'BBNCLF'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'BCK'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'BNCLF'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'BNELF'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'ISLANDLINK'::TEXT) INTO marcxml;
-       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, 'UNFEDERATED'::TEXT) INTO marcxml;
+       SELECT sitka.overdrive_bc_add_uri_field(marcxml::TEXT, tcnprefix::TEXT, urlprefix::TEXT, urlcaption::TEXT, shortname::TEXT) FROM sitka.bc_overdrive_subscribers INTO marcxml;
 
     UPDATE biblio.record_entry set marc = marcxml WHERE id = rid;
        return true;
 END;
 $$ LANGUAGE PLPGSQL;
+
+CREATE TABLE sitka.bc_overdrive_subscribers (shortname TEXT);
+INSERT INTO sitka.bc_overdrive_subscribers VALUES
+('BB'),
+('BNV'),
+('BMV'),
+('BVA'),
+('BPE'),
+('BCOQ'),
+('BNW'),
+('BSUR'),
+('BNVD'),
+('BBI'),
+('BSQ'),
+('BW'),
+('BRI'),
+('BABF'),
+('BLP'),
+('BGIBSE'),
+('BPMP'),
+('BMB'),
+('BVDH'),
+('BFSJA'),
+('BPG'),
+('BWLCR'),
+('BMK'),
+('BGSI'),
+('BCR'),
+('BVI'),
+('BS'),
+('BFN'),
+('BPRDP'),
+('BTA'),
+('BNA'),
+('BF'),
+('BH'),
+('BSPA'),
+('BHA'),
+('BTR'),
+('BHH'),
+('BPR'),
+('BCHE'),
+('BKASL'),
+('BFSJ'),
+('BR'),
+('BFBV'),
+('BKI'),
+('BCD'),
+('BIN'),
+('BGF'),
+('BSA'),
+('BNE'),
+('BT'),
+('BTE'),
+('BCRE'),
+('BKO'),
+('BP'),
+('BKCT'),
+('BNVI');