create or alter procedure STRTOTABLE (
    STR varchar(2000),
    L varchar(20) = ',')
returns (
    N integer,
    CODE varchar(100))
AS
declare variable p integer = -1;
declare variable t integer = 1;
declare variable l1 integer;
begin
  N = 1;
  l1 = char_length(l);
  while (p <> 0) do
  begin
    p = position(l, str, t);
    if (p = 0) then
      code = substring(str from t);
    else
      code = substring(str from t for p-t);
    if (code > '') then
    begin
      suspend;
      N = N+1;
    end
    t = p+l1;
  end
end

select t.* from strttable('141,170,155,143') s
left join table t on t.id = s.code