From bd26f4ab2f3945a1773b48a1efc879df4c56bea1 Mon Sep 17 00:00:00 2001
From: Paul Trowbridge <fleetside72@hotmail.com>
Date: Thu, 20 Sep 2018 23:38:11 -0400
Subject: [PATCH] several type conversion required

---
 db_deploy.sql                  | 24 +++++++++++-------------
 schema/tables/bal.sql          |  2 +-
 schema/triggers/log_insert.sql |  2 +-
 3 files changed, 13 insertions(+), 15 deletions(-)

diff --git a/db_deploy.sql b/db_deploy.sql
index 0c4b1bb..9388bbf 100644
--- a/db_deploy.sql
+++ b/db_deploy.sql
@@ -68,7 +68,7 @@ COMMENT ON COLUMN evt.gl.bprkeys IS 'extract from initial basic pecuniary record
 
 CREATE TABLE evt.bal (
     acct ltree REFERENCES evt.acct(acct)
-    ,perd ltree
+    ,perd ltree REFERENCES evt.fspr(id)
     ,obal numeric(12,2)
     ,debits numeric(12,2)
     ,credits numeric(12,2)
@@ -117,7 +117,7 @@ CREATE OR REPLACE FUNCTION evt.log_insert() RETURNS trigger
     ,ex_gl_line AS (
         SELECT 
             id
-            ,gl_line->>'account' account
+            ,(gl_line->>'account')::ltree account
             ,(gl_line->>'amount')::numeric amount
             ,gl_rownum
             --aggregate all the path references back to the gl line
@@ -144,15 +144,15 @@ CREATE OR REPLACE FUNCTION evt.log_insert() RETURNS trigger
     INSERT INTO
         evt.gl (bprid,acct, amount,tstmp , fspr, glline, bprkeys)
     SELECT
-        id
-        ,account
-        ,amount
-        ,(bprkeys->>'date')::timestamptz
-        ,p.fspr
-        ,gl_rownum
-        ,bprkeys
+        e.id
+        ,e.account
+        ,e.amount
+        ,(e.bprkeys->>'date')::timestamptz
+        ,p.id
+        ,e.gl_rownum
+        ,e.bprkeys
     FROM 
-        ex_gl_line
+        ex_gl_line e
         LEFT OUTER JOIN evt.fspr p ON
             p.dur @> (bprkeys->>'date')::timestamptz;
     RETURN NULL;
@@ -164,6 +164,4 @@ CREATE TRIGGER log_insert
     AFTER INSERT ON evt.bpr
     REFERENCING NEW TABLE AS ins 
     FOR EACH STATEMENT 
-    EXECUTE PROCEDURE evt.log_insert();
-
-COMMIT;
+    EXECUTE PROCEDURE evt.log_insert();
\ No newline at end of file
diff --git a/schema/tables/bal.sql b/schema/tables/bal.sql
index 3b2e8d5..1f697d7 100644
--- a/schema/tables/bal.sql
+++ b/schema/tables/bal.sql
@@ -2,7 +2,7 @@
 
 CREATE TABLE evt.bal (
     acct ltree REFERENCES evt.acct(acct)
-    ,perd ltree
+    ,perd ltree REFERENCES evt.fspr(id)
     ,obal numeric(12,2)
     ,debits numeric(12,2)
     ,credits numeric(12,2)
diff --git a/schema/triggers/log_insert.sql b/schema/triggers/log_insert.sql
index 69c19c2..58059f8 100644
--- a/schema/triggers/log_insert.sql
+++ b/schema/triggers/log_insert.sql
@@ -34,7 +34,7 @@ CREATE OR REPLACE FUNCTION evt.log_insert() RETURNS trigger
     ,ex_gl_line AS (
         SELECT 
             id
-            ,gl_line->>'account' account
+            ,(gl_line->>'account')::ltree account
             ,(gl_line->>'amount')::numeric amount
             ,gl_rownum
             --aggregate all the path references back to the gl line