Сообщить о недопустимых символах

[Shouldercannon]

Доброго времени суток!
Есть строка с таким содержимым: |67894376|
Подскажите, пожалуйста, как проверить строку на наличие посторонних символов. Если в строке есть что-то помимо | или цифр от 0 до 9, то сообщить об этом.

[Shouldercannon]

Функция НайтиСимволы(Строка)	
	Для Сч = 1 По СтрДлина(Строка) Цикл
		Если Найти("|0123456789", Сред(Строка, Сч, 1)) = 0 Тогда
			Возврат Истина;
			Прервать;
		КонецЕсли; 
	КонецЦикла;
	
	Возврат Ложь;
КонецФункции