Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#34

Re: bde schneller als firebird

  Alt 19. Mai 2006, 19:37
Ich habe mal dei datenbank angelegt und ein parr testdatensätze eingefügt. Ich habe auch einen Begin..end Block um das suspend gelegt. Bei mir funktioniert es.

SQL-Code:
SET TERM ^ ;

CREATE PROCEDURE NEW_PROCEDURE (
    X BIGINT)
RETURNS (
    ASTERM VARCHAR(80) CHARACTER SET WIN1252)
AS
begin
  for
    select dicentries.asterm
    from dicentries
    where dicentries.id > :x order by id rows 20
  into :asterm
  do
  begin
    suspend;
  end
end^

SET TERM ; ^

GRANT SELECT ON DICENTRIES TO PROCEDURE NEW_PROCEDURE;
GRANT EXECUTE ON PROCEDURE NEW_PROCEDURE TO SYSDBA;
Markus Kinzler
  Mit Zitat antworten Zitat