oracle курсоры с параметрами
Мой блог
понедельник, 14 января 2013 г.
Курсоры в Oracle
Курсор это средство извлечения данных из БД.
Курсоры содержат определения столбцов и объектов.
Курсоры используются для получения строк, возвращаемых запросом.
Для передачи строк в курсор используется запрос, после чего вы можете
выбирать строки из курсора по одной за один раз.
create table t1(id, type, text)
as
select object_id, object_type, object_name
from all_objects;
create table t1
as
select object_id id, object_type type, object_name text
from all_objects;
select id, type, text from t1
where />
17367 SCHEDULE FILE_WATCHER_SCHEDULE
select id, type, text from t1
where type = ‘SCHEDULE’;
17364 SCHEDULE DAILY_PURGE_SCHEDULE
17367 SCHEDULE FILE_WATCHER_SCHEDULE
17372 SCHEDULE PMO_DEFERRED_GIDX_MAINT_SCHED
18172 SCHEDULE BSLN_MAINTAIN_STATS_SCHED
Неявные курсоры определяются в момент выполнения:
DECLARE
v_text t1.text%TYPE;
BEGIN
SELECT text INTO v_text
FROM t1
WHERE /> DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END;
/
В ходе выполнения кода создается курсор для выборки значения text.
Явный курсор определяется до начала выполнения:
DECLARE
CURSOR c_get_text
IS
SELECT text
FROM t1
WHERE />
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text;
FETCH c_get_text INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
CLOSE c_get_text;
END;
/
Преимущество явного курсора заключается в наличии у него атрибутов,
облегчающих применение условных операторов.
CREATE OR REPLACE PROCEDURE proc1
AS
CURSOR c_get_text
IS
SELECT text
FROM t1
WHERE />
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text;
FETCH c_get_text INTO v_text;
IF c_get_text%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
CLOSE c_get_text;
END;
/
А как подобное сделать с неявным курсором:
CREATE OR REPLACE PROCEDURE proc2
AS
v_text t1.text%TYPE;
v_bool BOOLEAN := TRUE;
BEGIN
BEGIN
SELECT text INTO v_text
FROM t1
WHERE />
EXCEPTION
WHEN no_data_found THEN
v_bool := FALSE;
WHEN others THEN
RAISE;
END;
IF NOT v_bool THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
END;
/
Пришлось заниматься перехватом исключений, чтобы определить, была ли найдена запись.
Параметризация курсоров помогает повысить степень их повторного использования.
курсор с параметром:
DECLARE
CURSOR c_get_text(par1 NUMBER)
IS
SELECT text
FROM t1
WHERE />
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text(17367);
FETCH c_get_text INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
CLOSE c_get_text;
END;
/
Переменные типа REF CURSOR могут ссылаться на любые реальные курсоры.
Программа, использующая тип REF CURSOR, может работать с курсорами,
не заботясь о том, какие конкретно данные будут извлечены ими во время выполнения.
CREATE OR REPLACE PROCEDURE proc_ref
AS
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
‘SELECT text ‘
|| ‘FROM t1 ‘
|| ‘WHERE />
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
Например я могу создать функцию, которая принимает некий входной параметр, создает курсор и возвращает тип REF CURSOR :
CREATE OR REPLACE FUNCTION func1(par1 NUMBER)
RETURN SYS_REFCURSOR
IS
v_curs SYS_REFCURSOR;
BEGIN
OPEN v_curs
FOR
‘SELECT text ‘
|| ‘FROM t1 ‘
|| ‘WHERE /> || par1;
Другой пользователь может воспользоваться этой функцией так:
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
v_curs := func1(17367);
FETCH v_curs INTO v_text;
IF v_curs%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
Для пользователя, вызывающего функцию func1(), она для него представляет черный ящик, возвращающий курсор.
Сильнотипизированный и слаботипизированный REF CURSOR.
TYPE имя_типа_курсора IS REF CURSOR [ RETURN возвращаемый_тип ];
TYPE refcursor IS REF CURSOR RETURN table1%ROWTYPE;
TYPE refcursor IS REF CURSOR;
Первая форма REF CURSOR называется сильно типизированной, поскольку тип структуры,
возвращаемый курсорной переменной, задается в момент объявления
(непосредственно или путем привязки к типу строки таблицы).
Вторая форма (без предложения RETURN) называется слаботипизированной.
Тип возвращаемой структуры данных для нее не задается.
Такая курсорная переменная обладает большей гибкостью, поскольку для нее можно задавать любые запросы
с любой структурой возвращаемых данных.
В Oracle 9i появился предопределенный слабый тип REF CURSOR с именем SYS_REFCURSOR,
теперь можно не определять собственный слабый тип, достаточно использовать стандартный тип Oracle:
DECLARE
my_cursor SYS_REFCURSOR;
Пример сильнотипизированного курсора:
TYPE my_type_rec IS RECORD (text t1.text%TYPE);
TYPE my_type_cur IS REF CURSOR RETURN my_type_rec;
v_curs my_type_cur;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE />
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
TYPE my_type_cur IS REF CURSOR RETURN t1%ROWTYPE;
v_curs my_type_cur;
v_var t1%ROWTYPE;
BEGIN
OPEN v_curs
FOR
SELECT *
FROM t1
WHERE />
FETCH v_curs INTO v_var;
DBMS_OUTPUT.PUT_LINE( ‘id = ‘ || v_var.id || ‘, type = ‘ || v_var.type || ‘, text = ‘ || v_var.text );
id = 17367, type = SCHEDULE, text = FILE_WATCHER_SCHEDULE
Пример слаботипизированного курсора:
TYPE my_type_cur IS REF CURSOR;
v_curs my_type_cur;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE />
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE />
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
Курсор можно передавать в качестве параметра:
1. Функция принимающая курсор
CREATE OR REPLACE FUNCTION get_cursor(p_curs SYS_REFCURSOR)
RETURN VARCHAR2
IS
v_text t1.text%TYPE;
FETCH p_curs INTO v_text;
IF p_curs%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘Данные найдены. ‘ );
END IF;
2. Процедура принимающая текст SQL
CREATE OR REPLACE PROCEDURE get_sql (p_sql VARCHAR2)
IS
v_curs SYS_REFCURSOR;
v_res VARCHAR2(50);
BEGIN
IF v_curs%ISOPEN THEN
CLOSE v_curs;
END IF;
BEGIN
OPEN v_curs FOR p_sql;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20000, ‘Unable to open cursor’);
END;
v_res := get_cursor(v_curs);
CLOSE v_curs;
DBMS_OUTPUT.PUT_LINE(v_res);
END;
/
BEGIN
get_sql( ‘SELECT text FROM t1 WHERE );
END;
/
Данные найдены.
FILE_WATCHER_SCHEDULE
SET SERVEROUTPUT ON
var1 tab.col1%TYPE;
var2 tab.col2%TYPE;
var3 tab.col3%TYPE;
CURSOR cur IS
SELECT col1, col1, col3
FROM tab
ORDER BY col1;
BEGIN
— Открываем курсор
LOOP
— Выбираем из курсора строки
FETCH cur
INTO var1, var2, var3;
EXIT WHEN cur%NOTFOUND;
— Выводим значения переменных
DBMS_OUTPUT.PUT_LINE( ‘col1 = ‘ || var1 || ‘, col2 = ‘ || var2 || ‘, col3 = ‘ || var3 );
END LOOP;
— Закрываем курсор
CLOSE cur;
END;
/
Курсоры и цикл FOR
SET SERVEROUTPUT ON
CURSOR cur IS
SELECT col1, col1, col3
FROM tab
ORDER BY col1;
BEGIN
FOR var IN cur LOOP
DBMS_OUTPUT.PUT_LINE( ‘col1 = ‘ || var.col1 || ‘, col2 = ‘ || var.col2 || ‘, col3 = ‘ || var.col3 );
END LOOP;
END;
/
SET SERVEROUTPUT ON
— Определим тип REF CURSOR
TYPE t_cur IS
REF CURSOR RETURN tab%ROWTYPE;
— Определим объект типа t_cur
cur t_cur;
— Определим объект для хранения столбцов из таблицы tab
var tab%ROWTYPE;
6 SELECT ename, sal FROM emp
7 WHERE LOWER(job)=LOWER(v_job);
10 OPEN sal_cursor;
11 FETCH sal_cursor INTO v_ename, v_sal;
12 CLOSE sal_cursor;
PL/SQL procedure successfully completed.
Атрибуты явного курсора
Информацию о состоянии курсора можно получить с помощью атрибутов явного курсора:
Целое количество строк, выбранных на данный момент
Логический атрибут. Имеет значение TRUE, если последней командой FETCH была выбрана хотя бы одна строка
Логический атрибут. Имеет значение TRUE, если последней командой FETCH не выбрано ни одной строки
Логический атрибут. Имеет значение TRUE, если курсор открыт
Использование атрибутов явного курсора позволяет выбирать строки из активного множества в цикле до тех пор, пока не будут обработаны все строки активного множества.
2 v_ename emp.ename%TYPE;
3 v_sal emp.sal%TYPE;
4 v_job emp.job%TYPE;
5 CURSOR sal_cursor IS
6 SELECT ename, sal FROM emp
7 WHERE LOWER(job)=LOWER(v_job);
10 OPEN sal_cursor;
12 FETCH sal_cursor INTO v_ename, v_sal;
13 IF sal_cursor%NOTFOUND THEN
17 DBMS_OUTPUT.put_line(TO_CHAR(sal_cursor%ROWCOUNT) || ‘ rows are fetched’);
18 CLOSE sal_cursor;
3 rows are fetched
PL/SQL procedure successfully completed.
Использование записи PL/SQL
Удобно использовать запись PL/SQL для хранения значений данных из активного набора.
2 v_job emp.job%TYPE;
3 CURSOR sal_cursor IS
4 SELECT ename, sal FROM emp
5 WHERE LOWER(job)=LOWER(v_job);
6 v_rec sal_cursor%ROWTYPE;
10 FETCH sal_cursor INTO v_rec;
11 CLOSE sal_cursor;
PL/SQL procedure successfully completed.
Курсоры с параметрами
Явный курсор можно открывать несколько раз, используя различные выборки из базы данных. Для этого используется курсор с параметрами, который позволяет передать значения параметров в момент открытия курсора. Эти значения используются при выполнении запроса. Когда курсор открывается, значение каждого параметра передается в соответствии с его положением в списке параметров. В качестве значений параметров могут использоваться литералы, переменные PL/SQL и хост-переменные.
Для объявления явного курсора с параметрами используется оператор CURSOR:
имя_курсора – имя курсора
имя_параметра – имя параметра, которое позволяет ссылаться на него в выражении SELECT
тип_данных – скалярный тип данных параметра. Размер параметра не задается
команда_select – команда SELECT без предложения INTO
Если Вы описали курсор с параметрами, то параметры указываются в дальнейшем при открытии курсора:
2 v_ename emp.ename%TYPE;
3 v_sal emp.sal%TYPE;
4 CURSOR sal_cursor (v_job VARCHAR2) IS
5 SELECT ename, sal FROM emp
6 WHERE LOWER(job)=LOWER(v_job);
8 OPEN sal_cursor(‘manager’);
9 FETCH sal_cursor INTO v_ename, v_sal;
11 CLOSE sal_cursor;
PL/SQL procedure successfully completed.
Циклы FOR с курсорами
Если явный курсор нужен только для того, чтобы в цикле обработать строки активного набора, можно использовать сокращенную форму записи – цикл FOR с курсором. Цикл FOR с курсором включает в себя открытие курсора, поочередную выборку строк за каждое прохождение цикла и закрытие курсора, после того, как будет выбрана последняя строка курсора.
имя_курсора – имя объявленного курсора
В цикле можно использовать атрибуты явного курсора. Для курсора с параметрами, также, можно использовать цикл FOR с курсором. Значения параметров задаются в скобках после имени курсора.
2 CURSOR sal_cursor (v_job VARCHAR2) IS
3 SELECT ename, sal FROM emp
4 WHERE LOWER(job)=LOWER(v_job);
6 FOR rec_cursor IN sal_cursor(‘manager’) LOOP
PL/SQL procedure successfully completed.
Литература
1. Вильям Дж. Пэйдж Использование Oracle8/8i: пер. с англ. – М.: Издательский дом «Вильямс», 1999.
Чтобы распечатать файл, скачайте его (в формате Word).
Oracle курсор с параметрами
Раньше мы с вами рассматривали оператор SELECT, который получал все данные из таблиц. Но как известно, чаще вы будете использовать условие WHERE в курсорном операторе SELECT. И в дальнейшем вам будет необходимо определять условия выборки. Как это сделать наиболее правильно, самый простой способ вот так:
Замечательно, а если нужно другое значение отличное от 37? Что тогда? Напрашивается вывод о том, что в этом случае необходим курсор с параметрами или «параметризованный курсор»! Он определяется вот так:
Но еще более правильно, будет сделать вот так:
Применив оператор TYPE мы сделали код более мобильным, так как если тип поля изменится, то не нужно будет лопатить весь код в поисках ошибки! Это так же считается наиболее правильным стилем программирования! 🙂 И теперь при открытии такого курсора, его оператор OPEN будет принимать передаваемый параметр вот так:
Подытожим наши заключения следующим блоком:
После запуска получаем:
Вот так отработал наш с вами первый параметризованный курсор, надеюсь, все понятно, если нет — спрашивайте! Для закрепления, давайте запишем тот же курсор, с циклом FOR:
Параметров у курсора может быть несколько, например вот так:
Получаем после запуска:
Что собственно и требовалось доказать. Вот так работают курсоры с параметрами и без таковых. Надеюсь, теперь вы научились писать курсоры, и выбирать из них данные! 🙂
понедельник, 14 января 2013 г.
Курсоры в Oracle
Курсор это средство извлечения данных из БД.
Курсоры содержат определения столбцов и объектов.
Курсоры используются для получения строк, возвращаемых запросом.
Для передачи строк в курсор используется запрос, после чего вы можете
выбирать строки из курсора по одной за один раз.
create table t1(id, type, text)
as
select object_id, object_type, object_name
from all_objects;
create table t1
as
select object_id id, object_type type, object_name text
from all_objects;
select id, type, text from t1
where >
17367 SCHEDULE FILE_WATCHER_SCHEDULE
select id, type, text from t1
where type = ‘SCHEDULE’;
17364 SCHEDULE DAILY_PURGE_SCHEDULE
17367 SCHEDULE FILE_WATCHER_SCHEDULE
17372 SCHEDULE PMO_DEFERRED_GIDX_MAINT_SCHED
18172 SCHEDULE BSLN_MAINTAIN_STATS_SCHED
Неявные курсоры определяются в момент выполнения:
DECLARE
v_text t1.text%TYPE;
BEGIN
SELECT text INTO v_text
FROM t1
WHERE > DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END;
/
В ходе выполнения кода создается курсор для выборки значения text.
Явный курсор определяется до начала выполнения:
DECLARE
CURSOR c_get_text
IS
SELECT text
FROM t1
WHERE >
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text;
FETCH c_get_text INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
CLOSE c_get_text;
END;
/
Преимущество явного курсора заключается в наличии у него атрибутов,
облегчающих применение условных операторов.
CREATE OR REPLACE PROCEDURE proc1
AS
CURSOR c_get_text
IS
SELECT text
FROM t1
WHERE >
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text;
FETCH c_get_text INTO v_text;
IF c_get_text%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
CLOSE c_get_text;
END;
/
А как подобное сделать с неявным курсором:
CREATE OR REPLACE PROCEDURE proc2
AS
v_text t1.text%TYPE;
v_bool BOOLEAN := TRUE;
BEGIN
BEGIN
SELECT text INTO v_text
FROM t1
WHERE >
EXCEPTION
WHEN no_data_found THEN
v_bool := FALSE;
WHEN others THEN
RAISE;
END;
IF NOT v_bool THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
END;
/
Пришлось заниматься перехватом исключений, чтобы определить, была ли найдена запись.
Параметризация курсоров помогает повысить степень их повторного использования.
курсор с параметром:
DECLARE
CURSOR c_get_text(par1 NUMBER)
IS
SELECT text
FROM t1
WHERE >
v_text t1.text%TYPE;
BEGIN
OPEN c_get_text(17367);
FETCH c_get_text INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
CLOSE c_get_text;
END;
/
Переменные типа REF CURSOR могут ссылаться на любые реальные курсоры.
Программа, использующая тип REF CURSOR, может работать с курсорами,
не заботясь о том, какие конкретно данные будут извлечены ими во время выполнения.
CREATE OR REPLACE PROCEDURE proc_ref
AS
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
‘SELECT text ‘
|| ‘FROM t1 ‘
|| ‘WHERE >
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
Во время компиляции Oracle не знает, каким будет тексе запроса, — он видит строковую переменную.
Но наличие типа REF CURSOR говорит ему о том, что надо будет обеспечить некую работу с курсором.
Например я могу создать функцию, которая принимает некий входной параметр, создает курсор и возвращает тип REF CURSOR :
CREATE OR REPLACE FUNCTION func1(par1 NUMBER)
RETURN SYS_REFCURSOR
IS
v_curs SYS_REFCURSOR;
BEGIN
OPEN v_curs
FOR
‘SELECT text ‘
|| ‘FROM t1 ‘
|| ‘WHERE > || par1;
Другой пользователь может воспользоваться этой функцией так:
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
v_curs := func1(17367);
FETCH v_curs INTO v_text;
IF v_curs%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
END IF;
Для пользователя, вызывающего функцию func1(), она для него представляет черный ящик, возвращающий курсор.
Сильнотипизированный и слаботипизированный REF CURSOR.
TYPE имя_типа_курсора IS REF CURSOR [ RETURN возвращаемый_тип ];
TYPE refcursor IS REF CURSOR RETURN table1%ROWTYPE;
TYPE refcursor IS REF CURSOR;
Первая форма REF CURSOR называется сильно типизированной, поскольку тип структуры,
возвращаемый курсорной переменной, задается в момент объявления
(непосредственно или путем привязки к типу строки таблицы).
Вторая форма (без предложения RETURN) называется слаботипизированной.
Тип возвращаемой структуры данных для нее не задается.
Такая курсорная переменная обладает большей гибкостью, поскольку для нее можно задавать любые запросы
с любой структурой возвращаемых данных.
В Oracle 9i появился предопределенный слабый тип REF CURSOR с именем SYS_REFCURSOR,
теперь можно не определять собственный слабый тип, достаточно использовать стандартный тип Oracle:
DECLARE
my_cursor SYS_REFCURSOR;
Пример сильнотипизированного курсора:
TYPE my_type_rec IS RECORD (text t1.text%TYPE);
TYPE my_type_cur IS REF CURSOR RETURN my_type_rec;
v_curs my_type_cur;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE >
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
TYPE my_type_cur IS REF CURSOR RETURN t1%ROWTYPE;
v_curs my_type_cur;
v_var t1%ROWTYPE;
BEGIN
OPEN v_curs
FOR
SELECT *
FROM t1
WHERE >
FETCH v_curs INTO v_var;
Пример слаботипизированного курсора:
TYPE my_type_cur IS REF CURSOR;
v_curs my_type_cur;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE >
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
v_curs SYS_REFCURSOR;
v_text t1.text%TYPE;
BEGIN
OPEN v_curs
FOR
SELECT text
FROM t1
WHERE >
FETCH v_curs INTO v_text;
DBMS_OUTPUT.PUT_LINE( ‘text = ‘ || v_text );
Курсор можно передавать в качестве параметра:
1. Функция принимающая курсор
CREATE OR REPLACE FUNCTION get_cursor(p_curs SYS_REFCURSOR)
RETURN VARCHAR2
IS
v_text t1.text%TYPE;
FETCH p_curs INTO v_text;
IF p_curs%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE( ‘Данные не найдены. ‘ );
ELSE
DBMS_OUTPUT.PUT_LINE( ‘Данные найдены. ‘ );
END IF;
2. Процедура принимающая текст SQL
CREATE OR REPLACE PROCEDURE get_sql (p_sql VARCHAR2)
IS
v_curs SYS_REFCURSOR;
v_res VARCHAR2(50);
BEGIN
IF v_curs%ISOPEN THEN
CLOSE v_curs;
END IF;
BEGIN
OPEN v_curs FOR p_sql;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20000, ‘Unable to open cursor’);
END;
v_res := get_cursor(v_curs);
CLOSE v_curs;
DBMS_OUTPUT.PUT_LINE(v_res);
END;
/
BEGIN
get_sql( ‘SELECT text FROM t1 WHERE > END;
/
Данные найдены.
FILE_WATCHER_SCHEDULE
SET SERVEROUTPUT ON
var1 tab.col1%TYPE;
var2 tab.col2%TYPE;
var3 tab.col3%TYPE;
CURSOR cur IS
SELECT col1, col1, col3
FROM tab
ORDER BY col1;
BEGIN
— Открываем курсор
LOOP
— Выбираем из курсора строки
FETCH cur
INTO var1, var2, var3;
EXIT WHEN cur%NOTFOUND;
— Выводим значения переменных
DBMS_OUTPUT.PUT_LINE( ‘col1 = ‘ || var1 || ‘, col2 = ‘ || var2 || ‘, col3 = ‘ || var3 );
END LOOP;
— Закрываем курсор
CLOSE cur;
END;
/
Курсоры и цикл FOR
Для получения доступа к строкам из курсора можно использовать цикл FOR.
При использовании цикла FOR не нужно явно открывать курсор — цикл FOR сделает это автоматически.
SET SERVEROUTPUT ON
CURSOR cur IS
SELECT col1, col1, col3
FROM tab
ORDER BY col1;
BEGIN
FOR var IN cur LOOP
DBMS_OUTPUT.PUT_LINE( ‘col1 = ‘ || var.col1 || ‘, col2 = ‘ || var.col2 || ‘, col3 = ‘ || var.col3 );
END LOOP;
END;
/
Выражение OPEN — FOR
С курсором можно использовать выражение OPEN — FOR, которое добавляет еще больше гибкости при обработке курсоров,
поскольку вы можете назначить курсор для другого запроса.
Запрос может быть любым корректным выражением SELECT.
Это означает что вы можете повторно использовать курсор и назначить курсору позже в коде другой запрос.
SET SERVEROUTPUT ON
— Определим тип REF CURSOR
TYPE t_cur IS
REF CURSOR RETURN tab%ROWTYPE;
— Определим объект типа t_cur
cur t_cur;
— Определим объект для хранения столбцов из таблицы tab
var tab%ROWTYPE;
BEGIN
— назначим запрос для объекта cur и откроем его
OPEN cur FOR
SELECT * FROM tab WHERE col1 Андрей на 12:55
При выполнении команды SQL из PL/SQL РСУБД Oracle назначает ей приватную рабочую область, а некоторые данные записывает в системную глобальную область (SGA, System Global Area). В приватной рабочей области содержится информация о команде SQL и набор данных, возвращаемых или обрабатываемых этой командой. PL/SQL предоставляет программистам несколько механизмов доступа к этой рабочей области и содержащейся в ней информации; все они так или иначе связаны с определением курсоров и выполнением операций с ними.
Основные принципы работы с курсорами
Курсор проще всего представить себе как указатель на таблицу в базе данных. Например, следующее объявление связывает всю таблицу employee с курсором employee_cur :
Объявленный курсор можно открыть:
Далее из него можно выбирать строки:
Завершив работу с курсором, его следует закрыть:
Терминология
Типичные операции с запросами и курсорами
Независимо от типа курсора процесс выполнения команд SQL всегда состоит из одних и тех же действий. В одних случаях PL/SQL производит их автоматически, а в других, как, например, при использовании явного курсора, они явно организуются программистом.
Рис. 1. Упрощенная схема выборки данных с использованием курсора
Знакомство с атрибутами курсоров
В этом разделе перечисляются и вкратце описываются атрибуты курсоров.