Скачать: CL | DM;

Перечисление результатов IbstoredProc   Найти похожие ветки 

← →
SamProf ©   (2006-08-13 12:22) [0]

Запрос такой:
begin
 FOR SELECT APP
 FROM CONFIG
 INTO :APP do suspend;
end
Возрашает несколько результатов
В делфях пишу:
function TSamConfig.GetApplications;
var
    i:Integer;
begin
    Result:=TStringList.Create;
    Result.Clear;
    Get_App.ExecProc;
    Get_App.First;
    while not get_app.eof do
         begin
            if not Get_App.ParamByName("APP").IsNull then
              begin
              Result.Add(Get_App.ParamByName("APP").Value);
              end;
         Get_App.Next;
         end;
end;

Мне в нос ошибка Cannotperfom this operation on a close dataset! на      Get_App.First;         Get_App.Next;    !  первое значение он возврашает, а вот при First b Next ошибки! что такое? Как получить все результаты?

---

← →
DrPass ©   (2006-08-13 15:51) [1]

Если процедура возвращает не один параметр, а датасет - для нее нужно использовать не TIBStoredProc, а TIBQuery

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c