Visual Basic - Store procedure en Visual Basic

Life is soft - evento anual de software empresarial
 
Vista:

Store procedure en Visual Basic

Publicado por Eithel Solano (2 intervenciones) el 25/11/2006 18:03:04
Estimados, necesito desde un procedimiento almacenado en SQL 7 me retorne un valor a Visual Basic 6.
El procedimiento almacenado es:
---------------------
REATE PROCEDURE GETNroDoc
@tipocorr INTEGER,
@empresa INTEGER,
@serie CHAR(2),
@clavecorr CHAR(5),
@nrodoc NUMERIC OUTPUT
AS
DECLARE @correla NUMERIC

IF @tipocorr=1
BEGIN
SET @correla = ISNULL( (SELECT correlativo FROM correlativo WHERE empresa=@empresa AND serie=@serie AND clavecorr=@clavecorr) , 0 )
SELECT @nrodoc=ISNULL(MAX(nrodoc),0)+1 FROM documentos WHERE empresa=@empresa AND serie=@serie AND clavecorr=@clavecorr
IF @correla > @nrodoc
BEGIN
SET @nrodoc = @correla
END
END
ELSE
SELECT @nrodoc=ISNULL(MAX(nrodoc),0)+1 FROM documentos_pend WHERE empresa=@empresa AND serie=@serie AND clavecorr=@clavecorr

**************************************************************
GO


Mi sentencia en Visual Basic 6 es :
**************************************************************
Set rsfile = New ADODB.Recordset
rsfile.CursorType = adOpenDynamic
rsfile.ActiveConnection = cndbm
cndbm.BeginTrans
cndbm.Execute ("EXEC GETNroDoc")

Como recibo el valor @nrodoc a Visual basic ??? Si el procedimiento devuelve dos parametros como los recibo los dos.???

Favor enviarme la repuesta a mi correo [email protected]

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder