/*Questão 3: Crie um procedimento que remova os dependentes com  uma determinada idade.
Para isso, utilize um cursor com parâmetro. A idade também deve ser passada como parâmetro
para o procedimento que deve repassá-lo ao cursor */

CREATE OR REPLACE PROCEDURE Remove_dependentes_invalidos(dataNascimento)
AS
    v_idade NUMBER;
    v_idade := (2011 - to_number(to_date(dataNascimento, 'yyyy')));

    CURSOR verifica(v_ssnTitular empregado.ssn%TYPE, v_idade)
    IS SELECT ssn
    FROM EMPREGADOS
    WHERE e.ssn = v_ssnTitular;

    LOOP
            FETCH verifica INTO v_ssnTitular, v_idade;
            EXIT WHEN verifica%notfound;

    IF (v_idade > 18) THEN
    DELETE FROM DEPENDENTE
    WHERE ssn = v_ssnTitular;
    ELSE
    dbms_output.put_line(' Os dependentes estão regularizados. Nenhuma Alteração foi feita.');
    ELSE IF;

    END LOOP;

    CLOSE;
END;