Разработка клиент-серверных приложений с использованием технологий Oracle. Семенова И.И. - 66 стр.

UptoLike

Составители: 

65
end;
Проверьте результат.
Пример создания процедуры c входными параметрами и выходным
параметром:
CREATE OR REPLACE PROCEDURE ADMIN_BOOKS.Count_Books_Itogo
(Count_pages IN Int, Title IN Char, Itogo OUT Int)
IS
begin
Select count(Code_book) INTO Itogo from Books WHERE
Pages>=Count_pages AND Title_book LIKE '%'||trim(Title)||'%';
end Count_Books_Itogo;
Задание 4.
Создайте данную процедуру в разделе Schema/ Procedure в
схеме ADMIN_BOOKS через утилиту Enterprise MANAGER Console. За-
пустите ее в утилите SQL *Plus Worksheet с помощью программы:
SET SERVEROUTPUT ON
DECLARE
I INTEGER;
begin
ADMIN_BOOKS.Count_Books_Itogo (56, 'Руслан и Людмила', I);
DBMS_OUTPUT.PUT_LINE(I);
end;
Проверьте результат.
Пример создания процедуры без параметров для увеличения значения
ключевого поля в таблице Purchases в 2 раза:
CREATE OR REPLACE PROCEDURE ADMIN_BOOKS.update_proc
IS
BEGIN
UPDATE Purchases SET Code_purchase = Code_purchase*2;
END update_proc;
Задание 5. Создайте данную процедуру в разделе Schema/ Procedure в
схеме ADMIN_BOOKS через утилиту Enterprise MANAGER Console. За-
пустите ее в утилите SQL *Plus Worksheet с помощью программы:
begin
ADMIN_BOOKS.update_proc;
end;
Процедура не возвращает никаких данных.