Retornando um CURSOR pela Stored Procedure, SQL Server
Fala ae pessoal, beleza?
Estou querendo fazer uma Stored Procedure no SQL Server para retornar um cursor...
Seria retornar um SQL Basico (select campo1, campo2 form tabela)
Estou usando o Delphi 7 e o ADO para usar esse retorno!
Alguem pode me ajudar?
Muito Obrigado
Cesar Rodrigo
Estou querendo fazer uma Stored Procedure no SQL Server para retornar um cursor...
Seria retornar um SQL Basico (select campo1, campo2 form tabela)
Estou usando o Delphi 7 e o ADO para usar esse retorno!
Alguem pode me ajudar?
Muito Obrigado
Cesar Rodrigo
Crclo
Curtidas 0
Respostas
Wtjunior
26/03/2004
Na internet vc acha diversas apostilas de sqlserver...
um abraço
Wilson
um abraço
Wilson
GOSTEI 0
Torres Delphi
26/03/2004
Pode existir alguma variacao no modo de fazer, mas prefiro utilizar variaveis:
DECLARE @VARIAVEL1 INT
,@VARIAVEL2 CHAR(10)
DECLARE Crs_Nome_Cursor CURSOR FOR
SELECT
CAMPO1
,CAMPO2
FROM NOME_TABELA
OPEN Crs_Nome_Cursor
-- Aqui vc posiciona no primeiro registro do cursor
FETCH Crs_Nome_Cursor INTO
@VARIAVEL1
,@VARIAVEL2
-- Se deu tudo certo
WHILE (@@FETCH_STATUS <> -1)
BEGIN
SELECT @CAMPO1
,@CAMPO2
-- Aqui o FETCH posiciona no proximo registro
FETCH Crs_Nome_Cursor INTO @VARIAVEL1, @VARIAVEL2
END
-- Destroi o cursor
CLOSE Crs_Nome_Cursor
DEALLOCATE Crs_Nome_Cursor
DECLARE @VARIAVEL1 INT
,@VARIAVEL2 CHAR(10)
DECLARE Crs_Nome_Cursor CURSOR FOR
SELECT
CAMPO1
,CAMPO2
FROM NOME_TABELA
OPEN Crs_Nome_Cursor
-- Aqui vc posiciona no primeiro registro do cursor
FETCH Crs_Nome_Cursor INTO
@VARIAVEL1
,@VARIAVEL2
-- Se deu tudo certo
WHILE (@@FETCH_STATUS <> -1)
BEGIN
SELECT @CAMPO1
,@CAMPO2
-- Aqui o FETCH posiciona no proximo registro
FETCH Crs_Nome_Cursor INTO @VARIAVEL1, @VARIAVEL2
END
-- Destroi o cursor
CLOSE Crs_Nome_Cursor
DEALLOCATE Crs_Nome_Cursor
GOSTEI 0