Interbase - For multiples

por favor, necesito ayuda con prog.

Tengo q trabajar con un for para multiples select y me da error.............. esto es lo q hice:
set term !! ;
create procedure lista_mov_cabeza
returns (id_aux integer, fecha_inicio_aux date, fecha_terminacion_aux date, total_neto_aux float, fecha_aux date, monto_aux float, total_aux float, id_empleado_aux integer)
as
begin
for
begin
select id_mov, fecha_inicio, fecha_terminacion, total_neto, id_empleado from mov_cabeza into :id_aux, fecha_inicio_aux, fecha_terminacion_aux, total_neto_aux, id_empleado_aux

select fecha, monto, cantidad, total from mov_cuerpo where id_mov = :id_aux into total_neto_aux, fecha_aux, monto_aux, total_aux
end
do suspend;

end !!

set term ; !!
.............. les agradezco, q esten bien