From 8ecb815c01e3d3cc6aba238930593f6b4688cb0d Mon Sep 17 00:00:00 2001
From: Jan Kvetina <jan.kvetina@gmail.com>
Date: Sun, 30 Jan 2022 15:38:18 +0100
Subject: [PATCH] Adjust debug mode from PL/SQL (on demand)

---
 packages/app.spec.sql |  9 +++++++++
 packages/app.sql      | 10 ++++++++++
 2 files changed, 19 insertions(+)

diff --git a/packages/app.spec.sql b/packages/app.spec.sql
index 18bb1bc..2d17a6b 100644
--- a/packages/app.spec.sql
+++ b/packages/app.spec.sql
@@ -242,6 +242,15 @@ CREATE OR REPLACE PACKAGE app AS
 
 
 
+    --
+    -- Option to change DEBUG mode
+    --
+    PROCEDURE set_debug (
+        in_status               BOOLEAN                     := TRUE
+    );
+
+
+
     --
     -- Return current owner (because APEX dont like using USER)
     --
diff --git a/packages/app.sql b/packages/app.sql
index 0fdc31e..b23e342 100644
--- a/packages/app.sql
+++ b/packages/app.sql
@@ -309,6 +309,16 @@ CREATE OR REPLACE PACKAGE BODY app AS
 
 
 
+    PROCEDURE set_debug (
+        in_status               BOOLEAN                     := TRUE
+    )
+    AS
+    BEGIN
+        APEX_APPLICATION.G_DEBUG := in_status;
+    END;
+
+
+
     FUNCTION get_owner (
         in_app_id               apps.app_id%TYPE            := NULL
     )