Execute procedure

create or replace procedure insertinstructor(v_salary number, date_hired varchar2, v_insructid number, v_instrucname varchar2, v_commission number, v_mentorid number) is


  v_mentor_id instructor.mentor_id%TYPE;
  mentee_count pls_integer := 0;
  mentor_salary instructor.salary%TYPE;
  mentor_hired_date date;  
begin
if (v_mentor_id is not null ) then
      select count(*) into mentee_count from instructor where mentor_id = v_mentor_id;
if (mentee_count != 0 ) then
       select salary, date_hired into mentor_salary, mentor_hired_date from instructor where instructor_id = v_mentor_id;
  if mentor_salary <= 3500 AND MONTHS_BETWEEN(SYSDATE, to_date(mentor_hired_date,'dd-mon-yyyy') ) / 12 <= 21
  THEN
    RAISE_APPLICATION_ERROR (-20501, 'Inserting Record Failure,Only instructor that work more than 21 years or salary more than 3500 can act as mentor');
  else
    insert into INSTRUCTOR (salary, DATE_HIRED,INSTRUCTOR_ID,INSTRUCTOR_NAME, COMMISSION, MENTOR_ID)
    values(v_salary,to_date(date_hired,'dd-mon-yyyy'),v_insructid, v_instrucname, v_commission, v_mentorid);
    commit;
  end if;
end if;
end if;
end;
/

exec insertinstructor (1000,'24-Jun-1999',991,'MEN',200,453);

SQL> @execinsert

PL/SQL procedure successfully completed.