hi
die sp erklären is ganz einfach; was sie machen soll ist:
SQL-Code:
pos = 0;
for select first 20 id from dicentries where (asterm = :asterm_in and id >= :id_in) or (asterm > :asterm_in) order by asterm ascending, id ascending into :id_out do
begin
suspend;
pos = pos + 1;
end
das problem ist, dass meine felder zuu groß sind - deswegen kann ich auf asterm, id keinen joint index kreiren.
das wiederum bedeutet, dass die prozedur so wie sie hier steht zu lange dauern würde; deswegen brauch ich eine andere sp, die mir genau das selbe ergebnis liefert - aber dabei schneller ist!
habe mittlerweile eine lösung gefunden, die funktioniert..bin immer noch der meinung, das was ich hier gepostet hab ist korrekt und firebird hat einen bug...sei's drum, so funktioniert's jetzt (indem ich das problem in zwei prizeduren aufteile):
SQL-Code:
CREATE PROCEDURE NEXT_20_AB_ASTERM_AUX (
asterm_in varchar(240),
id_in bigint)
returns (
id_out bigint,
pos integer)
as
declare variable cnt integer;
declare variable asterm_tmp varchar(240) character set unicode_fss;
declare variable asterm_prior varchar(240) character set unicode_fss;
begin
pos = 0;
cnt = 0;
asterm_prior = asterm_in;
for select asterm, id from dicentries where (asterm = :asterm_in and id >= :id_in) or (asterm > :asterm_in) order by asterm ascending into :asterm_tmp, :id_out do
begin
cnt = cnt + 1;
if (asterm_tmp <> asterm_prior) then
begin
pos = pos + 1;
asterm_prior = asterm_tmp;
end
suspend;
if (cnt = 20) then
exit;
end
end
SQL-Code:
CREATE PROCEDURE NEXT_20_AB_ASTERM (
asterm_in varchar(240),
id_in bigint)
returns (
id_out bigint,
pos integer)
as
begin
pos = 0;
for select id_out from next_20_ab_asterm_aux(:asterm_in, :id_in) order by pos ascending, id_out ascending into :id_out do
begin
suspend;
pos = pos + 1;
end
end