Разработчику о работе с 1С:Предприятие, Pascal, Паскаль

Рассмотрим функции для работы со строкой: Найти(), Сред(), СтрДлина(). 1С:Предприятие.
Применим данные функции на примере.
Есть некоторая строка, в которой надо найти сумму и вывести ее в окно сообщений.
Искомая строка: «: 12 ,004 Ком.банка 861.42дол.;Кол-во транз.6шт.».
В указаной строке ищем слово «Ком.банка».
При помощи функции Найти(НазначениеПлатежа, «Ком.банка»), в переменной НазначениеПлатежа ищем подстроку Ком.банка.
Функция возвращает в переменную ПервыйСим номер позиции первого символа.
При помощи функции Сред(НазначениеПлатежа,ПервыйСим+9,10) в переменной НазначениеПлатежа возращаем строку, которая начинается с ПервыйСим+9 и 10 выбираемых символов.
Функция СтрДлина(СтрокаДляПоискаДол) возвращает длину строки.
Пример:

Процедура ИщемКолСим(СтрокаДляПоискаДол,ЛокЗначСим)
	ПервыйСим=Найти (СтрокаДляПоискаДол,"дол");
	ДлинСим=СтрДлина(СтрокаДляПоискаДол);
	ЛокЗначСим=ДлинСим-(ДлинСим-ПервыйСим+1);
КонецПроцедуры

Процедура ФункцииНайтиСредСтрДлина()
	Перем ЛокЗначСим;
	Перем СтрокаДляПоискаДол;
	НазначениеПлатежа=": 12    ,004 Ком.банка 861.42дол.;Кол-во транз.6шт.";
	ПервыйСим=Найти (НазначениеПлатежа,"Ком.банка");
	Если ПервыйСим>0 Тогда
		СтрокаДляПоискаДол=Сред(НазначениеПлатежа,ПервыйСим+9,10);
		ИщемКолСим(СтрокаДляПоискаДол,ЛокЗначСим);
		ВозможноСумма=Сред(НазначениеПлатежа,ПервыйСим+9,ЛокЗначСим);
		ЛокЗнач=Число(ВозможноСумма);
	КонецЕсли;
	Сообщить(" "+ЛокЗнач);
КонецПроцедуры