Функция разбивает составное слово вида КодПоОКПО
Пример: КодПоОКПО -> Код по ОКПО, ДатаРождения -> Дата рождения
Функция РазбитьСоставноеСлово(Слово) Рез=Лев(Слово,1); Для Индекс=2 по СтрДлина(Слово) цикл Символ=Сред(Слово,Индекс,1); Символ1 = ?(Индекс+1 <= СтрДлина(Слово),Сред(Слово,Индекс+1,1),Символ); Символ2 = ?(Индекс+2 <= СтрДлина(Слово),Сред(Слово,Индекс+2,1),Символ); Рез=Рез+?(ВРег(Символ)=Символ,?(ВРег(Символ1)=Символ1,Символ," "+НРег(Символ)),?(ВРег(Символ1)=Символ1 И ВРег(Символ2)=Символ2,НРег(Символ)+" ",Символ)); КонецЦикла; Возврат Рез; КонецФункции
