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;