SQL - Insertar datos en PL/SQL

create or replace PROCEDURE CREAR_HABITACIONES

IS

    HABITACION VARCHAR2(2);

    PISO NUMBER(1);

    TIPO VARCHAR2(12);

BEGIN

    DELETE FROM HABITACIONES;

    FOR I IN 1..12 LOOP

        PISO := I;

        IF I <= 11 THEN

            FOR J IN 1..25 LOOP

                HABITACION := J;

                IF J <= 20 THEN

                    HABITACION := 'Doble';

                ELSIF J > 20 THEN

                    HABITACION := 'Individual';

                END IF;

                INSERT INTO HABITACIONES VALUES (PISO, HABITACION, TIPO);

            END LOOP;

        ELSIF I >= 11 THEN

            FOR  J IN 1..8 LOOP

                HABITACION := J;

                TIPO := 'Suite';

                INSERT INTO HABITACIONES VALUES (PISO, HABITACION, TIPO);

            END LOOP;

        END IF;

    END LOOP;

END;