From e168e0308a535ad2b0022d5fb562f638fd64616b Mon Sep 17 00:00:00 2001
From: null <demo@atum.envx.io>
Date: Wed, 10 May 2023 13:47:18 +0000
Subject: [PATCH] {"message":"Entrega para control
 horario","version":1,"release":1,"haveIssueWithVersion":false,"tickets":["NINGUNO"]}

---
 BD/ORACLE/ATUM_BD/HR/PROCEDURE/SECURE_DML.SQL | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 BD/ORACLE/ATUM_BD/HR/PROCEDURE/SECURE_DML.SQL

diff --git a/BD/ORACLE/ATUM_BD/HR/PROCEDURE/SECURE_DML.SQL b/BD/ORACLE/ATUM_BD/HR/PROCEDURE/SECURE_DML.SQL
new file mode 100644
index 0000000..e967616
--- /dev/null
+++ b/BD/ORACLE/ATUM_BD/HR/PROCEDURE/SECURE_DML.SQL
@@ -0,0 +1,11 @@
+
+  CREATE OR REPLACE EDITIONABLE PROCEDURE "SECURE_DML" 
+IS
+BEGIN
+  IF TO_CHAR (SYSDATE, 'HH24:MI') NOT BETWEEN '08:00' AND '18:00'
+        OR TO_CHAR (SYSDATE, 'DY') IN ('SAT', 'SUN') THEN
+	RAISE_APPLICATION_ERROR (-20205, 
+		'You may only make changes during normal office hours');
+  END IF;
+END secure_dml;
+/
\ No newline at end of file