declare 
    cursor C is
    select t.id,t.value
      from test05 t
     FOR UPDATE OF t.id; 
begin
  FOR rec in C loop
   insert into test05 (value) (select max(rec.id)||'a' from test05);
  end loop; 
  commit;  
end;

  CREATE TABLE ""BRON" 
   (	"MESTO" NUMBER, 
	"SEANS_DATE" DATE, 
	"FIO" VARCHAR2(20 BYTE)
   );

create or replace PROCEDURE FOR_BRON (MESTO# NUMBER,SEANS_DATE# DATE,FIO# VARCHAR2)
IS
CNT NUMBER;
BEGIN
SELECT v INTO CNT FROM (SELECT COUNT(*) v FROM BRON WHERE MESTO=MESTO# AND SEANS_DATE=SEANS_DATE# );
IF CNT=0 THEN
INSERT INTO BRON VALUES (MESTO#,SEANS_DATE#,FIO#);
ELSE  Raise_application_error( -20001, 'Такая запись уже есть');
END IF;
COMMIT;
END;

create or replace PROCEDURE FOR_BRON (MESTO# NUMBER,MESTO_DATE# DATE,FIO# VARCHAR2)
IS
CNT NUMBER;
BEGIN
FOR V IN (SELECT COUNT(1) OVER (ORDER BY 1) CNT FROM BRON S WHERE MESTO=MESTO# AND SEANS_DATE=MESTO_DATE# FOR UPDATE) LOOP
       CNT := V.CNT;
      EXIT;
    END LOOP;
    
IF CNT=0 THEN
INSERT INTO BRON VALUES (MESTO#,MESTO_DATE#,FIO#);
ELSE  Raise_application_error( -20001, 'УЖЕ ЕСТЬ ТАКАЯ ЗАПИСЬ, СЛЫШ');
END IF;
COMMIT;
END;