Capturar retorno

Colega,   Boa noite!!!     Veja, tenho essa Sp no Sql server, e preciso capturar o retorno da mesma no delphi, como posso fazer isso?     Aguardo     create Procedure [dbo].[GEN_ID] @NomeTabela SysName, @Id Bit = 1 as Begin Set NoCount On; Begin Tran Declare @Retorno Int; SELECT @Id = Sequencial from tb_sequencial (updLock) where Tabela = @NomeTabela Update tb_sequencial Set @Retorno = Sequencial = Sequencial + 1 where Tabela = @NomeTabela   If @@RowCount = 0 Begin Insert Into tb_sequencial (tabela, sequencial) Values(@NOmeTabela, 1); Set @Retorno = 1; End; Commit Tran; Return @Retorno; End;