From dddcacee7a417fddb9dd712d4b02e3b9424b9668 Mon Sep 17 00:00:00 2001
From: robert <robert@verdnatura.es>
Date: Mon, 8 Apr 2024 12:01:27 +0200
Subject: [PATCH] feat: refs #6500

---
 db/routines/vn/procedures/riskAllClients.sql  | 34 ++++----
 .../vn2008/procedures/risk_vs_client_list.sql | 84 +++++++++++++++++++
 2 files changed, 101 insertions(+), 17 deletions(-)
 create mode 100644 db/routines/vn2008/procedures/risk_vs_client_list.sql

diff --git a/db/routines/vn/procedures/riskAllClients.sql b/db/routines/vn/procedures/riskAllClients.sql
index c818c715c0..f007247f36 100644
--- a/db/routines/vn/procedures/riskAllClients.sql
+++ b/db/routines/vn/procedures/riskAllClients.sql
@@ -2,28 +2,28 @@ DELIMITER $$
 CREATE OR REPLACE DEFINER=`root`@`localhost` PROCEDURE `vn`.`riskAllClients`(maxRiskDate DATE)
 BEGIN
 	
-	DROP TEMPORARY TABLE IF EXISTS tmp.clientGetDebt;
-	CREATE TEMPORARY TABLE tmp.clientGetDebt
-	(PRIMARY KEY (clientFk))
+	DROP TEMPORARY TABLE IF EXISTS tmp.client_list;
+    CREATE TEMPORARY TABLE tmp.client_list
+    (PRIMARY KEY (Id_Cliente))
 		ENGINE = MEMORY
-		SELECT id clientFk, null grade FROM client;
+		SELECT id Id_Cliente, null grade FROM vn.client;
 
-	CALL client_getDebt (maxRiskDate);
+    CALL vn2008.risk_vs_client_list(maxRiskDate);
 
 	SELECT 
-			c.RazonSocial,
-			c.Id_Cliente,
-			c.Credito,
-			CAST(r.risk as DECIMAL (10,2)) risk,
-			CAST(c.Credito - r.risk as DECIMAL (10,2)) Diferencia,
-			c.Id_Pais
-		FROM
-			vn2008.Clientes c
-				JOIN tmp.risk r ON r.clientFk = c.Id_Cliente
-				JOIN tmp.clientGetDebt ci ON c.Id_Cliente = ci.clientFk
-			GROUP BY c.Id_cliente;
+		c.RazonSocial,
+        c.Id_Cliente,
+        c.Credito,
+        CAST(r.risk as DECIMAL (10,2)) risk,
+        CAST(c.Credito - r.risk as DECIMAL (10,2)) Diferencia,
+        c.Id_Pais
+	FROM
+		vn2008.Clientes c
+			JOIN tmp.risk r ON r.Id_Cliente = c.Id_Cliente
+			JOIN tmp.client_list ci ON c.Id_Cliente = ci.Id_Cliente
+		GROUP BY c.Id_cliente;
 
 	DROP TEMPORARY TABLE IF EXISTS tmp.risk;
-	DROP TEMPORARY TABLE IF EXISTS tmp.clientGetDebt;
+    DROP TEMPORARY TABLE IF EXISTS tmp.client_list;
 END$$
 DELIMITER ;
diff --git a/db/routines/vn2008/procedures/risk_vs_client_list.sql b/db/routines/vn2008/procedures/risk_vs_client_list.sql
new file mode 100644
index 0000000000..92f94eb9f8
--- /dev/null
+++ b/db/routines/vn2008/procedures/risk_vs_client_list.sql
@@ -0,0 +1,84 @@
+DELIMITER $$
+CREATE OR REPLACE DEFINER=`root`@`localhost` PROCEDURE `vn2008`.`risk_vs_client_list`(maxRiskDate DATE)
+BEGIN
+/**
+ * Calcula el riesgo para los clientes activos de la tabla temporal tmp.client_list
+ *
+ * @deprecated usar vn.client_getDebt
+ * @param maxRiskDate Fecha maxima de los registros
+ * @return table tmp.risk
+ */
+	DECLARE startingDate DATETIME DEFAULT TIMESTAMPADD(DAY, - DAYOFMONTH(util.VN_CURDATE()) - 60, util.VN_CURDATE());
+	DECLARE endingDate DATETIME;
+	DECLARE MAX_RISK_ALLOWED INT DEFAULT 200;
+
+	SET maxRiskDate = IFNULL(maxRiskDate, util.VN_CURDATE());
+	SET endingDate = TIMESTAMP(maxRiskDate, '23:59:59');
+
+	DROP TEMPORARY TABLE IF EXISTS tmp.client_list_2;
+	CREATE TEMPORARY TABLE tmp.client_list_2
+		(PRIMARY KEY (Id_Cliente))
+		ENGINE = MEMORY
+		SELECT *
+			FROM tmp.client_list;
+
+	DROP TEMPORARY TABLE IF EXISTS tmp.client_list_3;
+	CREATE TEMPORARY TABLE tmp.client_list_3
+		(PRIMARY KEY (Id_Cliente))
+		ENGINE = MEMORY
+		SELECT *
+			FROM tmp.client_list;
+
+	DROP TEMPORARY TABLE IF EXISTS tmp.tickets_sin_facturar;
+	CREATE TEMPORARY TABLE tmp.tickets_sin_facturar
+		(PRIMARY KEY (Id_Cliente))
+		ENGINE = MEMORY
+			SELECT t.Id_Cliente, floor(IF(cl.isVies, 1, 1.1) * sum(Cantidad * Preu * (100 - Descuento) / 100)) as total
+			FROM Movimientos m
+				JOIN Tickets t on m.Id_Ticket = t.Id_Ticket
+				JOIN tmp.client_list c on c.Id_Cliente = t.Id_Cliente
+				JOIN vn.client cl ON cl.id = t.Id_Cliente
+			WHERE Factura IS NULL
+				AND Fecha BETWEEN startingDate AND endingDate
+			GROUP BY t.Id_Cliente;      
+
+	DROP TEMPORARY TABLE IF EXISTS tmp.risk;
+	CREATE TEMPORARY TABLE tmp.risk
+		(PRIMARY KEY (Id_Cliente))
+		ENGINE = MEMORY
+		SELECT Id_Cliente, SUM(amount) risk, sum(saldo) saldo
+			FROM Clientes c
+			JOIN (
+				SELECT clientFk, SUM(amount) amount,SUM(amount) saldo 
+					FROM vn.clientRisk
+						JOIN tmp.client_list on Id_Cliente = clientFk
+					GROUP BY clientFk
+				UNION ALL
+				SELECT Id_Cliente, SUM(Entregado),SUM(Entregado)
+					FROM Recibos
+						JOIN tmp.client_list_2 using(Id_Cliente)
+					WHERE  Fechacobro > endingDate
+					GROUP BY Id_Cliente
+				UNION ALL
+				SELECT Id_Cliente, total,0
+					FROM tmp.tickets_sin_facturar
+				UNION ALL
+				SELECT t.clientFk, CAST(-SUM(t.amount) / 100 AS DECIMAL(10,2)), CAST(-SUM(t.amount) / 100 AS DECIMAL(10,2))
+					FROM hedera.tpvTransaction t
+						JOIN tmp.client_list_3 on Id_Cliente = t.clientFk
+					WHERE  t.receiptFk IS NULL
+						AND t.status = 'ok'
+					GROUP BY t.clientFk
+			) t ON c.Id_Cliente = t.clientFk
+			WHERE c.activo != FALSE 
+			GROUP BY c.Id_Cliente;
+			
+	DELETE r.*
+		FROM tmp.risk r
+			JOIN vn2008.Clientes c on c.Id_Cliente = r.Id_Cliente
+			JOIN vn2008.pay_met pm on pm.id = c.pay_met_id
+		WHERE IFNULL(r.saldo,0) < 10
+			AND r.risk <= MAX_RISK_ALLOWED
+			AND pm.`name` = 'TARJETA';
+END$$
+DELIMITER ;