65 lines
1.8 KiB
MySQL
65 lines
1.8 KiB
MySQL
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 OCD_PARAM ADD INDREEMBOLSOADMIN NUMBER(1,0)';
|
|
exception
|
|
when object_exists then null;
|
|
when except_01451 then null;
|
|
when except_01442 then null;
|
|
end;
|
|
/
|
|
|
|
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 OCD ADD INDREEMBOLSOADMIN NUMBER(1,0)';
|
|
exception
|
|
when object_exists then null;
|
|
when except_01451 then null;
|
|
when except_01442 then null;
|
|
end;
|
|
/
|
|
|
|
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 OCD ADD TIPODEREEMBOLSO NUMBER(2,0)';
|
|
exception
|
|
when object_exists then null;
|
|
when except_01451 then null;
|
|
when except_01442 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 AUTORIZACION (AUTORIZACION_ID,NOMBAUTORIZACION,DESCAUTORIZACION,ACTIVO,FECMODIF,USUARIO_ID) values (AUTORIZACION_SEQ.NEXTVAL,''AUT_REEMBOLSO_ADMIN'',''AUTORIZACAO PARA REEMBOLSAR ADMINISTRATIVAMENTE A OCD'',1,SYSDATE,1)';
|
|
exception
|
|
when dup_val_on_index then null;
|
|
when except_02291 then null;
|
|
end;
|
|
|