From 9e97b2e76504268273d1e8811706a01ff8acfb66 Mon Sep 17 00:00:00 2001
From: "luis.espina" <luis.espina@RJMX2JWK7K3.mex01.local>
Date: Fri, 5 Jul 2024 18:23:36 -0400
Subject: [PATCH] bug#AL-4454 Bolivariano -- Regla de Redondeo. dev: Aurora
 qua:

---
 src/db/migration/V20240705_1528_AL-4454.sql | 42 +++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 src/db/migration/V20240705_1528_AL-4454.sql

diff --git a/src/db/migration/V20240705_1528_AL-4454.sql b/src/db/migration/V20240705_1528_AL-4454.sql
new file mode 100644
index 000000000..95b5b3397
--- /dev/null
+++ b/src/db/migration/V20240705_1528_AL-4454.sql
@@ -0,0 +1,42 @@
+declare 
+  column_exists exception;
+  pragma exception_init (column_exists , -01430);
+begin 
+  execute immediate 'ALTER TABLE redondeo MODIFY (valorinicial NUMBER(7, 2),
+    valorfinal NUMBER(7, 2),
+    valorredondeo NUMBER(7, 2)
+)';
+  exception when column_exists then null;
+end;
+/
+declare
+  dup_val_on_index  exception;
+  except_02291  exception;
+
+  pragma exception_init (dup_val_on_index  , -00001);
+  pragma exception_init (except_02291  , -02291);
+begin
+  execute immediate 'INSERT INTO CONSTANTE (CONSTANTE_ID,NOMBCONSTANTE,DESCCONSTANTE,INDTIPOCONSTANTE,
+        VALORCONSTANTE,INDMANTENIMIENTOUSUARIO,ACTIVO,FECMODIF,USUARIO_ID) 
+        values (CONSTANTE_SEQ.NEXTVAL,''CONFIG_ARREDONDAMENTO_CENTENAS'',''CONFIG DE ARREDONDAMENTO CENTENAS'',
+        null,''false'',null,''1'',sysdate,''1''))';
+  exception 
+    when dup_val_on_index  then null;
+    when except_02291  then null;
+end;
+/
+declare
+  dup_val_on_index  exception;
+  except_02291  exception;
+
+  pragma exception_init (dup_val_on_index  , -00001);
+  pragma exception_init (except_02291  , -02291);
+begin
+  execute immediate 'INSERT INTO CONSTANTE (CONSTANTE_ID,NOMBCONSTANTE,DESCCONSTANTE,INDTIPOCONSTANTE,
+        VALORCONSTANTE,INDMANTENIMIENTOUSUARIO,ACTIVO,FECMODIF,USUARIO_ID) 
+        values (CONSTANTE_SEQ.NEXTVAL,''TEMPO_LIMPEZA_CACHE_REDONDEO'',''TEMPO LIMPEZA CACHE REDONDEO'',
+        null,null,null,''1'',sysdate,''1'')';
+  exception 
+    when dup_val_on_index  then null;
+    when except_02291  then null;
+end;
\ No newline at end of file