ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
14 сообщений из 64, страница 3 из 3
  3  все
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32541929
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
Случай точно клиничесикй чо вы мне лепите Field->RecordCount , FIBQuery->Fields[0]->AsVariant;, и т.д. и т.п. еще раз в ХП есть преременные (Variables) после выполнения процедуры они принимают определенные значения (Values) дык вот как эти Валуесы и Вариаблесов достать, мне не надо записи

Знаете или нет ?
...
Рейтинг: 0 / 0
01.06.2004, 08:54:35
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32541942
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Попробуй вместо ExecQuery метод Open, иногда помогает.
...
Рейтинг: 0 / 0
01.06.2004, 09:03:01
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32541954
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
Во всремя исполнения всеравно Qeury Empy a Open = false явно в true не устанавливается как быть
...
Рейтинг: 0 / 0
01.06.2004, 09:10:27
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542014
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Open, это не свойство, это метод, его вызывать надо.
...
Рейтинг: 0 / 0
01.06.2004, 09:47:39
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542103
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
Да нифига не получается
...
Рейтинг: 0 / 0
01.06.2004, 10:14:09
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542149
Фотография VF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VF
Участник
2 alex777
Код: plaintext
Query.Open;
вместо
Код: plaintext
Query.ExecSQL;
у Тебя вернётся набор данных, т.е. записей, вот тогда и работай со строками и полями...
а то что у Тебя вернётся НАБОР данных это есть непреложный факт, потому как конструкция
Код: plaintext
1.
2.
3.
4.
for select ... do
begin
...
suspend
end
вернёт НЕ ОДНУ запись, а НАБОР записей, а переменные это всего лишь место, где будет храниться ТЕКУЩЕЕ (при выполнении процедуры) значение поля...
понимаешь? FOR это цикл, возвращает по одной записи... в конце получаешь результирующий НАБОР данных (записей)...
если надо взять значение выходного параметра процедуры, то используй StoredProc , но учти, что там будут ПОСЛЕДНИЕ значения, то есть значения ПОСЛЕДНЕЙ записи в наборе данных...
...
Рейтинг: 0 / 0
01.06.2004, 10:29:10
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542256
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
А куда вся эта гадость возвращается процедура отрабатывается, затем возвращает один едиственный int откуда его взять ?
...
Рейтинг: 0 / 0
01.06.2004, 10:59:27
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542308
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
StoredProc это член какого класса
...
Рейтинг: 0 / 0
01.06.2004, 11:15:26
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542440
Фотография VF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VF
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
RETURNS (RID INTEGER,
REC_TYPE SMALLINT,
REC_ORDER INTEGER,
GOODS_REF INTEGER,
GOODS_ABBR VARCHAR( 36 ) CHARACTER SET WIN1251,
GOODS_NAME VARCHAR( 50 ) CHARACTER SET WIN1251,
TAX_RATE INTEGER,
MUNITS_REF INTEGER,
MUNITS_NAME VARCHAR( 20 ) CHARACTER SET WIN1251,
QUANT DOUBLE PRECISION,
COST DOUBLE PRECISION,
SUM_COST DOUBLE PRECISION,
SUM_WOTAX DOUBLE PRECISION,
BCOST DOUBLE PRECISION,
BSUM_COST DOUBLE PRECISION,
BSUM_WOTAX DOUBLE PRECISION,
BTAX DOUBLE PRECISION,
BREMN_QUANT DOUBLE PRECISION,
BREMN_SUM_COST DOUBLE PRECISION,
BREMN_MUNITS_NAME VARCHAR( 20 ) CHARACTER SET WIN1251,
ACOST DOUBLE PRECISION,
ASUM DOUBLE PRECISION,
BCOST2 DOUBLE PRECISION,
BSUM2 DOUBLE PRECISION,
ASTR VARCHAR( 25 ) CHARACTER SET WIN1251

вот что возвращает процедура, поэтому вопрос, какой INT Тебе надо???
StoredProc есть и в BDE (TStoredProc) и в IBX (TIBStoredProc)...
только ведь ещё раз повторю:
ПРОЦЕДУРА ВОЗВРАЩАЕТ НАБОР ДАННЫХ!!!
...
Рейтинг: 0 / 0
01.06.2004, 11:57:12
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542505
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
Все парни хорош ругатся разобрался


FIBQuery->SQL->Text = "execute procedure SP_RECEIPTMOVES(NULL,1,0)";
FIBTransaction->Active = true;
FIBQuery->ExecQuery();
int i = Main->FIBQuery->FieldIndex["NVX_FLAG"];
AnsiString a = Main->FIBQuery->Fields ->Name;
j=Main->FIBQuery->Fields->AsInteger;

Это так отладочный код т.е. я его просматривал в режиме отладки но кому надо разберется
...
Рейтинг: 0 / 0
01.06.2004, 12:18:53
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542728
Фотография VF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VF
Участник
ну и получишь последнее значение из всей выборки...
...
Рейтинг: 0 / 0
01.06.2004, 13:40:59
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542779
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Оно-же будет первым, т.к. выше написано, что оно одно (значение) :) В данном случае это выход, но не всегда так будет.
...
Рейтинг: 0 / 0
01.06.2004, 13:56:54
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32542961
Фотография VF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VF
Участник
так если не всегда, тогда и вставай сразу на нужную запись, а оттуда бери значение нужного столбца...
а если всегда, то зачем for select...
...
Рейтинг: 0 / 0
01.06.2004, 15:03:18
| Ответить | Цитировать | Написать  
как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
    #32545030
Фотография alex777
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex777
Участник
В приведенном случае мне надо только одно значение а массив я вывожу в дбгрид точнее в два дбгрида первый это группы которые содержат элементы, при обработке клика в гриде с группами происходит что-то вроде
if(FIBTransaction1->Active)FIBTransaction1->Active = false;
AnsiString b = Main->FIBDataSet->Fields->Fields[1]->AsString;
skladvibor->FIBDataSet1->SelectSQL->Clear();
AnsiString s ="select * from SP_SUPPLIERBASE(0," + b +")";
skladvibor->FIBDataSet1->SelectSQL->Add(s);
skladvibor->FIBTransaction1->Active = true;
skladvibor->FIBDataSet1->Active = true;

для второго грида соответственно есть новая датасет и новая транзакция и еще одна датасорце а при выборе во втором гриде элемента и нажатии кн. ОК происходит
AnsiString b = FIBDataSet1->Fields->Fields[3]->AsString;
if(addnakl->Caption == "????? ??????????")
addnakl->postavshik->Text = b;
if(addnakl->Caption == "????? ??????")
addnakl->sklad->Text = b;
if(addnakl->Caption == "????? ?????????????? ????")
addnakl->otv->Text = b;
if(FIBTransaction1->Active)FIBTransaction1->Active = false;
skladvibor->Close();
addnakl->Show();

если есть мысли как сделать лучше сделайте тук-тук в асю
:)
...
Рейтинг: 0 / 0
02.06.2004, 16:01:04
| Ответить | Цитировать | Написать  
14 сообщений из 64, страница 3 из 3
  3  все
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / как вызвать хп под IB с использованием FreeIBComponent как ей передать параментры (Было: Подскажите новичку)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=40&msg=32542505&tid=1578537]:
 0ms
get settings:
 7ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 183ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 31ms
get tp. blocked users:
 1ms
others: 187ms
total:  442ms
созд. / загр.: 442ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]