Код: Выделить всё
MGR := IntToStr(DM.tModel.FieldByName('Modelgroup').AsInteger);
DM.qMGR.Close;
DM.qMGR.SQL.Clear;
DM.qMGR.SQL.Add('SELECT * FROM Sp_s_mgr(' + MGR + ')');
DM.qMGR.Open;
Еще раз спасибо.
Найдено 13 результатов
- 04 мар 2009, 12:34
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Re: Вызов ХП из Delphi
Потрясающе)
Это работает без проблем) Не думал, что здесь может быть проблема)
Еще раз спасибо.
Еще раз спасибо.
- 04 мар 2009, 12:27
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Re: Вызов ХП из Delphi
Спасибо, буду колупать код.
- 04 мар 2009, 12:26
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Re: Вызов ХП из Delphi
Извините, об оформлении запамятовал. Не так уж часто отписываюсь.
- 04 мар 2009, 11:17
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Re: Вызов ХП из Delphi
CREATE PROCEDURE SP_S_MGR ( mgr INTEGER) RETURNS ( maname VARCHAR(20), moid INTEGER, moname VARCHAR(60), ... c1970 INTEGER) AS BEGIN FOR SELECT Marka.Name AS Ma_Name, Model.Model_id, ... Cost."_1971", Cost."_1970" FROM Marka JOIN Model ON Marka.Marka_id =Model.Marka_id ... ORDER BY Model.marka_id, ...
- 04 мар 2009, 10:45
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Re: Вызов ХП из Delphi
Ну да) А как же без suspend'a?)
- 03 мар 2009, 18:11
- Форум: Общие проблемы
- Тема: Вызов ХП из Delphi
- Ответы: 8
- Просмотры: 7860
Вызов ХП из Delphi
Доброго времени суток. Подскажите, будьте добры. Процедура-выборка, при вызове в IBExpert отрабатывает беспроблемно. При вызове из Delphi 7 через свойство SQL компонента TIBQuery ничего не происходит. При повторном вызове отрабатывает, но результат тот, который должен был быть при первом вызове. Опи...
- 28 июн 2007, 23:46
- Форум: Проектирование БД и запросов
- Тема: Помогите правильно сделать DELETE :(
- Ответы: 4
- Просмотры: 5731
- 26 июн 2007, 01:46
- Форум: Проектирование БД и запросов
- Тема: Помогите правильно сделать DELETE :(
- Ответы: 4
- Просмотры: 5731
- 26 июн 2007, 01:06
- Форум: Проектирование БД и запросов
- Тема: Помогите правильно сделать DELETE :(
- Ответы: 4
- Просмотры: 5731
Помогите правильно сделать DELETE :(
Необходимо написать DELETE-конструкцию, которая удаляет из таблицы все, кроме одной, записи, в которых встречаются совпадения по некоторым полям. Одним словом, этим DELET'ом необходимо просто сделать SELECT DISTINCT ... ... . Возможно ли?
- 20 июн 2007, 13:36
- Форум: Общие проблемы
- Тема: Хранимая процедура
- Ответы: 7
- Просмотры: 6326
Я ж говорю, наследие гениального предшественника:) Мало того, что все через БДЕ оформлено, так еще и Locate пользовался активно:) Поиск данных по одному полю вешает приложение минуты на три:) Пользуясь случаем, хочу выразить благодарность товарищам Ковязину и Вострикову, купил 4-е издание, супер-вещ...
- 20 июн 2007, 11:39
- Форум: Общие проблемы
- Тема: Хранимая процедура
- Ответы: 7
- Просмотры: 6326
- 20 июн 2007, 00:45
- Форум: Общие проблемы
- Тема: Хранимая процедура
- Ответы: 7
- Просмотры: 6326
Наследство у меня такое вот невеселое:) В этой БД, собственно, никаких военных объектов нет. Таблицы, индексы, пара процедур - вот и все. Ни запросов, ни представлений, ни чего либо еще. В таком случае подскажите, будьте добры, на какую версию (бесплатную) стоит перелезть - или, быть может, Firebird...
- 19 июн 2007, 22:59
- Форум: Общие проблемы
- Тема: Хранимая процедура
- Ответы: 7
- Просмотры: 6326
Хранимая процедура
InterBase 6.1 CREATE PROCEDURE SP_MARKA_ADD_PRESENT ( M_NAME VARCHAR(50)) RETURNS ( FLAG INTEGER) AS BEGIN /* Procedure Text */ IF (EXISTS(SELECT 1 FROM MARKA_ADD WHERE NAME = :M_NAME)) THEN FLAG = 1 ; ELSE FLAG = 0 ; SUSPEND; END Ошибка: Arithmetic overflow or division by zero has occured. Arithmet...