Fórum O que saiu de errado ? #38117

estou iniciando no interbase ! e com SProcedure mais iniciante ainda ...hehe o que saiu de errado no codigo abaixo !

set term ^;
create procedure SP_locacao
(
codclien integer, codprod integer, dtlocacao date, dtdevol date,
valor decimal(9,2), valortot decimal(9,2)
)
as
begin
insert into recibo ( cod_clien, cod_prod, dtloc_recib, dtdev_recib,
vl_recib, vltot_recib) values (:codclien, :codprod, :dtlocacao,
:dtdevol, :valor, :valortot)
end^