SQLite запрос с рекурсией для раскрытия/закрытия групп справочника в DBGrid

procedure extOpenGroupsSpr(FDQuery2: TFDQuery; id_str: string);
begin
      Form2.FDQuery2.Close;
      Form2.FDQuery2.SQL.Clear;
 
            Form2.FDQuery2.SQL.Add(
              ' WITH name_tree as ('+
              '   SELECT '+
              '     0 as fl_open,'+
              '     *'+
              '   FROM Clients'+
              '   WHERE id = '+id_str+
              '   UNION ALL'+
              '   SELECT '+
              '     1 as fl_open,'+
              '     c.*'+
              '   FROM Clients c'+
              '   JOIN name_tree p on p.parent_id = c.id'+
              '   WHERE c.id <> c.parent_id'+
              ' )'+
              ' SELECT '+
              '   *'+
              ' FROM name_tree'+
              ' WHERE id <> '+id_str+
 
              // добавляем запрос по содержимому группы
              ' UNION ALL'+
              ' SELECT '+
              '   0 as fl_open,'+
              '   * '+
              ' FROM Clients '+
              ' WHERE parent_id = '+ id_str +
 
             // добавляем запрос по раскрываемой группе
              ' UNION ALL'+
              ' SELECT '+
              '   1 as fl_open,'+
              '   * '+
              ' FROM Clients '+
              ' WHERE id = '+id_str+
 
              ' ORDER BY fl_group DESC, parent_id, Description'+ //DESC
              ';'
              );
          Form2.FDQuery2.OpenOrExecute;
 
end;