bug#24313

dev: Valdir
qua:

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@111879 d1611594-4594-4d17-8e1d-87c2c4800839
master
wilian 2022-04-13 13:24:35 +00:00
parent 945ff52745
commit c7cc412184
2 changed files with 86 additions and 0 deletions

View File

@ -0,0 +1,44 @@
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate
'CREATE TABLE AJUSTE_CAJA_LOG (
AJUSTECAJALOG_ID NUMBER(15) NOT NULL,
CAJA_ID NUMBER(15) NULL,
IND_CAJA NUMBER(1) NULL,
IND_CAJA_FP NUMBER(1) NULL,
USUARIO_ID NUMBER(7) NULL,
ACTIVO NUMBER(1) NULL,
FECMODIF DATE NULL,
PRIMARY KEY (AJUSTECAJALOG_ID)
)';
exception when object_exists then null;
end;
/
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate
'CREATE SEQUENCE AJUSTE_CAJA_LOG_SEQ MINVALUE 1 MAXVALUE 999999999999999 INCREMENT BY 1 START WITH 1 NOCACHE ORDER NOCYCLE';
exception when object_exists then null;
end;
/
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate
'CREATE INDEX IDX_CAJA_AJ_LOG ON AJUSTE_CAJA_LOG (CAJA_ID)';
exception when object_exists then null;
end;
/
declare
dup_val_on_index exception;
pragma exception_init (dup_val_on_index , -00001);
begin
execute immediate 'INSERT INTO CONSTANTE (CONSTANTE_ID, NOMBCONSTANTE, DESCCONSTANTE, VALORCONSTANTE, INDTIPOCONSTANTE, INDMANTENIMIENTOUSUARIO, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (CONSTANTE_SEQ.nextval, ''PERMITE_AJUSTE_CAIXA_ANTES_FECHAMENTO'', ''PERMITE AJUSTE DO CAIXA ANTES DO FECHAMENTO'', ''false'', ''1'', ''1'', ''1'', sysdate, ''1'')';
exception when dup_val_on_index then null;
end;

View File

@ -0,0 +1,42 @@
DO $$
BEGIN
CREATE TABLE AJUSTE_CAJA_LOG (
AJUSTECAJALOG_ID NUMBER(15) NOT NULL,
CAJA_ID NUMBER(15) NULL,
IND_CAJA NUMBER(1) NULL,
IND_CAJA_FP NUMBER(1) NULL,
USUARIO_ID NUMBER(7) NULL,
ACTIVO NUMBER(1) NULL,
FECMODIF DATE NULL,
PRIMARY KEY (AJUSTECAJALOG_ID));
EXCEPTION WHEN duplicate_object THEN NULL;
END
$$;
/
DO $$
BEGIN
CREATE SEQUENCE AJUSTE_CAJA_LOG_SEQ MINVALUE 1 MAXVALUE 999999999999999 INCREMENT BY 1 START WITH 1 NOCACHE ORDER NOCYCLE;
EXCEPTION WHEN duplicate_object THEN NULL;
END
$$;
/
DO $$
BEGIN
CREATE INDEX IDX_CAJA_AJ_LOG ON AJUSTE_CAJA_LOG (CAJA_ID);
EXCEPTION WHEN duplicate_object THEN NULL;
END
$$;
/
DO $$
BEGIN
INSERT INTO CONSTANTE (CONSTANTE_ID, NOMBCONSTANTE, DESCCONSTANTE, VALORCONSTANTE, INDTIPOCONSTANTE, INDMANTENIMIENTOUSUARIO, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (CONSTANTE_SEQ.nextval, 'PERMITE_AJUSTE_CAIXA_ANTES_FECHAMENTO', 'PERMITE AJUSTE DO CAIXA ANTES DO FECHAMENTO', 'FALSE', '1', '1', '1', now(), '1');
EXCEPTION
WHEN OTHERS THEN NULL;
WHEN unique_violation THEN NULL;
END
$$;