Execute block
returns (a_missed integer)
as
 declare variable a_max integer;
 begin
  select min(m) from aaa into :a_missed;
  if (a_missedis not null) then
   begin
     select max(m) from aaa into :a_max;
     while (a_missed <=a_max) do
       begin
         if (not exists (select * from aaa where m=a_missed )) then suspend;
         a_missed=a_missed+1;
       end
   end;
 end

é ÐÕÓÔØ × ÍÅÎÑ ËÉÎÕÔ ËÁÍÎÅÍ, ÅÓÌÉ ÜÔÏ ÎÅ SQL-ÚÁÐÒÏÓ :-)

ó Õ×ÁÖÅÎÉÅÍ,
óÔÁÒÉËÏ× áÌÅËÓÅÊ



Ответить