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 TIPO_IDENTIFICACION  values ( 	28	, ''D_FISICO'', 	1	, CURRENT_DATE, 1)';
  exception 
    when dup_val_on_index  then null;
    when except_02291  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 TIPO_IDENTIFICACION  values ( 	29	, ''J_CARENTE'', 	1	, CURRENT_DATE, 1)';
  exception 
    when dup_val_on_index  then null;
    when except_02291  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 TIPO_IDENTIFICACION  values ( 	30	, ''GRATUIDADE'', 	1	, CURRENT_DATE, 1)';
  exception 
    when dup_val_on_index  then null;
    when except_02291  then null;
end;