Код: Выделить всё
FOR SELECT T_ID, SERT, TERM, CNT... FROM INDETAILS WHERE I_ID=-:GVI_ INTO :T_ID_, :SERT_, :TERM_, :CNT_... DO
BEGIN
SELECT COUNT(*) FROM STORAGE WHERE T_ID=:T_ID_ AND PRICE_RDR=:PRICE_RDR_ INTO :C_;
IF (C_=0) THEN
INSERT INTO STORAGE (...) VALUES (...);
ELSE
UPDATE STORAGE SET ... WHERE T_ID=:T_ID_ AND PRICE_RDR=:PRICE_RDR_;
END
В чем может быть проблема?
Сервер Firebird 2.0