Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
есептер.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
158 Кб
Скачать
☆

38) Declare

salary employees.salary%TYPE;

begin

update employees

set salary = (select (salary*0.5 +salary) from employees where hire_date>15.01.2010 and commission_pct<10;)

where hire_date>15.01.2010 and commission_pct<10;

end;

37) Set serveroutput on;

BEGIN

FOR item in (SELECT * FROM hr.employees)

LOOP

DBMS_OUTPUT.PUT_LINE(item.employee_id || ' ' || item.first_name || ' ' || item.last_name);

END LOOP;

END;

36) Set serveroutput on;

declare nAvg number(8,2);

begin

select avg(salary) into nAvg FROM hr.employees;

DBMS_OUTPUT.PUT_LINE (nAvg);

end;

35) Declare

sFirstName employees.first_name%TYPE;

sLastName employees.Last_Name%TYPE;

sEmail  employees.email%TYPE;

sPhoneNumber employees.phone_number%TYPE;

sJobId employees.job_id%TYPE;

BEGIN

sFirstName := '&Имя_сотрудника';

sLastName := '&Фамилия_сотрудника';

sEmail := '&Адрес_электронной_почты';

sPhoneNumber := '&Номер_телефона';

sJobId := '&Должность_сотрудника';

DBMS_OUTPUT.PUT_LINE('insert into hr.employees values(' || 'Номер сотрудника'  || ', ' || sFirstName || ', ' || sLastName || ', ' || sEmail || ', ' || sPhoneNumber || ', ' ||  sysdate || ', ' || sJobId || ', ' || '(SELECT MIN(SALARY) from hr.employees where job_id=' || sJobId || '), null,null, null);');

insert into hr.employees values(employees_seq.nextval, sFirstName, sLastName, sEmail,  sPhoneNumber, sysdate, sJobId, (SELECT MIN(SALARY) from hr.employees where job_id=sJobId), null,null, null);

commit;

FOR item IN (SELECT * FROM hr.employees WHERE employees.first_name = sFirstName and employees.Last_name =sLastName )

LOOP

DBMS_OUTPUT.PUT_LINE(item.first_name || ' ' || item.last_name || ' ' || item.Email || ' ' || item.Phone_number || ' ' || item.hire_date || ' ' || item.job_id || ' ' || item.salary );

END LOOP;

END;

34) Declare

sFirstName employees.first_name%TYPE;

sLastName employees.Last_Name%TYPE;

sEmail  employees.email%TYPE;

sPhoneNumber employees.phone_number%TYPE;

sJobId employees.job_id%TYPE;

BEGIN

sFirstName := '&Имя_сотрудника';

sLastName := '&Фамилия_сотрудника';

sEmail := '&Адрес_электронной_почты';

sPhoneNumber := '&Номер_телефона';

sJobId := '&Должность_сотрудника';

insert into hr.employees values(employees_seq.nextval, sFirstName, sLastName, sEmail,  sPhoneNumber, sysdate, sJobId, (SELECT MIN(SALARY) from hr.employees where job_id=sJobId), null,null, null);

commit;

END;