ayuda con una suma en interbase

[jordangel]

buenas noches amigos les escribo para pedirles ayuda con un problemita en interbase

estoy intentado crear un store procedure de incluir, el programa lo corre pero al momento de realizar una prueba me muestra todo lo ke agrego pero no me calcula el total, me sale NULL, pero en lo demas si me agrega los valores.. porfa ayudenme en este codigo.

aqui el codigo

Código SQL [-]
set term!
create procedure incluvend (icivend varchar (15), iapenomb varchar (30), ifnac date, isbase float, ibsfact float, 
ibscobranza float, iporcomisvta float, iporcomiscob float)
as
  declare variable totaldev float;
  declare variable bscomisvta float;
  declare variable bscomiscob float;
  declare variable sbase float;
  declare variable bsfact float;
  declare variable bscobranza float;
  declare variable porcomisvta float;
  declare variable porcomiscob float;
begin
  bscomisvta= :bsfact*:porcomisvta/100;
  bscomiscob= :bscobranza*:porcomiscob/100;
  totaldev= :sbase+:bscomisvta+:bscomiscob;
  insert into vendedor values
  (:icivend,:iapenomb,:ifnac,:isbase,:ibsfact,:ibscobranza,:iporcomisvta,:iporcomiscob,:totaldev);
end

a cada campo de coloce una (i) antes del nombre como para identificar que son de incluir, execpto el total que no esta declarado arriba