set term ^;
create or alter procedure sp(a_id int) returns(name varchar(80), code varchar(20) ) as
  declare [variable] i int;
  declare [variable] s varchar(80);
begin
  i=0;
  for select fio from employee into name
  do begin
     if ( i=0 ) then
     begin
         ... ... ...
     else begin
         ... ... ...
     end
     suspend;
     i = i + 1;
  end
end^

create or alter function fn(a_id int) returns varchar(80) as
  declare [variable] dts timestamp;
begin
   ... ... ...
   return ... ;
end
set term ;^

sp( a_id int ) ( name varchar(80), code varchar(20) ) {
  // Селективная процедура: в первой паре скобок - входные параметры, во второй - поля возвращаемого кортежа
  // Комментарии, кстати, тоже можно ввести как везде: две косые палки! 
  // Потому что это не SQL, а его ПРОЦЕДУРНОЕ расширение.
  i int; // никакого declare, и так понятно, что тут объявляется переменная
  s varchar(80);
  i=0;
  // Не надо никакого 'as begin' после раздела объявления переменных! 
  // Да, хорошим стилем считается объявлять всё вверху, но я в упор не понимаю, почему переменную,
  // которая нужна только внутри блока ("{ }"), надо тоже тащить наверх. 
  // Все объявленные переменные всё равно уничтожаются на выходе.
  for select fio from employee into name {
     if i=0 { // не надо скобок вокруг bool-условия: слева от него "if", справа - "{", ну так что тут нельзя понять ?!
         ... ... ...
     } else {
         ... ... ...
     }
     suspend; // оставить! suspend отражает не только передачу клиенту, но и ожидание запроса от него след. кортежа.
     i++; // почему нельзя инкремент сделать как уже 40 лет в Си и 20 в java ?
  }
}

varchar(80) fn(a_id int) { // выходной параметр (единственный) указан слева от имени модуля ==> это - функция
  dts timestamp;
  ... ... ...
  return ... ; // раз функция, значит обязана что-то возвращать. Вот и возвращаем.
}