From: Rogan Hamby <rogan.hamby@gmail.com>
Date: Tue, 11 Dec 2018 20:24:42 +0000 (-0500)
Subject: seed value for canadian currencies are incorrect
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=4aa906c30be20da8cbba2291dd9f36ae02c6b2d9;p=working%2FEvergreen.git

seed value for canadian currencies are incorrect
---

diff --git a/Open-ILS/src/sql/Pg/200.schema.acq.sql b/Open-ILS/src/sql/Pg/200.schema.acq.sql
index 717f620f76..c91a3203d2 100644
--- a/Open-ILS/src/sql/Pg/200.schema.acq.sql
+++ b/Open-ILS/src/sql/Pg/200.schema.acq.sql
@@ -30,8 +30,8 @@ CREATE TABLE acq.currency_type (
 
 CREATE TABLE acq.exchange_rate (
     id              SERIAL  PRIMARY KEY,
-    from_currency   TEXT    NOT NULL REFERENCES acq.currency_type (code) DEFERRABLE INITIALLY DEFERRED,
-    to_currency     TEXT    NOT NULL REFERENCES acq.currency_type (code) DEFERRABLE INITIALLY DEFERRED,
+    from_currency   TEXT    NOT NULL REFERENCES acq.currency_type (code) ON UPDATE CASCADE DEFERRABLE INITIALLY DEFERRED,
+    to_currency     TEXT    NOT NULL REFERENCES acq.currency_type (code) ON UPDATE CASCADE DEFERRABLE INITIALLY DEFERRED,
     ratio           NUMERIC NOT NULL,
     CONSTRAINT exchange_rate_from_to_once UNIQUE (from_currency,to_currency)
 );
diff --git a/Open-ILS/src/sql/Pg/950.data.seed-values.sql b/Open-ILS/src/sql/Pg/950.data.seed-values.sql
index e83dc04688..b8f317ae7f 100644
--- a/Open-ILS/src/sql/Pg/950.data.seed-values.sql
+++ b/Open-ILS/src/sql/Pg/950.data.seed-values.sql
@@ -11914,10 +11914,10 @@ INSERT INTO action_trigger.environment (
 
 -- Use the ISO 4217 abbreviations for currency codes
 INSERT INTO acq.currency_type (code, label) VALUES ('USD', oils_i18n_gettext('USD', 'US Dollars', 'acqct', 'label'));
-INSERT INTO acq.currency_type (code, label) VALUES ('CAN', oils_i18n_gettext('CAN', 'Canadian Dollars', 'acqct', 'label'));
+INSERT INTO acq.currency_type (code, label) VALUES ('CAD', oils_i18n_gettext('CAD', 'Canadian Dollars', 'acqct', 'label'));
 INSERT INTO acq.currency_type (code, label) VALUES ('EUR', oils_i18n_gettext('EUR', 'Euros', 'acqct', 'label'));
 
-INSERT INTO acq.exchange_rate (from_currency,to_currency,ratio) VALUES ('USD','CAN',1.2);
+INSERT INTO acq.exchange_rate (from_currency,to_currency,ratio) VALUES ('USD','CAD',1.2);
 INSERT INTO acq.exchange_rate (from_currency,to_currency,ratio) VALUES ('USD','EUR',0.5);
 
 INSERT INTO acq.invoice_item_type (code,name) VALUES ('TAX',oils_i18n_gettext('TAX', 'Tax', 'aiit', 'name'));
diff --git a/Open-ILS/src/sql/Pg/upgrade/xxxx.cad_not_can.sql b/Open-ILS/src/sql/Pg/upgrade/xxxx.cad_not_can.sql
new file mode 100644
index 0000000000..6965e3260f
--- /dev/null
+++ b/Open-ILS/src/sql/Pg/upgrade/xxxx.cad_not_can.sql
@@ -0,0 +1,18 @@
+BEGIN;
+
+UPDATE acq.currency_type SET code = 'CAD' WHERE code = 'CAN';
+UPDATE acq.exchange_rate SET from_currency = 'CAD' WHERE code = 'CAN';
+UPDATE acq.exchange_rate SET to_currency = 'CAD' WHERE code = 'CAN';
+
+COMMIT;
+
+BEGIN;
+
+ALTER TABLE acq.exchange_rate 
+	DROP CONSTRAINT exchange_rate_from_currency_fkey
+	,ADD CONSTRAINT exchange_rate_from_currency_fkey FOREIGN KEY (from_currency) REFERENCES acq.currency_type (code) ON UPDATE CASCADE;
+ALTER TABLE acq.exchange_rate 
+	DROP CONSTRAINT exchange_rate_to_currency_fkey
+	,ADD CONSTRAINT exchange_rate_to_currency_fkey FOREIGN KEY (to_currency) REFERENCES acq.currency_type (code) ON UPDATE CASCADE;
+
+COMMIT;