From b32ab996496297312fe6e3a88892ca0fabd88d3c Mon Sep 17 00:00:00 2001
From: fpellet <git@florentpellet.com>
Date: Fri, 13 Dec 2019 10:17:04 +0100
Subject: [PATCH] translate update_quality of plsql

---
 postgres/update_quality.sql | 72 +++++++++++++++++++++++++++++++++++++
 1 file changed, 72 insertions(+)
 create mode 100644 postgres/update_quality.sql

diff --git a/postgres/update_quality.sql b/postgres/update_quality.sql
new file mode 100644
index 00000000..e19d6863
--- /dev/null
+++ b/postgres/update_quality.sql
@@ -0,0 +1,72 @@
+CREATE OR REPLACE PROCEDURE update_quality()
+LANGUAGE plpgsql
+AS $$
+DECLARE
+  c_items CURSOR FOR
+    SELECT name, sell_in, quality FROM item FOR UPDATE;
+  l_item RECORD;
+  l_name item.name%TYPE;
+  l_sell_in item.sell_in%TYPE;
+  l_quality item.quality%TYPE;
+BEGIN
+  OPEN c_items;
+  LOOP
+    FETCH c_items INTO l_item;
+    EXIT WHEN NOT FOUND;
+
+    l_name    := l_item.name;
+    l_sell_in := l_item.sell_in;
+    l_quality := l_item.quality;
+
+    IF l_name <> 'Aged Brie' AND l_name <> 'Backstage passes to a TAFKAL80ETC concert' THEN
+      IF l_quality > 0 THEN
+        IF l_name <> 'Sulfuras, Hand of Ragnaros' THEN
+          l_quality := l_quality - 1;
+        END IF;
+      END IF;
+    ELSE
+      IF (l_quality < 50) THEN
+        l_quality := l_quality + 1;
+        IF l_name = 'Backstage passes to a TAFKAL80ETC concert' THEN
+          IF l_sell_in < 11 THEN
+            IF l_quality < 50 THEN
+              l_quality := l_quality + 1;
+            END IF;
+          END IF;
+          IF l_sell_in < 6 THEN
+            IF l_quality < 50 THEN
+              l_quality := l_quality + 1;
+            END IF;
+          END IF;
+        END IF;
+      END IF;
+    END IF;
+
+    IF l_name <> 'Sulfuras, Hand of Ragnaros' THEN
+      l_sell_in := l_sell_in - 1;
+    END IF;
+
+    IF l_sell_in < 0 THEN
+      IF l_name <> 'Aged Brie' THEN
+        IF l_name <> 'Backstage passes to a TAFKAL80ETC concert' THEN
+          IF l_quality > 0 THEN
+            IF l_name <> 'Sulfuras, Hand of Ragnaros' THEN
+              l_quality := l_quality - 1;
+            END IF;
+          END IF;
+        ELSE
+          l_quality := l_quality - l_quality;
+        END IF;
+      ELSE
+        IF l_quality < 50 THEN
+          l_quality := l_quality + 1;
+        END IF;
+      END IF;
+    END IF;
+
+    UPDATE item
+      SET name = l_name, sell_in = l_sell_in, quality = l_quality WHERE CURRENT OF c_items;
+  END LOOP;
+  CLOSE c_items;
+END;
+$$;