Cita:
Empezado por titooo
Buenas, tengo un problema con tratar de obtener el parametro de salida que utilizo en una funcion de SQL Server 2008 y llevarla a una variable en Delphi 7.
EJ= Mi funcion verifica que una clave ingresada por el usuario se encuentra en la tabla de SQL.
sintaxis en SQL:
function validar
(@codigo numeric (2))
returns varchar (10)
as
begin
declare @enc varchar (10)
if (select sigla
from sit_iva
where codigo=@codigo)=null
set @enc='no'
else
set @enc='si'
return @enc
end;
Posiblemente tenga un problema con el desarrollo de la funcion, ahora como hago en Delphi para poder asignarle a una variable "Encontrado" de tipo string, el resultado que quedo almacenado en la funcion utilizada que se denomina "@enc". Muchas gracias
|
Hola tatooo
Lo que tienes que hacer es crear una SQL que llame a tu función, eje.
Código Delphi
[-]...
var
lResult: Boolean;
begin
with TADOQuery.Create(Self) do
begin
Connection := ADOConnection1;
SQL.Add('SELECT');
SQL.Add(' dbo.validar(7) AS ACCESO');
Open;
lResult := FieldByName('ACCESO').AsBoolean;
end;
if lResult then
ShowMessage('Usuario encontrado')
else
ShowMessage('Usuario no encontrado');
end;
Un saludo,