Cat2
На дворе 3 число, а у тебя все ещё взгляд не трезвый?! Это серьёзно.....
По первому нетрезвому взгяду, это должно быть разбито на 4-5 таблиц.
Если время поджимает, то надо плюнуть на запросы с всё сделать
последовательным доступом на клиенте.
Мысль не уловил???... Объясни?!....
Структура таблицы Accoutn приведена; Все остальные переменные оговорены в запросе... Тут главное принцип понять... Я уже писал
Дата: 30 дек 02, 12:51
Пример:
Вводим на 01.01.2002 г. 10 норм т.е. при запросе Sum_Kol_norm:=10
Делее на 02.01.2002 г. 2 нормы т.е. при запрсе Sum_Kol_norm:=12
Машина выдаст сообщение 'ВНИМАНИЕ норма на '2002' год израсходована' но норму сощитает.
Далее на 03.01.2002 г. 1 норма (Sum_Kol_norm=12).сообщение 'ВНИМАНИЕ норма на '2002' год израсходована' и норма :=0.
А вот если сейчас попробуем редактировать введенные значения то плучается следующее..
допустим 02.01.2002 г. стоит 2 нормы когда пытаемя редактировать запускается процедура и Sum_Kol_norm=12, она же не знает что значение за 02.01.2002 г. уже учтено и естественно обнуляет его....
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
If (Sum_kol_norm) > 12 then
Begin
ShowMessage('ВНИМАНИЕ норма на ''' +IntToStr(Year)+''' год
израсходована');
QAccKol_Norm.Value:= 0 ;
end
else If QAccKol_norm.Value > ( 12 - Sum_kol_norm)then
Begin
ShowMessage('ВНИМАНИЕ норма на ''' +IntToStr(Year)+''' год
израсходована');
QAccKol_norm.Value := ( 12 - Sum_kol_norm);
end;
Мне нужно, что бы машина учитывала этот нюанс, т.е. разбиралась когда считает количество норм за период, вводится новая запись (т.е. добавляется дополнительная норма) или редактируетя введенная....
