[olbeup]

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,