fixes bug#21318

qua:
dev:WALLACE

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@105115 d1611594-4594-4d17-8e1d-87c2c4800839
master
aristides 2021-01-21 13:55:45 +00:00
parent a128d6d198
commit e80d0ef489
2 changed files with 115 additions and 0 deletions

View File

@ -0,0 +1,70 @@
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate
'CREATE TABLE AGRUPAMENTO_PARADA
(
AGRUPAMENTOPARADA_ID NUMBER(7,0) NOT NULL ENABLE,
DESCAGRUPAMENTOPARADA VARCHAR2(180 BYTE) NOT NULL ENABLE,
CVEAGRUPAMENTOPARADA VARCHAR2(30 BYTE),
USUARIO_ID NUMBER(7,0) ,
FECMODIF DATE,
ACTIVO NUMBER(1,0),
CONSTRAINT "PK_AGRUPAMENTOPARADA" PRIMARY KEY ("AGRUPAMENTOPARADA_ID"),
CONSTRAINT "FK_AGRUPAMENTOPARADA_USUARIO" FOREIGN KEY ("USUARIO_ID") REFERENCES USUARIO("USUARIO_ID")
)';
exception when object_exists then null;
end;
/
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate
'CREATE SEQUENCE AGRUPAMENTOPARADA_SEQ MINVALUE 1 MAXVALUE 9999999 INCREMENT BY 1 START WITH 1 CACHE 20 NOORDER NOCYCLE';
exception when object_exists then null;
end;
/
declare
column_exists exception;
pragma exception_init (column_exists , -01430);
begin
execute immediate
'ALTER TABLE PARADA ADD AGRUPAMENTOPARADA_ID NUMBER(7,0)';
exception when column_exists then null;
end;
/
declare
dup_val_on_index exception;
except_02275 exception;
pragma exception_init (dup_val_on_index , -01430);
pragma exception_init (except_02275 , -02275);
begin
execute immediate 'ALTER TABLE PARADA ADD CONSTRAINT FK_PARADA_AGRUPAMENTOPARADA FOREIGN KEY (AGRUPAMENTOPARADA_ID) REFERENCES AGRUPAMENTO_PARADA (AGRUPAMENTOPARADA_ID)';
exception
when dup_val_on_index then null;
when except_02275 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 FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (FUNCION_SISTEMA_SEQ.nextval, 1, ''ADM > ESQUEMA OPERACIONAL > AGRUPAR LOCALIDADES>> CADASTRA OS AGRUPAMENTOS DE PARADA'',
''COM.RJCONSULTORES.ADMINISTRACION.GUI.ESQUEMAOPERACIONAL.MENU.AGRUPARPARADAS'', 1,
SYSDATE, -1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;

View File

@ -0,0 +1,45 @@
DO $$
BEGIN
CREATE TABLE AGRUPAMENTO_PARADA (
AGRUPAMENTOPARADA_ID NUMBER(7) NOT NULL,
DESCAGRUPAMENTOPARADA VARCHAR2(180) NOT NULL,
CVEAGRUPAMENTOPARADA VARCHAR2(30) NOT NULL,
USUARIO_ID NUMBER(7,0),
FECMODIF DATE,
ACTIVO NUMBER(1),
PRIMARY KEY (AGRUPAMENTOPARADA_ID),
FOREIGN KEY (USUARIO_ID) REFERENCES USUARIO
);
CREATE SEQUENCE AGRUPAMENTOPARADA_SEQ INCREMENT BY 1 START WITH 1 NOCACHE ORDER NOCYCLE;
EXCEPTION
WHEN duplicate_table THEN NULL;
WHEN duplicate_object THEN NULL;
WHEN unique_violation THEN NULL;
END
$$;
DO $$
BEGIN
ALTER TABLE PARADA ADD AGRUPAMENTOPARADA_ID NUMBER(7,0);
EXCEPTION WHEN duplicate_column THEN NULL;
END
$$;
DO $$
BEGIN
ALTER TABLE PARADA ADD CONSTRAINT FK_PARADA_AGRUPAMENTOPARADA FOREIGN KEY (AGRUPAMENTOPARADA_ID) REFERENCES AGRUPAMENTO_PARADA (AGRUPAMENTOPARADA_ID);
EXCEPTION WHEN duplicate_object THEN NULL;
END
$$;
DO $$
BEGIN
insert into funcion_sistema (funcionsistema_id,sistema_id,nombfuncion,descruta,activo,fecmodif,usuario_id)
values (nextval('funcion_sistema_seq'),1,'ADM > ESQUEMA OPERACIONAL > AGRUPAR LOCALIDADES> CADASTRA OS AGRUPAMENTOS DE PARADAS','COM.RJCONSULTORES.ADMINISTRACION.GUI.ESQUEMAOPERACIONAL.MENU.AGRUPARPARADAS',1,now(),1);
EXCEPTION WHEN unique_violation THEN NULL;
END
$$;