Procedure does not return the full column

Question

I created a project with the ibexpert, does the commit correctly, but at the time of turning the Procedure, get the bug:

Multiple Rows in Singleton select.

My intention is to list all values in the city column of the target table. When I run select in a query normal, it returns all values of the column, just does not do the same in Procedure, being that I’m running the same way.

Follow the code below:

create or alter procedure VER_TODOS_DEST  
returns (CIDADES char(20))  
as  
begin  
  select cidade from destino  
  into :cidades;  
  suspend;  
end

Answer 1

Within a procedure or trigger the command select can only return 1 record.

To do what you want you need to use for select as below.

create or alter procedure VER_TODOS_DEST
returns (
    CIDADES char(20))
as
begin
  for
      select
          CIDADE
      from
          DESTINO
      into
          :CIDADES
  do
    suspend;
end