Error en sql server 2000 y dbexpress

[Tauro78]

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.