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

[Shouldercannon]

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

[Shouldercannon]

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

Возврат Ложь;
КонецФункции