Процедура возвращает набор данных

Доброго времени суток.
Перевожу базу с MS SQL на FB. Не могу правильно создать процедуру, возвращающую набор данных.

Это MS SQL

create procedure Get_UserRole (@ID_User int)
as
begin
  if @ID_User is null 
    return 6001
  Select * From VUserRole Where ID_User = @ID_User
end

Вот, что у меня получается

create procedure Get_UserRole (vID_User int)
as
begin
  Select * From VUserRole Where ID_User = :vID_User;
end;