execute block (DATE_SVER_LAST DATE=:DATE_SVER_LAST, DATE_SVER_FIRST DATE =:DATE_SVER_FIRST, DATE_ varchar(50)=:DATE_)
returns(nom_list varchar(5000))
as
declare variable tmp_list integer;
begin
 for select s.nom_abon
  from SPR_ABON S
   where  (S.KOD_TRF = 110 or S.KOD_TRF = 111)
  and S.date_sver > :DATE_SVER_FIRST
  and S.date_sver < :DATE_SVER_LAST into :tmp_list

  nom_list = tmp_list||',';
  suspend;
end