From 88568fbaa0e724835c6778bfc4c36a082a5bcc06 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Aristides=20dos=20Reis=20J=C3=BAnior?=
 <aristides.reis@totvs.com.br>
Date: Thu, 3 Oct 2024 10:24:58 -0300
Subject: [PATCH] fixes bug#AL-4463

---
 pom.xml                                     |  2 +-
 src/db/migration/V20241002_1637__AL4463.sql | 64 +++++++++++++++++++++
 2 files changed, 65 insertions(+), 1 deletion(-)
 create mode 100644 src/db/migration/V20241002_1637__AL4463.sql

diff --git a/pom.xml b/pom.xml
index 18d6daf9e..7485ce048 100644
--- a/pom.xml
+++ b/pom.xml
@@ -4,7 +4,7 @@
     <modelVersion>4.0.0</modelVersion>
     <groupId>br.com.rjconsultores</groupId>
     <artifactId>Flyway</artifactId>
-	<version>1.97.0</version> 
+	<version>1.98.0</version> 
 
 	<distributionManagement>
         <repository>
diff --git a/src/db/migration/V20241002_1637__AL4463.sql b/src/db/migration/V20241002_1637__AL4463.sql
new file mode 100644
index 000000000..5ddf6c13f
--- /dev/null
+++ b/src/db/migration/V20241002_1637__AL4463.sql
@@ -0,0 +1,64 @@
+declare 
+  object_exists exception;
+  except_01451  exception;
+  except_01442  exception;
+
+  pragma exception_init (object_exists , -01430);
+  pragma exception_init (except_01451  , -01451);
+  pragma exception_init (except_01442  , -01442);
+begin 
+  execute immediate 'ALTER TABLE OCD_PARAM ADD INDREEMBOLSOADMIN NUMBER(1,0)';
+  exception 
+    when object_exists  then null;
+    when except_01451  then null;
+    when except_01442  then null;
+end;
+/
+
+declare 
+  object_exists exception;
+  except_01451  exception;
+  except_01442  exception;
+
+  pragma exception_init (object_exists , -01430);
+  pragma exception_init (except_01451  , -01451);
+  pragma exception_init (except_01442  , -01442);
+begin 
+  execute immediate 'ALTER TABLE OCD ADD INDREEMBOLSOADMIN NUMBER(1,0)';
+  exception 
+    when object_exists  then null;
+    when except_01451  then null;
+    when except_01442  then null;
+end;
+/
+
+declare 
+  object_exists exception;
+  except_01451  exception;
+  except_01442  exception;
+
+  pragma exception_init (object_exists , -01430);
+  pragma exception_init (except_01451  , -01451);
+  pragma exception_init (except_01442  , -01442);
+begin 
+  execute immediate 'ALTER TABLE OCD ADD TIPODEREEMBOLSO NUMBER(2,0)';
+  exception 
+    when object_exists  then null;
+    when except_01451  then null;
+    when except_01442  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 AUTORIZACION (AUTORIZACION_ID,NOMBAUTORIZACION,DESCAUTORIZACION,ACTIVO,FECMODIF,USUARIO_ID) values (AUTORIZACION_SEQ.NEXTVAL,''AUT_REEMBOLSO_ADMIN'',''AUTORIZACAO PARA REEMBOLSAR ADMINISTRATIVAMENTE A OCD'',1,SYSDATE,1)';
+  exception 
+    when dup_val_on_index  then null;
+    when except_02291  then null;
+end;
+