Вниз
Скачать: CL | DM;

значение NULL в ХП   Найти похожие ветки 

← →
nick-from ©   (2003-10-11 12:13) [0]

Сделал такую ХП на подсчет текущего количества товара:

CREATE PROCEDURE GETGOODSQUANTITY
(
aGoodsId INTEGER
)
RETURNS
(
Result INTEGER
)
AS
DECLARE VARIABLE aGoodsArrival INTEGER;
DECLARE VARIABLE aGoodsLeaving INTEGER;
BEGIN
SELECT SUM(Ga_Quantity) FROM GoodsArrival GA WHERE GA.Ga_GoodsId = :aGoodsId INTO :aGoodsArrival;
SELECT SUM(GE_Quantity) FROM GoodsExpense GE WHERE GE.GE_GoodsId = :aGoodsId INTO :aGoodsLeaving;
RESULT = :aGoodsArrival - :aGoodsLeaving;
SUSPEND;
END;

Проблема в том, что когда товар ни разу не продавался, записей в таблице GoodsExpense для него не будет, значит и сумма по GE_Quantity будет NULL. В этом случае и результат тоже будет NULL.

Как можно избежать этого, чтобы при :aGoodsLeaving равной NULL в эту переменную записывался 0 например? И результат был не NULL, а :aGoodsArrival - 0 = :aGoodsArrival

Можно ли написать в самой ХП такую проверку, типа: IF :aGoodsLeaving = NULL THEN ...?
У меня чего-то не получается.

Я эту проблему решил на клиенте так: Запускаются подряд два вышеописанных запроса в Query в контексте Snapshot. Потом сравниваем на NULL так: if Query.FieldByName["Sum"].IsNull Then var02 := 0 else var02 := Query.FieldByName["Sum"].AsInteger;
Так все прокатывает, но нужно сделать это на сервере в ХП.

Так вот, можно ли так сделать в самой ХП каким-либо образом?


← →
Vlad ©   (2003-10-11 12:32) [1]

>Можно ли написать в самой ХП такую проверку, типа: IF :aGoodsLeaving = NULL THEN ...?

IF (:aGoodsLeaving IS NULL) THEN
BEGIN
END



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
7-98907
Vl_Kr
2003-08-05 18:46
2003.10.30
Реальный счёт сотых долей секунды


1-98687
denick
2003-10-21 09:50
2003.10.30
Как в MDI приложении


14-98818
VBA
2003-10-12 14:07
2003.10.30
Подскажите как расшифровать польностью VBA?


3-98441
Denisiy
2003-10-10 16:38
2003.10.30
Установка курсора на последнюю строку таблицы (но не TTable.last)


1-98554
Wadim
2003-10-20 13:30
2003.10.30
TDateTime




   Наверх