Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Вниз

Dataset not in edit or insert mode 


weak   (2002-01-04 12:48) [0]

Помогите!!!
Есть запрос, который выбирает нужные записи:
SELECT G.NAME_POT, G.KOD, G.GRS, T.l_ch, G.KOD_POT, G.VETKA, F.LM
FROM "potrebitel.DBF" P INNER JOIN "GRS.dbf" G ON (P.NAME = G.NAME_POT INNER JOIN "Fakt_p.DBF" F ON (P.KOD = F.KOD) INNER JOIN "temperatura.DBF" T ON (T.KOD = G.KOD)
where chislo="01" and mesyac="01" and god="01"

а потом нужно нужно посчитать значение поля T.l_ch, разделив F.lm на 24:

FDate.Query1.FieldByName("l_ch").value:=FDate.Query1.FieldByName("lm").asinteger div 24;

А он мне выдает:
Dataset not in edit or insert mode

Что я не так делаю???



Val   (2002-01-04 12:56) [1]

пытаешься изменить неизменяемый запрос



weak   (2002-01-04 12:59) [2]

А как же мне заполнить столбец l_ch, разделив столбец lm на 24??



Fareader   (2002-01-04 13:01) [3]

1) А ты Query в Edit ставишь?
2) Подключи UpdateSQL, включи CachedUPdates и работай.



Val   (2002-01-04 13:16) [4]

кстати, так ты меняешь не столбец а одну строку



Fareader   (2002-01-04 13:29) [5]

Если ты не хранишь в таблице результаты своих вычислений, то более разумным будет использовать Calculeted Fields.
Да, и настоятельно рекомендую в этом куске

where chislo="01" and mesyac="01" and god="01"

дописать название таблиц перед именами полей, чтобы не возникло недоразумений.



weak   (2002-01-04 14:56) [6]

Нет, я пытаюсь поменять во всем столбце:

Fdate.Query1.First;
while not FDate.Query1.Eof do
begin
FDate.Query1.FieldByName("l_ch").value:=FDate.Query1.FieldByName("lm").asinteger div 24;
Fdate.Query1.Next;
end;



Fareader   (2002-01-04 15:14) [7]

Сделай так:
FDate.Query1.Edit;

FDate.Query1.FieldByName("l_ch").value:=FDate.Query1.FieldByName("lm").asinteger div 24;

FDate.Query1.Post;



Desdechado   (2002-01-05 18:38) [8]

можно и в самом запросе соорудить
SELECT G.NAME_POT, G.KOD, G.GRS, (F.LM)/24 AS l_ch, G.KOD_POT, G.VETKA, F.LM




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.015 c
14-8987           ShaggyDoc             2001-12-11 14:20  2002.02.04  
Миниатюрные программы


1-8824            MJH                   2002-01-19 18:17  2002.02.04  
AnimatedMenus2000


1-8928            SergN                 2002-01-17 16:34  2002.02.04  
Как в Memo записать текстовый DOS файл?


7-9013            Orpheus               2001-10-24 12:34  2002.02.04  
Проблемка


14-8980           MJH                   2001-12-11 15:27  2002.02.04  
http://mjh.nm.ru