Commit em Procedure

ola pessoal,

tenho a seguinte procedure:

DECLARE VARIABLE VALOR DOUBLE PRECISION;
begin
SELECT sum(FT.VRBX) FROM TABFATURAS FT WHERE FT.NLOTE=:NLOTE INTO :VALOR;

UPDATE TABLOTEFATURA LT SET LT.SALDODEBITO=UDF_ROUNDDEC((LT.SALDODEBITO + :VALOR),2),
LT.QTDEFAT=LT.QTDEFAT + 1 WHERE LT.NLOTE=:NLOTE;

end

quando executo ela no dentro do faribird (execute procedure ´SPSOMALOTE´(´2´);) ele naum dá o commit sozinho.como eu faco para colocar dentro desse codigo um commit?