dECLARE
TOT_COL NUMBER(5);
TOT_ROW NUMBER(5);
COUNT_roomid rooms.room_id%type;
COUNT_SEATID SEATS.SEAT_id%type;

CURSOR R is select count(room_id) from rooms;
CURSOR S is select count(SEAT_ID) from SEATS;

BEGIN
    SELECT ROOMS.TOTAL_ROWS INTO TOT_ROW FROM ROOMS;
TOT_COL:=:COLS;

OPEN R;
    LOOP
      FETCH R into COUNT_roomid;
      EXIT WHEN R%NOTFOUND;
    END LOOP;
CLOSE R;

  :ROOM_ID := COUNT_roomid + 1;
  
OPEN S;
  LOOP
      FETCH S into COUNT_SEATID;
      EXIT WHEN S%NOTFOUND;
  END LOOP;

 :SEAT_ID := COUNT_SEATID + 1;

CLOSE S;
 
   
    
  FOR J IN 1..TOT_COL LOOP
     FOR K IN 1..TOT_ROW LOOP
        INSERT INTO SEATS(ROOMS_NO,COL_NO)
	VALUES(J,K);
        commit;
     END LOOP;
  END LOOP;
:SEAT_ID := COUNT_SEATID + 1;
 
EXCEPTION
  WHEN OTHERS THEN
  message(SQLERRM);
END;