整个过程:
create procedure insert_customer as begin exit; end^
alter procedure insert_customer (
iname dname,
iarea darea,
iaddr daddr,
itel dtel)
returns(
rid integer)
as
begin
/*ÓÃgen_custidÉú³ÉÆ÷Éú³ÉID*/
rID = gen_id(gen_custid,1);
/*²åÈë¼Ç¼*/
insert into customer(
id,
name,
area,
addr,
tel)
values(
:rID,
:iname,
:iarea,
:iaddr,
:itel);
end