You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
SET SQL DIALECT 3;
SET NAMES UTF8;
CREATE DATABASE 'Base\Test.fdb' USER 'SYSDBA' PASSWORD '1' DEFAULT CHARACTER SET UTF8;
CREATE DOMAIN MONEY AS NUMERIC(15,4);
commit;
CREATE TABLE CL_CASHPRICE (ID INTEGER NOT NULL, PRICE MONEY NOT NULL);
commit;
SET TERM ^ ;
create procedure TESTP (I_ID INTEGER, I_PRICE type of column CL_CASHPRICE.PRICE)
as
declare variable GOODSPRICE MONEY;
begin
GOODSPRICE = NULL;
if (:GOODSPRICE is not NULL)
then GOODSPRICE = 6;
end^
SET TERM ; ^
commit;
Submitted by: Alex Truhin (atruhin)
SET SQL DIALECT 3;
SET NAMES UTF8;
CREATE DATABASE 'Base\Test.fdb' USER 'SYSDBA' PASSWORD '1' DEFAULT CHARACTER SET UTF8;
CREATE DOMAIN MONEY AS NUMERIC(15,4);
commit;
CREATE TABLE CL_CASHPRICE (ID INTEGER NOT NULL, PRICE MONEY NOT NULL);
commit;
SET TERM ^ ;
create procedure TESTP (I_ID INTEGER, I_PRICE type of column CL_CASHPRICE.PRICE)
as
declare variable GOODSPRICE MONEY;
begin
GOODSPRICE = NULL;
if (:GOODSPRICE is not NULL)
then GOODSPRICE = 6;
end^
SET TERM ; ^
commit;
execute procedure TESTP(1, 6);
commit;
Commits: 72d9063 ab834d2
The text was updated successfully, but these errors were encountered: