Error: multiple rows in singleton select

I have successfully compiled my very first select procedure :-) inside IBOConsole, but I get "Error: multiple rows in singleton select" when I call it using:
“select * from SelProc_All_Constituents"
from within my app AND inside IBOConsole.
My app needs to be able to go to a selected record, edit it, and navigate up and down the dataset.

This is my select procedure:
SelProc_All_Constituents
=======================
set term ^;
create procedure SelProc_All_Constituents
RETURNS (
constituentID integer,CT_Code integer,Inactive_YN varchar(3))
as
begin
select constituentID,CT_Code,Inactive_YN from constituents
into :constituentID,:CT_Code,:Inactive_YN;
suspend;
end^

Any hints appreciated.
Thx
Sam Hunt

You need :
begin
for select constituentID,CT_Code,Inactive_YN from constituents
into :constituentID,:CT_Code,:Inactive_YN do
begin
suspend;
end
end^

for multiple rows select

====== sam hunt wrote ====
but... I only get one row in IBOConsole and there are 6 rows in the single table that this select procedure queries. PLUS, I get an "arithmetic error..." when I attempt to navigate the dataset in my application.
Any more help?
Thx
Sam