Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Traduccion de este codigo Vbasic a Vfox
Message
From
17/04/2006 12:06:01
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows NT
Database:
MS SQL Server
Miscellaneous
Thread ID:
01113165
Message ID:
01114076
Views:
15
bueno te comento que no he podido accesar aun, me manda error de conversion de datos.

Estuve leyendo y en ejemplos se muestran estos sp

CREATE PROCEDURE sp_GetNextKey
@RetVal int OUTPUT,
@Name varchar(30)
AS
UPDATE IdKeys
SET IdKeyValue = IdKeyValue + 1,
@RetVal = IdKeyValue + 1
FROM IdKeys
WHERE IdKeyName = @Name

y utilizan parametros , todo cool, pero el Sp que me tiene, parado es este

CREATE PROCEDURE MiProximoID1 @dbName nvarchar(128), @user char(8), @obj int, @cmd char (1), @param nvarchar (254)
AS

declare @handle as int
declare @freeCursor as char
set @freeCursor = 0
if exists (select 'a' from TLOG)

begin
set @freeCursor = 1
declare logCur cursor for
SELECT MAX(LogNum) FROM TLOG
open logCur
fetch next from logCur into @handle
end
else
begin
set @handle = 0
end
set @handle = @handle + 1
declare @date datetime
set @date = GETDATE()

INSERT INTO
TLOG (LogNum, Company, UserCode, Object, Command, Param, SubDate, SubTime, Status)
VALUES
(@handle, @dbName, @user, @obj, @cmd, @param, @date, (DATEPART(hh, @date)*100)+(DATEPART(mi, @date)) , 'R')
if (@freeCursor=1)
begin
close logCur
deallocate logCur
end
return @handle


la estructura de los sp que muestran en los ejemplos son diferente, y no puedo hacer cambios en el sp ni en la base de datos porque es un standar y no puedo romper ese estandar, no se alguna idea, ya me duele mi cabezota...

saludos...
El Hombre que dice
"No Puede Hacerse",
será sorprendido por
"Alguien que lo Haga"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform