Как сделать глобальный курсор в Sybase 5.0.
Необходимо примерно след.
Делаю 3 хр. проц.
1 -открывает курсор
2 - тянет данные из него
3 - закрывает его.

На оракле подобное делали с помошью глобального курсора.
Возможно ли что-то родственное в Sybase?

Да я уже сделал иначе.
Передаю туда переменную, которую снаружи инкрементирую перед каждым вызовом. В процедуре открываю курсор, позиционирую на указанную строку и тяну. После вытягивания строки закрываю. Все в одной процедуре.
Но хочется сделать красивее .... Смущает постоянное открытие-закрытие курсора.

Вдогонку.
А что за ASA? При инсталляции писал Sybase SQL Anyware 5.0 ...

Вот моя процедура. Это рабочая версия с сервера.
Смущает открытие-закрытие курсора при каждом обращении.

CREATE FUNCTION ASCRgetDataByPeriodAndId(in periodBegin char(30),in periodEnd char(30), in arg_RowNum integer)
RETURNS CHAR(1024)
% Считывает из таблицы ArcOrder строку данных с указанным номером за указанный период.
% При вызовах период д.б. одинаковый, а номер увеличиваться на 1.
% Начальный номер - 1.
% возвращает строку с XML-тегом, атрибуты которого содержат информацию
% из указанной строки таблицы.
% Если возвращена пустая строка, то данных больше нет.
BEGIN
DECLARE ascrDataCursor dynamic scroll cursor for
SELECT dtBegin,dtEnd,dtGet,dtOrder,dlitAB,Category,numTlfA,
numTlfB1,numTlfB2,numTlfB3,numTlfB4,numTlfB5,SerCount,
caPrefix,caStartP,caDirect,caCodeIn,LinkA,
cbPrefix,cbStartP,cbDirect,cbCodeIn,LinkB
FROM "DBA".ArcOrder
WHERE dtBegin>=CAST(periodBegin AS TIMESTAMP) AND
dtEnd<=CAST(periodEnd AS TIMESTAMP);

declare err_notfound exception for sqlstate value '02000';
declare var_dtBegin timestamp;
declare var_dtEnd timestamp;
declare var_dtGet timestamp;
declare var_dtOrder timestamp;
declare var_dlitAB smallint;
declare var_Category smallint;
declare var_numTlfA char(21);
declare var_numTlfB1 char(21);
declare var_numTlfB2 char(21);
declare var_numTlfB3 char(21);
declare var_numTlfB4 char(21);
declare var_numTlfB5 char(21);
declare var_SerCount char(31);
declare var_caPrefix char(6);
declare var_caStartP char(6);
declare var_caDirect char(11);
declare var_caCodeIn char(11);
declare var_LinkA smallint;
declare var_cbPrefix char(6);
declare var_cbStartP char(6);
declare var_cbDirect char(11);
declare var_cbCodeIn char(11);
declare var_LinkB smallint;
declare var_Id_data integer;
declare xmlString char(1024);

OPEN ascrDataCursor;

SET xmlString = '';

% вытащить данные по услуге
FETCH ABSOLUTE arg_RowNum ascrDataCursor INTO var_dtBegin,var_dtEnd,
var_dtGet,var_dtOrder,var_dlitAB,var_Category,var_numTlfA,
var_numTlfB1,var_numTlfB2,var_numTlfB3,var_numTlfB4,var_numTlfB5,
var_SerCount,var_caPrefix,var_caStartP,
var_caDirect,var_caCodeIn,var_LinkA,var_cbPrefix,
var_cbStartP,var_cbDirect,var_cbCodeIn,var_LinkB;

IF sqlstate<>err_notfound THEN
SET xmlString = '<uslData dtBegin="' || var_dtBegin || '" dtEnd="' || var_dtEnd ||
'" dtGet="' || var_dtGet || '" dtOrder="' || var_dtOrder ||
'" dlitAB="' || var_dlitAB || '" Category="' || var_Category ||
'" numTlfA="' || var_numTlfA ||
'" numTlfB1="' || var_numTlfB1 || '" numTlfB2="' || var_numTlfB2 ||
'" numTlfB3="' || var_numTlfB3 || '" numTlfB4="' || var_numTlfB4 ||
'" numTlfB5="' || var_numTlfB5 || '" SerCount="' || var_SerCount ||
'" caPrefix="' || var_caPrefix || '" caStartP="' || var_caStartP ||
'" caDirect="' || var_caDirect || '" caCodeIn="' || var_caCodeIn ||
'" LinkA="' || var_LinkA || '" cbPrefix="' || var_cbPrefix ||
'" cbStartP="' || var_cbStartP || '" cbDirect="' || var_cbDirect ||
'" cbCodeIn="' || var_cbCodeIn || '" linkB="' || var_LinkB || '">';
END IF;

CLOSE ascrDataCursor;

RETURN(xmlString);
END;

Есть вариация OPEN cursorName WITH HOLD. Примеров использования не могу никак найти.

Спасибо, подумаю.
Это было сделано на скорую руку - дать быстрей результат. Я его и дал.
Теперь пытаюсь улучшить.

Пока и так вроде всех устраивает, а потом время покажет.
Спасибо.
Пока вопрос закрыт.