From 2ba73ac036b88937a26b2b2805d776b79f2ad4ad Mon Sep 17 00:00:00 2001
From: Paul Trowbridge <paul@hptrow.me>
Date: Wed, 1 Oct 2025 15:16:44 -0400
Subject: [PATCH] migrate rlarp to pricing

---
 procs/single_price_call.ms.sql |  4 +--
 tables/cust.ms.sql             | 54 ++++++++++++++++++++++++++++++++++
 tables/ffcret.ms.sql           |  1 +
 tables/ffterr.ms.sql           |  1 +
 tables/gld.ms.sql              |  1 +
 tables/qrh.ms.sql              |  1 +
 tables/repc.ms.sql             |  4 +--
 tables/sach.ms.sql             |  1 +
 8 files changed, 63 insertions(+), 4 deletions(-)
 create mode 100644 tables/ffcret.ms.sql
 create mode 100644 tables/ffterr.ms.sql
 create mode 100644 tables/gld.ms.sql
 create mode 100644 tables/qrh.ms.sql
 create mode 100644 tables/sach.ms.sql

diff --git a/procs/single_price_call.ms.sql b/procs/single_price_call.ms.sql
index 2d07dcd..b6e84bf 100644
--- a/procs/single_price_call.ms.sql
+++ b/procs/single_price_call.ms.sql
@@ -200,8 +200,8 @@ BEGIN
 		calculated_pallets = FLOOR(q.vol / NULLIF(i.mpck, 0)),
 		exact_pallets = CAST(ROUND(q.vol / NULLIF(i.mpck, 0), 5) AS NUMERIC(20,5)) 
 	FROM @queue q
-	LEFT JOIN fanalysis.rlarp.cust bc ON bc.code = q.bill
-	LEFT JOIN fanalysis.rlarp.cust sc ON sc.code = q.ship
+	LEFT JOIN pricing.cust bc ON bc.code = q.bill
+	LEFT JOIN pricing.cust sc ON sc.code = q.ship
 	LEFT JOIN CMSInterfaceIn.[CMS.CUSLG].itemm i ON i.item = q.part;
 
 
diff --git a/tables/cust.ms.sql b/tables/cust.ms.sql
index e69de29..65bbf36 100644
--- a/tables/cust.ms.sql
+++ b/tables/cust.ms.sql
@@ -0,0 +1,54 @@
+CREATE OR ALTER VIEW pricing.cust AS
+SELECT
+    bvcust code,
+    bvbill default_billto,
+    bvname descr,
+    CASE WHEN bvadr6 = '' THEN bvname ELSE bvadr6 END dba,
+    bvctry country,
+    bvprcd province,
+    bvcity city,
+    bvcomp remit_to,
+    bvclas cclass,
+    bvstat status,
+    bvtype ctype,
+    RTRIM(bvschl) plevel,
+    s.bk7des3 folder,
+--    pl.lists lists,
+    dr.repp default_rep,
+    rr.repp retail_rep,
+    gr.repp inside_rep,
+    nr.repp keyaccount_rep,
+    u.mfresp tier
+FROM
+    cmsinterfacein.lgdat.cust c
+    LEFT OUTER JOIN cmsinterfacein.lgpgm.usrcust ON
+        cucust = bvcust
+    LEFT OUTER JOIN pricing.repc dr ON
+        dr.rcode = bvsalm
+    LEFT OUTER JOIN pricing.repc rr ON
+        rr.rcode = currep
+    LEFT OUTER JOIN pricing.repc gr ON
+        gr.rcode = cugrep
+    LEFT OUTER JOIN pricing.repc nr ON
+        nr.rcode = cunrep
+    LEFT OUTER JOIN pricing.sach s ON
+        s.bk7code = c.bvschl
+    LEFT OUTER JOIN pricing.ffterr t ON
+        t.prov = bvprcd
+        AND t.ctry = bvctry
+    LEFT OUTER JOIN pricing.ffcret x ON
+        x.fcur = c.bvcurr
+        AND x.tcur = 'US'
+        AND x.perd = (SELECT fspr FROM pricing.gld WHERE GETDATE()  BETWEEN sdat AND edat)
+        AND x.rtyp = 'MA'
+    LEFT OUTER JOIN cmsinterfacein.lgdat.usrc u ON 
+        u.mfsrce = 'MN' 
+        AND u.mfent# = 12
+        AND u.mfkey2 = c.bvcust
+--	LEFT OUTER JOIN (
+--	    SELECT jbplvl, STRING_AGG(JBPLCD, ', ') AS lists
+--	    FROM CMSinterfacein.[CMS.CUSLG].iprcbhc
+--	    GROUP BY jbplvl
+--	) AS pl ON
+--	    pl.jbplvl = c.bvschl
+--	WHERE CASE WHEN bvadr6 = '' THEN bvname ELSE bvadr6 END = 'GRIFFIN'
diff --git a/tables/ffcret.ms.sql b/tables/ffcret.ms.sql
new file mode 100644
index 0000000..0070ee9
--- /dev/null
+++ b/tables/ffcret.ms.sql
@@ -0,0 +1 @@
+SELECT * INTO pricing.ffcret FROM fanalysis.rlarp.ffcret
diff --git a/tables/ffterr.ms.sql b/tables/ffterr.ms.sql
new file mode 100644
index 0000000..6a5bf23
--- /dev/null
+++ b/tables/ffterr.ms.sql
@@ -0,0 +1 @@
+SELECT * INTO pricing.ffterr FROM fanalysis.rlarp.ffterr
diff --git a/tables/gld.ms.sql b/tables/gld.ms.sql
new file mode 100644
index 0000000..7db2db0
--- /dev/null
+++ b/tables/gld.ms.sql
@@ -0,0 +1 @@
+SELECT * INTO pricing.gld FROM fanalysis.rlarp.gld
diff --git a/tables/qrh.ms.sql b/tables/qrh.ms.sql
new file mode 100644
index 0000000..aa9e2a7
--- /dev/null
+++ b/tables/qrh.ms.sql
@@ -0,0 +1 @@
+SELECT * INTO pricing.pricing.qrh FROM fanalysis.RLARP.QRH q 
\ No newline at end of file
diff --git a/tables/repc.ms.sql b/tables/repc.ms.sql
index bbdfc90..7ac3166 100644
--- a/tables/repc.ms.sql
+++ b/tables/repc.ms.sql
@@ -1,4 +1,4 @@
-ALTER VIEW pricing.repc AS
+CREATE OR ALTER VIEW pricing.repc AS
 WITH
 code AS (
     SELECT
@@ -14,5 +14,5 @@ SELECT
     ,COALESCE(q.dir,'Other') director
 FROM 
     code c
-    FULL OUTER JOIN rlarp.qrh q ON 
+    FULL OUTER JOIN pricing.qrh q ON 
         q.qr = c.rcode
diff --git a/tables/sach.ms.sql b/tables/sach.ms.sql
new file mode 100644
index 0000000..7c4a869
--- /dev/null
+++ b/tables/sach.ms.sql
@@ -0,0 +1 @@
+SELECT * INTO pricing.sach FROM fanalysis.lgdat.sach;