Подскажите пожалуйста почему при использовании цикла FOR в DB2 express я получаю сообщение
SQL0501N Указатель, заданный в операторах FETCH или CLOSE, не открыт.
SQLSTATE=24501

SQL0501N Указатель, заданный в операторах FETCH или CLOSE, не открыт.

asbestos,

Речь идёт о другом. Использование цикла FOR предполагает автоматическое создание курсора. В самом
теле цикла никаких курсоров нет. Сам цикл исполняется только один раз, выбрасывая соответствующую ошибку. Курсор в описании цикла должен создаваться и открываться автоматически. А этого не происходит. Почему?

Mark Barinstein,

внутри цикла commit отсутствует

for REC1 as
select DATE_STAMP,
ROUTER_CODE,
TRAFLOAD_ID,
TRAFRAW_ID
from LL_T_TRAFFIC_RAW_QUEUE
where ROUTER_CODE = vszRouterCode and
DATE_STAMP between dtDateFrom and dtDateTo
do
set DATE_STAMP_L_Q = REC1.DATE_STAMP;
set ROUTER_CODE_L_Q = REC1.ROUTER_CODE;
set TRAFLOAD_ID_L_Q = REC1.TRAFLOAD_ID;
set TRAFRAW_ID_L_Q = REC1.TRAFRAW_ID;
-- дополнить обработкой исключительных ситуаций!!
select ID,TRAFFIC_DIRECTION, SUBS_PEER_ADDRESS, PEER_ADDRESS, OCTETS
into ID_L, TRAFFIC_DIRECTION_L, SUBS_PEER_ADDRESS_L, PEER_ADDRESS_L, OCTETS_L
from LL_T_TRAFFIC_RAW_LIGHT
where DATE_STAMP = DATE_STAMP_L_Q and ID = TRAFRAW_ID_L_Q;
call AADEBUG_MESSAGE('SUBS_PEER_ADDRESS_L = 'concat SUBS_PEER_ADDRESS_L concat ' TRAFRAW_ID_L_Q = ' concat char(TRAFRAW_ID_L_Q));

-- обработаем запись
call AADEBUG_MESSAGE('Запись обработана');
SET nRes = 0;
if nRes != 0 then
call AADEBUG_MESSAGE('код ошибки в процессе обработки записи');
return;
end if;

-- удалим из очереди ссылку на обработанную запись
delete from LL_T_TRAFFIC_RAW_QUEUE where TRAFRAW_ID = TRAFRAW_ID_L_Q;
call AADEBUG_MESSAGE('Запись удалена');

-- пропустить запись без обработки
-- увеличим счетчик записей
set nCurrentRecord = nCurrentRecord + 1;

end for;

Mark Barinstein,

Внутри процедур есть commit

Mark Barinstein,

Спасибо за помощь. Действительно дело оказалось в commit !!! Не первый раз читаю ваши квалифицированные советы!!