script de menu de alias classe fixes bug#AL-4470' (!117) from AL-4470 into master

Reviewed-on: utilidades/Flyway#117
Reviewed-by: Gleison da Cruz <gleison.cruz@totvs.com.br>
master
fabio 2024-06-04 14:27:11 +00:00
commit e9a3d3c90d
2 changed files with 18 additions and 1 deletions

View File

@ -4,7 +4,7 @@
<modelVersion>4.0.0</modelVersion> <modelVersion>4.0.0</modelVersion>
<groupId>br.com.rjconsultores</groupId> <groupId>br.com.rjconsultores</groupId>
<artifactId>Flyway</artifactId> <artifactId>Flyway</artifactId>
<version>1.45.0</version> <version>1.45.1</version>
<distributionManagement> <distributionManagement>
<repository> <repository>

View File

@ -0,0 +1,17 @@
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 funcion_sistema (FUNCIONSISTEMA_ID,SISTEMA_ID,NOMBFUNCION,DESCRUTA,ACTIVO,FECMODIF,USUARIO_ID)
VALUES
(funcion_sistema_seq.NEXTVAL, 1, ''ADM > ESQUEMA OPERACIONAL > ALIAS CLASSE'',
''COM.RJCONSULTORES.ADMINISTRACION.GUI.ESQUEMAOPERACIONAL.MENU.ALIASCLASSE'', 1, SYSDATE, 1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;