Процедуры и функции

Текст = "1234567";

ОбрезатьДо5Символов(Текст);
//Текст = "12345"

Сообщить(Текст);

Процедура ОбрезатьДо5Символов(Текст)
    Если СтрДлина(Текст) > 5 Тогда
        Текст = Лев(Текст, 5);
    КонецЕсли;
КонецПроцедуры