Visual Basic - Error en Store Procedure

Alguien sabe porque esto si me funciona en el analizador de consultas de la siguiente manera:

declare @factura as Varchar(8)
declare @movimiento as Int
declare @almacen AS Int

set @factura='500'
set @movimiento=200
set @almacen=1

if (select factura from cab_compras where id_movimiento=@movimiento and id_almacen=@almacen)<>@factura
begin
update cab_compras
set factura=@factura
where id_movimiento=@movimiento and id_almacen=@almacen
end

Pero lo pongo en un SP de la siguiente forma y no funciona

CREATE PROCEDURE [spAdmonCompras]
(
@factura as Varchar(8),
@movimiento as Int,
@almacen AS Int,
)
AS
if (select factura from cab_compras where id_movimiento=@movimiento and id_almacen=@almacen)<>@factura
begin
update cab_compras
set factura=@factura
where id_movimiento=@movimiento and id_almacen=@almacen
end

Gracias de ya...

te sobra una coma, checalo

CREATE PROCEDURE [spAdmonCompras]
(
@factura as Varchar(8),
@movimiento as Int,
@almacen AS Int
)
AS
if (select factura from cab_compras where id_movimiento=@movimiento and id_almacen=@almacen)<>@factura
begin
update cab_compras
set factura=@factura
where id_movimiento=@movimiento and id_almacen=@almacen
end