这个问题我在大富翁中提了N久没人答--Interbase 存储过程中如何使用域?
set term ^ ;
create procedure insert_customer as begin exit; end^
alter procedure insert_customer (
iid integer,
iname dname,/*dname,darea,daddr等都是已定义的域*/
iarea darea,/*为何要将这些域改成 char(x)之类才能通过*/
iaddr daddr,
itel dtel)
returns(
rid integer)
as
begin
rid = gen_id(gen_custid,1)^
insert into customer(
id,
name,
area,
addr,
tel)
values(
:rid,
:iname,
:iarea,
:iaddr,
:itel);
end^