16970: Parametrizar Venda embarcada não Bpe

fixes bug#16970
dev: valdevir
qua:


git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@98645 d1611594-4594-4d17-8e1d-87c2c4800839
master
leonardo 2019-11-06 20:04:26 +00:00
parent 145db329e9
commit cddef314b9
2 changed files with 21 additions and 0 deletions

View File

@ -0,0 +1,15 @@
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 DISPOSITIVO_EMBARCADA ADD (IND_VENDE_BPE NUMBER(1,0) )';
exception
when object_exists then null;
when except_01451 then null;
when except_01442 then null;
end;

View File

@ -0,0 +1,6 @@
DO $$
BEGIN
ALTER TABLE DISPOSITIVO_EMBARCADA ADD (IND_VENDE_BPE NUMBER(1,0) );
EXCEPTION WHEN duplicate_column THEN NULL;
END
$$;