Проверка количества...

[Ярый]

Доброго времени суток уважаемые форумчане. В кратце есть 2 таблицы 1
таблица ТОВАРЫ содержащая поля ("АртикулТовара", "НазваниеТовара",
"Количество на складе",) и таблица ПРОДАЖИ с полями ("Номер", "АртикулТовара", "ДатаПродажи", "Количество") Задача состоит в том что бы проверять количество товара на складе и количество товара при продаже. То есть допустим у нас на складе 1шт, а мы пытаемся продать 2шт... сответственно выдать ошибку... Подскажите пожалуйста как это можно сделать в Delphi ?? В DBgrid все данные выводяться с помощью запросов, они только отображабт данные... мб есть какие то функции??

[evg_m]

проверить наличие товара когда?

1. при вводе количества в форме продажи
2. при попытке совершить продажу (нажатие кнопки ввод в форме продажи)
3. при записи информации о продаже в БД

DBGrid (а правильнее TxxxTable или TxxxQuery) уже имеет информацию о количестве товара, осталось ее только прочитать

TxxxQuery.Fiellds. F1 and SeeAlso

[Ярый]

Не совсем понял про TxxxQuery что это?
У меня на форме находятся кнопки "НОВАЯ ПРОДАЖА" (Insert Record), ну и соответственно проверять значение при попытке занести запись в базу то есть при нажатии кнопки "СОВЕРШИТЬ ПРОДАЖУ" (Post Edit).
А пункты 2 и 3 не совсем понимаю, то есть 2 пункт я еще не занес запись в базу и проверяю, а пункт 3 я уже занес в базу строку и только тогда проверяю? Просто я не силен в этом, главное что бы работало... Как я понимаю можно выбрать любой из трех пунктов...

[evg_m]

TxxxQuery(TxxxTable) это тот компонент доступа к БД одного из типов TADOQuery TIBQuery TSQLQuery и т.д. который ты использовал в своей программе.

[Ярый]

Я использовал Paradox...

[evg_m]

Paradox это БД
А чему равно (какой класс использован) вот здксь
твой DBGrid + свойстро DataSource + свойство DataSet .

[vovk]

Я бы воспользовался

Сообщение от evg_m

1. при вводе количества в форме продажи

То есть ограничил бы вообще возможность ввода числ больше количество товара при открытии формы продажи. Парадокс вообще локальная ни транзакций ни сетевого трафика. Пользоваталь 1 . А 2 и 3 пункты это скорее для многопользовательских Бд вдруг что добавилось на склад, или наоборот продалось.

[Serge_Bliznykov]

--- сорри --- не в той теме запостил....

[Dark_Spirit]

а не проще в edit-e в который вы вводите колличество продаваемого товара, сразу вывести то количество товара которое есть на складе, и запретиь ввод товара, больше чем есть на складе.
для примера:

query1.sql.add:='select Количество на складе from ТОВАРЫ where АртикулТовара='<значенние>;
query1.open;
edit1.text:=query1.fieldbyname('Количество на складе').asstring;

а потом на событие onExit, для даного едита написать:

if strtoint(edit1.text)>query1.fieldbyname('Количество на складе').asinteger
 then
  begin
   showmessage('Такого колличества товара нет на складе');
   edit1.text:=query1.fieldbyname('Количество на складе').asstring;
   edit1.setfocus;
  end;

думаю это вам поможет.