fixes bug#18139

qua: Juliane
dev: Wilian
Implementei a sequência com a mesma solução que tem na entidade AIDF.

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@100326 d1611594-4594-4d17-8e1d-87c2c4800839
master
guilherme.lopes 2020-02-20 18:22:16 +00:00
parent 75b91903c5
commit c680321534
4 changed files with 29 additions and 0 deletions

View File

@ -0,0 +1,7 @@
declare
column_exists exception;
pragma exception_init (column_exists , -01430);
begin
execute immediate 'ALTER TABLE FORMA_PAGO_DET MODIFY (FORMAPAGO_ID NUMBER(2, 0))';
exception when column_exists then null;
end;

View File

@ -0,0 +1,7 @@
declare
dup_val_on_index exception;
pragma exception_init (dup_val_on_index , -00001);
begin
execute immediate 'INSERT INTO CONSTANTE (CONSTANTE_ID, NOMBCONSTANTE, DESCCONSTANTE, INDTIPOCONSTANTE, VALORCONSTANTE, INDMANTENIMIENTOUSUARIO, ACTIVO, FECMODIF, USUARIO_ID) VALUES (CONSTANTE_SEQ.NEXTVAL, ''LIMITE_ID_FORMA_PAGTO'', ''LIMITE_ID_FORMA_PAGTO'', ''1'', ''99'', ''1'', ''1'', sysdate, ''1'')';
exception when dup_val_on_index then null;
end;

View File

@ -0,0 +1,7 @@
DO $$
BEGIN
ALTER TABLE FORMA_PAGO_DET ALTER COLUMN FORMAPAGO_ID TYPE NUMERIC(2,0);
EXCEPTION WHEN duplicate_column THEN NULL;
END
$$;

View File

@ -0,0 +1,8 @@
DO $$
BEGIN
INSERT INTO CONSTANTE (CONSTANTE_ID, NOMBCONSTANTE, DESCCONSTANTE, INDTIPOCONSTANTE, VALORCONSTANTE, INDMANTENIMIENTOUSUARIO, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (NEXTVAL('constante_seq'), 'LIMITE_ID_FORMA_PAGTO', 'LIMITE_ID_FORMA_PAGTO', '1', '99', '1', '1', now(), '1');
EXCEPTION WHEN unique_violation THEN NULL;
END
$$;