SUBTOKEN - это программа из справочника R266

Подстрока с начала по конец фрагмента frag_num

SUBTOKEN( 1. исходная строка, 2. кол-во начальных фрагментов, [3. разделитель = Dlm], [4. нужны пустые фрагменты = Нет] )

Возможный разделитель фрагментов delim

Пример

SubToken( 'арозаупаланалапуазора',, 'а' )

Текст

Parameters  src_str, frag_num, delim:=Dlm, with_empty:=.f.

result:=ArrAsString(StrToArray(src_str,delim),,frag_num,delim, with_empty)