push inserts into do block so they can consume local variables, need to setup log inserts

This commit is contained in:
Paul Trowbridge 2017-10-23 10:12:37 -04:00
parent b3775210b5
commit 51fbec1244

View File

@ -15,9 +15,14 @@ DO $$
DECLARE _t text; DECLARE _t text;
DECLARE _c text; DECLARE _c text;
DECLARE _path text;
DECLARE _srce text;
BEGIN BEGIN
_path := 'C:\users\ptrowbridge\downloads\lon_loan_ledgerbal.csv';
_srce := 'PNCO';
----------------------------------------------------build the column list of the temp table---------------------------------------------------------------- ----------------------------------------------------build the column list of the temp table----------------------------------------------------------------
SELECT SELECT
@ -31,7 +36,7 @@ BEGIN
--unwrap the schema definition array --unwrap the schema definition array
LEFT JOIN LATERAL jsonb_populate_recordset(null::tps.srce_defn_schema, defn->'schema') prs ON TRUE LEFT JOIN LATERAL jsonb_populate_recordset(null::tps.srce_defn_schema, defn->'schema') prs ON TRUE
WHERE WHERE
srce = 'PNCC' srce = _srce
GROUP BY GROUP BY
srce; srce;
@ -48,22 +53,17 @@ BEGIN
----------------------------------------------------do the insert------------------------------------------------------------------------------------------- ----------------------------------------------------do the insert-------------------------------------------------------------------------------------------
--the column list needs to be dynamic forcing this whole line to be dynamic --the column list needs to be dynamic forcing this whole line to be dynamic
_t := format('COPY csv_i (%s) FROM ''C:\Users\ptrowbridge\downloads\transsearchcsv.csv'' WITH (HEADER TRUE,DELIMITER '','', FORMAT CSV, ENCODING ''SQL_ASCII'',QUOTE ''"'');',_c); _t := format('COPY csv_i (%s) FROM %L WITH (HEADER TRUE,DELIMITER '','', FORMAT CSV, ENCODING ''SQL_ASCII'',QUOTE ''"'');',_c,_path);
--RAISE NOTICE '%', _t; --RAISE NOTICE '%', _t;
EXECUTE _t; EXECUTE _t;
WITH
END -------------for each imported row in the COPY table, genereate the json rec, and a column for the json key specified in the srce.defn-----------
$$;
pending_list AS (
WITH
-------------for each imported row in the COPY table, genereate the json rec, and a column for the json key specified in the srce.defn-----------
pending_list AS (
SELECT SELECT
---creates a key value pair and then aggregates rows of key value pairs ---creates a key value pair and then aggregates rows of key value pairs
jsonb_object_agg( jsonb_object_agg(
@ -77,7 +77,7 @@ pending_list AS (
FROM FROM
csv_i i csv_i i
INNER JOIN tps.srce s ON INNER JOIN tps.srce s ON
s.srce = 'PNCC' s.srce = _srce
LEFT JOIN LATERAL JSONB_ARRAY_ELEMENTS_TEXT(defn->'unique_constraint'->'fields') WITH ORDINALITY ae(e, rn) ON TRUE LEFT JOIN LATERAL JSONB_ARRAY_ELEMENTS_TEXT(defn->'unique_constraint'->'fields') WITH ORDINALITY ae(e, rn) ON TRUE
GROUP BY GROUP BY
i.*, i.*,
@ -85,38 +85,39 @@ pending_list AS (
id id
ORDER BY ORDER BY
id ASC id ASC
) )
-----------create a unique list of keys from staged rows------------------------------------------------------------------------------------------ -----------create a unique list of keys from staged rows------------------------------------------------------------------------------------------
, pending_keys AS ( , pending_keys AS (
SELECT DISTINCT SELECT DISTINCT
json_key json_key
FROM FROM
pending_list pending_list
) )
-----------return unique keys that are not already in tps.trans----------------------------------------------------------------------------------- -----------return unique keys that are not already in tps.trans-----------------------------------------------------------------------------------
, unmatched_keys AS ( , unmatched_keys AS (
SELECT SELECT
json_key json_key
FROM FROM
pending_keys pending_keys
EXCEPT EXCEPT
SELECT DISTINCT SELECT DISTINCT
k.json_key k.json_key
FROM FROM
pending_keys k pending_keys k
INNER JOIN tps.trans t ON INNER JOIN tps.trans t ON
t.rec @> k.json_key t.rec @> k.json_key
) )
-----------insert pending rows that have key with no trans match----------------------------------------------------------------------------------- -----------insert pending rows that have key with no trans match-----------------------------------------------------------------------------------
--need to look into mapping the transactions prior to loading
, inserted AS ( , inserted AS (
INSERT INTO INSERT INTO
tps.trans (srce, rec) tps.trans (srce, rec)
SELECT SELECT
@ -131,11 +132,11 @@ FROM
----this conflict is only if an exact duplicate rec json happens, which will be rejected ----this conflict is only if an exact duplicate rec json happens, which will be rejected
----therefore, records may not be inserted due to ay matches with certain json fields, or if the entire json is a duplicate, reason is not specified ----therefore, records may not be inserted due to ay matches with certain json fields, or if the entire json is a duplicate, reason is not specified
RETURNING * RETURNING *
) )
-----------list of records not inserted-------------------------------------------------------------------------------------------------------------- -----------list of records not inserted--------------------------------------------------------------------------------------------------------------
, not_inserted AS ( , not_inserted AS (
SELECT SELECT
srce srce
,rec ,rec
@ -149,21 +150,29 @@ FROM
,rec ,rec
FROM FROM
inserted inserted
) )
--------summarize records not inserted-------------------+------------------------------------------------------------------------------------------------ --------insert to log-------------------------------------------------------------------------------------------------------------------------------------
--below select should be loaded to the log table
SELECT
--------summarize records not inserted-------------------+------------------------------------------------------------------------------------------------
SELECT
t.srce t.srce
,(ae.e::text[])[1] unq_constr ,(ae.e::text[])[1] unq_constr
,MIN(rec #>> ae.e::text[]) min_text ,MIN(rec #>> ae.e::text[]) min_text
,MAX(rec #>> ae.e::text[]) max_text ,MAX(rec #>> ae.e::text[]) max_text
,JSONB_PRETTY(JSON_AGG(rec #> ae.e::text[] ORDER BY rec #>> ae.e::text[])::JSONB) ,JSONB_PRETTY(JSON_AGG(rec #> ae.e::text[] ORDER BY rec #>> ae.e::text[])::JSONB)
FROM FROM
not_inserted t not_inserted t
INNER JOIN tps.srce s ON INNER JOIN tps.srce s ON
s.srce = t.srce s.srce = t.srce
LEFT JOIN LATERAL JSONB_ARRAY_ELEMENTS_TEXT(defn->'unique_constraint'->'fields') WITH ORDINALITY ae(e, rn) ON TRUE LEFT JOIN LATERAL JSONB_ARRAY_ELEMENTS_TEXT(defn->'unique_constraint'->'fields') WITH ORDINALITY ae(e, rn) ON TRUE
GROUP BY GROUP BY
t.srce t.srce
,(ae.e::text[])[1]; ,(ae.e::text[])[1];
END
$$;