Hola, quisiera saber si me pueden orientar en lo siguiente: estoy trabajando con delphi 2007, sql server 2000 y dbexpress, cuando intento realizar un alta a una trabla por medio de un procedimiento almacenado me sale el siguiente mensaje:
Project Camiones.exe raised exception class EDatabaseError with message 'SPExiste_Empresa: Cursor not returned from Query'
Tengo el procedimiento almacenado enlazado a una sqlconnection, no se más me esta faltando.
Código Delphi
[-]
procedure TfrmEmpresasAltas.cxButton1Click(Sender: TObject);
begin
if Edit1.Text = ' ' then
begin
MessageDlg('Se deben completar todos los campos.', MtInformation, [MbOK], 0);
Exit;
end
else
begin
with DMTablas.SPExiste_Empresa do
begin
Close;
ParamByName('@SP_NOMBRE').AsString := Edit1.Text;
Active := true;
ExecProc;
if ParamByName('@RESULTADO').AsInteger = 1 then
begin
MessageDlg('Ya existe una empresa con ese nombre.', MtInformation, [MbOK], 0);
Close;
Exit;
end
else
begin
try
............................
............................
except
raise;
end;
DMTablas.SPAlta_Empresa.Close;
end;
end;
end;
end;
desde ya gracias.