Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Traduccion de este codigo Vbasic a Vfox
Message
De
17/04/2006 12:06:01
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows NT
Database:
MS SQL Server
Divers
Thread ID:
01113165
Message ID:
01114076
Vues:
14
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"
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform