Duvida Na Procedure

[Guest Felipe Marinho]

create procedure max_projeto

/**returns maximo integer**/

as

declare variable maximo integer;

begin

for select count(codigo) from projeto group by codigo do

maximo = count;

if (count = null) then

count = 0;

maximo = count;

select maximo;

suspend

end

queria fazer isso no interbase, como faço?

[Micheus]

No FireBird seria:

CREATE PROCEDURE MAX_PROJETO 
RETURNS (RESULT INTEGER)
AS
begin
  for
    select COUNT(codigo)
    from projeto
    group by codigo
    into :RESULT do
    begin
    end

  if (:RESULT is null) then
    RESULT = 0;

  suspend;
end

...

for select count(codigo) from projeto group by codigo do

Note que COUNT, não é a mesma coisa que MAX. Então verifique o que você realmente deseja utilizar. O nome da procedure sugere que seja o MAX.